All this goes into the Commands.tcl in scripts/lx Folder:
This two lines go in the upper paragraph of the file, just somewhere beetween 2 lines wich beginns with " (doublequotes)
"addmoney" { return [Commands::addmoney $player $cargs] }
"resmoney" { return [Commands::resmoney $player $cargs] }
This needed to be pasted in the lower paragraph, just scroll to the last line (has only a "}" sign).
Just paste in clear line before.
proc addmoney { player cargs } {
set sele [GetSelection $player]
set sname [GetName $sele]
set gg 00
set c [lindex $cargs 0]
set s [lindex $cargs 1]
set g [lindex $cargs 2]
ChangeMoney $player +$c
ChangeMoney $player +$s$gg
ChangeMoney $player +$g$gg$gg
return "$g Gold $s Silver $c Cooper added to $sname"}
proc resmoney { player cargs } {
set sele [GetSelection $player]
set sname [GetName $sele]
set gg 00
set c [lindex $cargs 0]
set s [lindex $cargs 1]
set g [lindex $cargs 2]
ChangeMoney $player -$c
ChangeMoney $player -$s$gg
ChangeMoney $player -$g$gg$gg
return "$g Gold $s Silver $c Cooper rested from $sname"}
Here an example how it should look after the pasting:
....
.....
.......
return ".rescp $cargs" } } <<<--->2nd last line before pasting>>>
proc addmoney { player cargs } {
set sele [GetSelection $player]
set sname [GetName $sele]
set gg 00
set c [lindex $cargs 0]
set s [lindex $cargs 1]
set g [lindex $cargs 2]
ChangeMoney $player +$c
ChangeMoney $player +$s$gg
ChangeMoney $player +$g$gg$gg
return "$g Gold $s Silver $c Cooper added to $sname"}
proc resmoney { player cargs } {
set sele [GetSelection $player]
set sname [GetName $sele]
set gg 00
set c [lindex $cargs 0]
set s [lindex $cargs 1]
set g [lindex $cargs 2]
ChangeMoney $player -$c
ChangeMoney $player -$s$gg
ChangeMoney $player -$g$gg$gg
return "$g Gold $s Silver $c Cooper rested from $sname"}
} <<<--------> this ist the lastline of the file>>>
Don't paste the <<< blabla>>> part ;)
Select a player, .addmoney <cooper> <silver> <gold> and to extract money from the player .resmoney <cooper> <silver> <gold>
if you only want to add for example gold you have to put a 0 in the non used money like this: .addmoney 0 0 1 this will add 1 gold.
I know the .add 7 gives you an item sellable for 1000g but this one edits directly your money, I like this one better.
Dont think I did it just pastet and explained the pasting from an blizzhackers article from Snake ;)
Have fun!
seth
This two lines go in the upper paragraph of the file, just somewhere beetween 2 lines wich beginns with " (doublequotes)
"addmoney" { return [Commands::addmoney $player $cargs] }
"resmoney" { return [Commands::resmoney $player $cargs] }
This needed to be pasted in the lower paragraph, just scroll to the last line (has only a "}" sign).
Just paste in clear line before.
proc addmoney { player cargs } {
set sele [GetSelection $player]
set sname [GetName $sele]
set gg 00
set c [lindex $cargs 0]
set s [lindex $cargs 1]
set g [lindex $cargs 2]
ChangeMoney $player +$c
ChangeMoney $player +$s$gg
ChangeMoney $player +$g$gg$gg
return "$g Gold $s Silver $c Cooper added to $sname"}
proc resmoney { player cargs } {
set sele [GetSelection $player]
set sname [GetName $sele]
set gg 00
set c [lindex $cargs 0]
set s [lindex $cargs 1]
set g [lindex $cargs 2]
ChangeMoney $player -$c
ChangeMoney $player -$s$gg
ChangeMoney $player -$g$gg$gg
return "$g Gold $s Silver $c Cooper rested from $sname"}
Here an example how it should look after the pasting:
....
.....
.......
return ".rescp $cargs" } } <<<--->2nd last line before pasting>>>
proc addmoney { player cargs } {
set sele [GetSelection $player]
set sname [GetName $sele]
set gg 00
set c [lindex $cargs 0]
set s [lindex $cargs 1]
set g [lindex $cargs 2]
ChangeMoney $player +$c
ChangeMoney $player +$s$gg
ChangeMoney $player +$g$gg$gg
return "$g Gold $s Silver $c Cooper added to $sname"}
proc resmoney { player cargs } {
set sele [GetSelection $player]
set sname [GetName $sele]
set gg 00
set c [lindex $cargs 0]
set s [lindex $cargs 1]
set g [lindex $cargs 2]
ChangeMoney $player -$c
ChangeMoney $player -$s$gg
ChangeMoney $player -$g$gg$gg
return "$g Gold $s Silver $c Cooper rested from $sname"}
} <<<--------> this ist the lastline of the file>>>
Don't paste the <<< blabla>>> part ;)
Select a player, .addmoney <cooper> <silver> <gold> and to extract money from the player .resmoney <cooper> <silver> <gold>
if you only want to add for example gold you have to put a 0 in the non used money like this: .addmoney 0 0 1 this will add 1 gold.
I know the .add 7 gives you an item sellable for 1000g but this one edits directly your money, I like this one better.
Dont think I did it just pastet and explained the pasting from an blizzhackers article from Snake ;)
Have fun!
seth