• Welcome to Vice City Multiplayer.
 
Menu

Show posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.

Show posts Menu

Messages - Amenine

#16
Script Showroom / Re: License Script [Done]
January 07, 2009, 07:38:59 PM
You welcome.. :D
#17
Script Showroom / License Script [Done]
January 05, 2009, 01:18:45 PM
[LB]Darkness requested me for a license script so i have done for him..here it is minor bugs can be here but will work..[GUS]..

Here the script how u can get ur driving license..
elseif ($2 == !getlicense) {
  if (Sunshine-Autos !isin $vcmp.area(%b)) vcmp.msg %id Error - You have to be at the Sunshine Autos!
  elseif ($vcmp.cost(%b) > $vcmp.cash(%b)) vcmp.msg %id Error - You need atleast $ $+ $bytes($vcmp.cost(%b),b) to use this command
  else {
    .timer 1 1  vcmp.setcont %id 0
    .timer 1 1 vcmp.announce %id ~y~Please wait..
    .timer 1 2 vcmp.cash- %b $vcmp.cost(%b)
    !writeini -n vcmp.license.ini LICENSE %name yes
    .timer 1 3  vcmp.msg $2 You can now drive vehicles...
    .timer 1 3 vcmp.announce %id ~y~Got a License!
    .timer 1 3 vcmp.setcont %id 1
  }
}


And License identifier..
on *:SIGNAL:vcmp.enter:{
  var %name = $1
  var %id = $vcmp.getid($1)
  var %Entertype = $4
 
  if ( %EnterType == 16) vcmp.msg %id Entered Vehicle as a driver..
    if ($readini(vcmp.license.ini,LICENSE,%name) == yes) {
      vcmp.msg %id You can drive vehicle,you have driving license..
    }
    else vcmp.msg %id You dont got driving license..
      vcmp.setlocation %id $vcmp.location(%id)
    }
  }
}


-------------------------------
Location:
-------------------------------

-1013.792,-862.95,17.954=SunShine-Autos


Note:Untested

Thanks
Amenine
#18
mIRC/pawn Scripting / Re: Help With Pickups
January 05, 2009, 11:11:24 AM
That i dont know sorry... :-X
#19
mIRC/pawn Scripting / Re: Help With Pickups
January 05, 2009, 10:55:50 AM
What u mean dude?  :P
#20
mIRC/pawn Scripting / Re: Help With Pickups
January 05, 2009, 10:54:10 AM
Updated the last post..

Thanks
Amenine
#21
mIRC/pawn Scripting / Re: Help With Pickups
January 05, 2009, 10:51:35 AM
And for locking system..use this:

;-----------------------------
;--------SERVER ALIAS's-------
;-----------------------------

alias vcmp.lock dll rcondll.dll RconCommand set 3 $1-


on *:SIGNAL:vcmp.command:{
elseif ($2 == !lockcar) {
  if ($vcmp.cmdcheck(!lockcar,%id) == fail) !halt
  elseif (!$3) vcmp.msg %id Error - Missing Information, $2 <car id>
  elseif ($3 !isnum) vcmp.msg %id Error - Invalid Vehicle ID, $2 <car id>
  else {
    vcmp.lock  $3 4
    vcmp.msg %id Your car has been locked now..
  }
}
elseif ($2 == !unlockcar) {
  if ($vcmp.cmdcheck(!unlockcar,%id) == fail) !halt
  elseif (!$3) vcmp.msg %id Error - Missing Information, $2 <car id>
  elseif ($3 !isnum) vcmp.msg %id Error - Invalid Vehicle ID, $2 <car id>
  else {
    vcmp.lock  $3 1
    vcmp.msg %id Your car has been unlocked now..
  }
}


Regards
Amenine
#22
mIRC/pawn Scripting / Re: Help With Pickups
January 05, 2009, 10:40:49 AM
For changing command [!] to this /c ::
U must replace these lines..
replace this:
on *:SIGNAL:vcmp.command2:{
  var %id = $1
  var %name = $vcmp.name($1)


With this:
on *:SIGNAL:vcmp.command2:{
  var %id = $1
  var %name = $vcmp.name($1)
  var %a = $iif($3,$iif($3 !isnum,$iif($vcmp.getid($3) != Unknown,$v1,-1),$iif($vcmp.name($3) != Unknown,$3,-1)),%id)
  var %b = $vcmp.getid(%name)


And paste ur heal command under:
on *:SIGNAL:vcmp.command2:{

Like:
on *::vcmp.command2:{
  var %id = $1
  var %name = $vcmp.name($1)

  if ($2 == register) {
    if ($vcmp.pass(%id) != $null) vcmp.msg %id Error - Nick is already registered..
    elseif (!$3) vcmp.msg %id Error - Missing Information, /c $2 <password>
    else {
      vcmp.announce %id ~t~Welcome to Carbon Gear..
      vcmp.msg Player %name Registered & Logged In (Admin Level: 1)
      vcmp.msg %id $chr(91) %name $chr(93) Registered successfully..
      vcmp.msg %id $chr(91) %name $chr(93) Logged in successfully..
      vcmp.msg %id Level: [1]
      vcmp.msg %id Password: $chr(91) $3 $chr(93)
      vcmp.announce %id ~y~Registartion Complete
      vcmp.setmoney %id 0
      !writeini -n vcmp.admin.ini LEVELS %name 1
      !writeini -n vcmp.admin.ini PASSWORDS %name $3
      !writeini -n vcmp.admin.ini LIN %name 1
    }
  }
  elseif ($2 == heal) {
    if ($vcmp.cmdcheck(!heal,%id) == fail) !halt
    elseif ($vcmp.setting.heal != on) vcmp.msg %id Error - $2 is Currently Set Off
    elseif ($vcmp.cost(%b) > $vcmp.cash(%b)) vcmp.msg %id Error - You need atleast $ $+ $bytes($vcmp.cost(%b),b) to use this command
    else {
      vcmp.cmdsay $2 %id >> Healed - Name: %name $+ , Cost: $ $+ $bytes($vcmp.cost(%b),b)
      vcmp.cash- %b $vcmp.cost(%b)
      vcmp.sethp $vcmp.getid(%name) 100
    }
  }
#23
mIRC/pawn Scripting / Re: Help With Pickups
January 04, 2009, 04:51:46 PM
yah thijn is right i think... 8)
After: elseif ($3 == 382) {
U dont have to repeat this: elseif ($3 == 382) {

Regards
Amenine
#24
mIRC/pawn Scripting / Re: Help With Pickups
January 02, 2009, 04:24:14 PM
Ahh right thijn..thanks for correcting it.. :D ;)
#25
mIRC/pawn Scripting / Re: Help With Pickups
January 02, 2009, 02:30:49 PM
Code:
on *:SIGNAL:vcmp.pickup:{
  var %name = $vcmp.name($1)
  var %name2 = $replace($replace($vcmp.name($1),[,~),],~)
  var %id = $1



  if ($3 == 337) {
    set %a $rand(100,200)
    vcmp.cash+ %id %a
    vcmp.msg %id Picked Up Cash - Amount: $ $+ %a $+ , Location: $vcmp.area(%id)
  }
  elseif ($3 == 382) {
    if (Location-Name !isin $vcmp.area(%b)) {
      vcmp.announce %id Lap 1
      vcmp.msg %id Lap 1 completed Hurry to the next lap..
    }
  }
  elseif ($3 == 382) {
    if (Location-Name !isin $vcmp.area(%b)) {
      vcmp.announce %id Lap 2
      vcmp.msg %id Lap 2 completed Hurry to the next lap..
    }
  }


Note:Untested

Regards
Amenine
#26
mIRC/pawn Scripting / Heal Location..
December 30, 2008, 11:01:17 PM
Can anyone post all the heal locations in vcmp..with their boundaries..of 4 corners..can anyone ..

Thanks
Amenine
#27
mIRC/pawn Scripting / Re: Ratio Problem..
December 30, 2008, 05:41:17 PM
What do u mean??
Means:How it shows the ratio of the player..??

Edit:[/b]:var %ratio = $round($calc($vcmp.kills(%a) / $vcmp.deaths(%a)),2)..This..??

Confusing
Amenine
#28
mIRC/pawn Scripting / Ratio Problem..
December 30, 2008, 04:27:31 PM
Here ..its not working..anything wrong in it,,
Code:
elseif ($2 == !danger) {
   var %a = 0,%c = -100
   while (%aa <= %MaxPlayers) {
     if ((%ratio > %c) var %b = $vcmp.name(%a),%c = %ratio
     elseif ((%ratio == %c) {
       if ($vcmp.kills(%b) > $vcmp.kills(%a)) { }
       elseif ($vcmp.kills(%b) < $vcmp.kills(%a)) var %b = $vcmp.name(%a),%c = %ratio
     }
     !inc %aa
   }
   if (%b) vcmp.say == %b is the most dangerous player with a ratio of %c
   else { }
 }


Thanks
Amenine
#29
mIRC/pawn Scripting / Re: help my plz drown
December 30, 2008, 05:00:05 AM
Here use this:
elseif ($3 == drown) {
  if ($WSV.pconnected($4)) {
    if ($5) {
      if $WSV.levels($2) >= $WSV.levels($4) {
      WSV.cmdlevelcheck3 $1-
      WSV.cmdlevelcheck $1-
      WSV.setlocation $WSV.id($4) -485.562 -777.406 205.796 0
      WSV.say Admin $WSV.name($2) drowned:[ $WSV.name($4) $chr(93) Reason $chr(93):$chr(91) $5- $+ $chr(93) .
    }
    else WSV.msg $2 You can't drown someone who has higher level than you.
    }
    else WSV.msg $2 Use: $3 <Nick/ ID> <Reason>
    }
    else WSV.msg $2 Sorry:[Player not found]
}


Regards
Amenine
#30
mIRC/pawn Scripting / Re: vcmp pickup id's
December 25, 2008, 05:54:36 AM
What is the pickup ID which just shows the information to the player and can be picked up by the player only....?.. :o
Like:
elseif ($2 == Pickup.ID)
   vcmp.msg %id Pickup is created for testing only......
}


Thanks
Amenine