 User Control Panel |
|
|
 |
Advertisements
|
|
|
|
|
HELP US, HELP YOU!
|
| Author |
Message |
funky_monkey
Young One
Joined: 27 Apr 2004
Posts: 86
  
|
 Posted: Sat May 01, 2004 5:12 pm Post subject: |
 |
|
| can some one please help me with the comand for add/ rem points comands and if you can do it so its added to the file, Files/comp.txt |
|
| Back to top |
|
 |
85thday
Senior Member
Joined: 20 Jan 2004
Posts: 260
|
| Posted: Thu May 06, 2004 12:25 pm Post subject: |
|
|
| Code: | | <br />if($msg =~ /^give (.+) (-?\d+)/i){<br /> my $points = 0;<br /> if (-e "./Commands/points/$1.txt"){<br /> open (POINTS, "<./Commands/points/$1.txt");<br /> $points = <POINTS>;<br /> close(POINTS);<br /> }<br /> $points += $2;<br /> open(POINTS, ">./Commands/points/$1.txt");<br /> print(POINTS "$points");<br /> close(POINTS);<br /> &send($self,"I Have Given $1 $2 points in total he has $points", "$username");<br />}<br /> |
to use do
.give - [number] email
.give + [number] email
or what every youre command char is like !/- ect |
|
| Back to top |
|
|
|
|
