Cheers the other one i couldn't make out the colors.
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-942.9848,95.4452,-940.5682,88.7636,-970.0644,89.0217,-970.5945,95.4211=Weedfield
elseif ($3 == growweed) {
if ($FBS.lin($1, $2) == $null) vcmp.msg $1 $2 Must be logged in.
elseif (Weedfield !isin $FBS.Buildings(1, $2)) vcmp.msg $1 $2 You can only grow Weed in the Field.
elseif ($readini(FBS.weed.ini,PLANTED,$vcmp.name($1, $2)) == Planted) vcmp.msg $1 $2 You are already growing Weed, wait till you pick then grow some more.
else {
vcmp.msg $1 $2 You are now growing Weed, wait till it grows.
!writeini -n FBS.weed.ini PLANTED $vcmp.name($1, $2) Planted
timer 1 60 vcmp.msg $1 $2 Your weed has Grown. Type !pickweed to pick it.
!writeini -n FBS.weed.ini GROWN $vcmp.name($1, $2) Weedgrown
}
}
elseif ($3 == pickweed) {
if ($FBS.lin($1, $2) == $null) vcmp.msg $1 $2 Must be logged in.
elseif (Weedfield !isin $FBS.Buildings(1, $2)) vcmp.msg $1 $2 You Must be at the Field to Pick Weed.
elseif ($readini(FBS.weed.ini,GROWN,$vcmp.name($1, $2)) == $null) vcmp.msg $1 $2 You must Grow your Weed first.
else {
vcmp.msg $1 $2 You have picked up your Units of Weed.
!writeini -n FBS.weed.ini WEED $vcmp.name($1, $2) $calc($FBS.drugweed($1, $2) + 4)
!remini -n FBS.weed.ini PLANTED $vcmp.name($1, $2)
!remini -n FBS.weed.ini GROWN $vcmp.name($1, $2)
}
}
elseif ($3 == weed) {
if ($FBS.lin($1, $2) == $null) vcmp.msg $1 $2 Must be logged in.
else {
vcmp.msg $1 $2 Weed: $iif($readini(FBS.weed.ini,WEED,$vcmp.name($1, $2)),$v1,0)
}
}
alias FBS.drugweed !return $iif($readini(FBS.weed.ini,WEED,$vcmp.name($1, $2)),$v1,0)
elseif ($3 == ad) {
if ($FBS.lin($1, $2) == $null) vcmp.msg $1 $2 Must be logged in.
elseif (!$4) vcmp.msg $1 $2 Syntax: ! $+ $3 <text>
elseif (%advert == on) vcmp.msg $1 $2 Advert already posted, wait 10secs to Advert again.
elseif ($FBS.actcash($1, $2) == 1) vcmp.msg $1 $2 You must have $50 to Advertise.
else {
FBS.DecCash $1 $2 50
set %advert On
vcmp.say $1 ** Advert: $4- $+ , Contact $vcmp.name($1, $2) $+ !
timer 1 10 set %advert off
}
}
elseif ($3 == taxi) {
if ($FBS.lin($1, $2) == $null) vcmp.msg $1 $2 Must be logged in.
else {
vcmp.say $1 ** Taxi Required: $vcmp.area($1, $2) - Caller: $vcmp.name($1, $2)
elseif ($3 == growweed) {
if ($FBS.lin($1, $2) == $null) vcmp.msg $1 $2 Must be logged in.
elseif (Weedfield !isin $FBS.Buildings(1, $2)) vcmp.msg $1 $2 You can only grow Weed in the Field.
elseif ($readini(FBS.weed.ini,PLANTED,$vcmp.name($1, $2)) == Planted) vcmp.msg $1 $2 You are already growing Weed, wait till you pick then grow some more.
else {
vcmp.msg $1 $2 You are now growing Weed, wait till it grows.
!writeini -n FBS.weed.ini PLANTED $vcmp.name($1, $2) Planted
timer 1 60 vcmp.msg $1 $2 Your weed has Grown. Type !pickweed to pick it.
!writeini -n FBS.weed.ini GROWN $vcmp.name($1, $2) Weedgrown
}
}
elseif ($3 == pickweed) {
if ($FBS.lin($1, $2) == $null) vcmp.msg $1 $2 Must be logged in.
elseif (Weedfield !isin $FBS.Buildings(1, $2)) vcmp.msg $1 $2 You Must be at the Field to Pick Weed.
elseif ($readini(FBS.weed.ini,GROWN,$vcmp.name($1, $2)) == $null) vcmp.msg $1 $2 You must Grow your Weed first.
else {
vcmp.msg $1 $2 You have picked up your Units of Weed.
!writeini -n FBS.weed.ini WEED $vcmp.name($1, $2) $calc($FBS.drugweed($1, $2) + 4)
!remini -n FBS.weed.ini PLANTED $vcmp.name($1, $2)
!remini -n FBS.weed.ini GROWN $vcmp.name($1, $2)
}
}
alias FBS.drugweed !return $iif($readini(FBS.weed.ini,WEED,$vcmp.name($1, $2)),$v1,0)
elseif ($2 == !wire) {
if ($vcmp.cmdcheck(!wire,%id) == fail) !halt
elseif (!$3) vcmp.msg %id Error - $2 <name> <amount>
elseif (%a == -1) vcmp.msg %id Invalid Name.
elseif ($4 !isnum) vcmp.msg %id Invalid Amount.
elseif (National Bank !isin $vcmp.area(%b)) vcmp.msg %id Must be at The Bank to Wire Transfer Money.
elseif (. isin $4) || (- isin $4) vcmp.msg %id No Negative or Decimal Point allowed.
elseif ($4 > $vcmp.bank(%b)) vcmp.msg %id You don't have this much in your Bank Account.
else {
vcmp.bank- %b $4
vcmp.bank+ %a $4
vcmp.msg %id You have Wired $ $+ $bytes($4,b) to $vcmp.name(%a) Bank Account.
}
}
Quote from: thijn on February 13, 2009, 02:54:10 PM
If you have the new DLL (wich I thought argo have) You can do it with vcmp.setplayermarker <serverID> <playerID> <color ID>
For a list of colors: here