this is a code for a game that i play it works for me on there if you want you can make it your own
alias comma {
var %a, %b = $regsub($ticks,$1,/G([+-]?d+?)(?=(?:d{3})++(?=.d++$|$))/g,1 $+ $chr(44),%a)
return %a
}
on *:text:You have gained*:#:{
if ($4) && ($5 == more) && ($6 == strength) && ($7 == by) && ($8 == doing) && ($9 isnum) && ($10 == set(s)) && ($11 == of) && ($12 == reps.) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , you have gained $calc( $remove($4,$chr(44)) / $9 ) more Strength per set of training which is $calc( % [ $+ [ strength ] ] [ $+ [ $nick ] ] [ $+ [ 1gain ] ] - % [ $+ [ strength ] ] [ $+ [ $nick ] ] [ $+ [ 1gain ] ] [ $+ [ last ] ] ) more than your last train. ( $+ % [ $+ [ strengthgain ] ] [ $+ [ $nick ] ] [ $+ [ time ] ] $+ )
}
if ($4) && ($5 == more) && ($6 == speed) && ($7 == by) && ($8 == doing) && ($9 isnum) && ($10 == set(s)) && ($11 == of) && ($12 == running.) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , you have gained $calc( $remove($4,$chr(44)) / $9 ) more Speed per set of training which is $calc( % [ $+ [ speed ] ] [ $+ [ $nick ] ] [ $+ [ 1gain ] ] - % [ $+ [ speed ] ] [ $+ [ $nick ] ] [ $+ [ 1gain ] ] [ $+ [ last ] ] ) more than your last train. ( $+ % [ $+ [ speedgain ] ] [ $+ [ $nick ] ] [ $+ [ time ] ] $+ )
}
if ($4) && ($5 == more) && ($6 == defence) && ($7 == by) && ($8 == doing) && ($9 isnum) && ($10 == set(s)) && ($11 == of) && ($12 == moves.) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , you have gained $calc( $remove($4,$chr(44)) / $9 ) more Defence per set of training which is $calc( % [ $+ [ defence ] ] [ $+ [ $nick ] ] [ $+ [ 1gain ] ] - % [ $+ [ defence ] ] [ $+ [ $nick ] ] [ $+ [ 1gain ] ] [ $+ [ last ] ] ) more than your last train. ( $+ % [ $+ [ defencegain ] ] [ $+ [ $nick ] ] [ $+ [ time ] ] $+ )
}
if ($4) && ($5 == more) && ($6 == dexterity) && ($7 == by) && ($8 == doing) && ($9 isnum) && ($10 == set(s)) && ($11 == of) && ($12 == moves.) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , you have gained $calc( $remove($4,$chr(44)) / $9 ) more Dexterity per set of training which is $calc( % [ $+ [ dexterity ] ] [ $+ [ $nick ] ] [ $+ [ 1gain ] ] - % [ $+ [ dexterity ] ] [ $+ [ $nick ] ] [ $+ [ 1gain ] ] [ $+ [ last ] ] ) more than your last train. ( $+ % [ $+ [ dexteritygain ] ] [ $+ [ $nick ] ] [ $+ [ time ] ] $+ )
}
else { halt }
}
on *:text:!a*:#:{
if ($1 == !a) || ($1 == !alert) || ($1 == !alerts) {
if ($2 == $null) {
if (!$timer(.travel $+ $nick)) && (!$timer(.drugs $+ $nick)) && (!$timer(.energy $+ $nick)) && (!$timer(.hosp $+ $nick)) && (!$timer(.jail $+ $nick)) && (!$timer(.nerve $+ $nick)) && (!$timer(.happy $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , no alerts found. | halt
}
else {
if ($timer(.travel $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , I will remind you when you reach % [ $+ [ destination ] ] [ $+ [ $nick ] ] in $+ $duration($timer(.travel $+ $nick).secs) - $+ $chr(40) $+ $time($calc($gmt + $duration($duration($timer(.travel $+ $nick).secs).secs)))) TC Time $+ $chr(41) $+
}
if ($timer(.drugs $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , I will remind you when your % [ $+ [ drug ] ] [ $+ [ $nick ] ] effects have worn off in $+ $duration($timer(.drugs $+ $nick).secs) - $+ $chr(40) $+ $time($calc($gmt + $duration($duration($timer(.drugs $+ $nick).secs).secs)))) TC Time $+ $chr(41) $+
}
if ($timer(.energy $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , I will remind you when your Energy Bar should be full $+ $duration($timer(.energy $+ $nick).secs) - $+ $chr(40) $+ $time($calc($gmt + $duration($duration($timer(.energy $+ $nick).secs).secs)))) TC Time $+ $chr(41) $+
}
if ($timer(.nerve $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , I will remind you when your Nerve Bar should be full in $+ $duration($timer(.nerve $+ $nick).secs) - $+ $chr(40) $+ $time($calc($gmt + $duration($duration($timer(.nerve $+ $nick).secs).secs)))) TC Time $+ $chr(41) $+
}
if ($timer(.hosp $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , I will remind you when you are due to be released from hospital in $+ $duration($timer(.hosp $+ $nick).secs) - $+ $chr(40) $+ $time($calc($gmt + $duration($duration($timer(.hosp $+ $nick).secs).secs))) TC Time $+ $chr(41) $+
}
if ($timer(.jail $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , I will remind you when you are due to be released from jail in $+ $duration($timer(.jail $+ $nick).secs) - $+ $chr(40) $+ $time($calc($gmt + $duration($duration($timer(.jail $+ $nick).secs).secs)))) $+ $chr(41) $+
}
if ($timer(.happy $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , I will remind you when your Happy Bar should be full in $+ $duration($timer(.happy $+ $nick).secs) - $+ $chr(40) $+ $time($calc($gmt + $duration($duration($timer(.happy $+ $nick).secs).secs)))) $+ $chr(41) $+
}
}
}
if ($2 == off) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , all your alerts have been switched off.
.timer. $+ jail $+ $nick off
.timer. $+ happy $+ $nick off
.timer. $+ hosp $+ $nick off
.timer. $+ travel $+ $nick off
.timer. $+ drugs $+ $nick off
.timer. $+ energy $+ $nick off
.timer. $+ nerve $+ $nick off
}
else { halt }
}
}
on *:text:!nerve*:#:{
if ($2 == off) {
if ($timer(.nerve $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , your alert has been switched off.
.timer. $+ nerve $+ $nick off
}
else { halt }
}
else { halt }
}
on *:text:!happy*:#:{
if ($2 == off) {
if ($timer(.happy $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , your alert has been switched off.
.timer. $+ happy $+ $nick off
}
else { halt }
}
else { halt }
}
on *:text:!energy*:#:{
if ($2 == off) {
if ($timer(.energy $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , your alert has been switched off.
.timer. $+ energy $+ $nick off
}
else { halt }
}
else { halt }
}
on *:text:!drug*:#:{
if ($2 == off) {
if ($timer(.drugs $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , your alert has been switched off.
.timer. $+ drugs $+ $nick off
}
else { halt }
}
else { halt }
}
on *:text:!plane*:#:{
if ($2 == off) {
if ($timer(.travel $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , your alert has been switched off.
.timer. $+ travel $+ $nick off
}
else { halt }
}
else { halt }
}
on *:text:!travel*:#:{
if ($2 == off) {
if ($timer(.travel $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , your alert has been switched off.
.timer. $+ travel $+ $nick off
}
else { halt }
}
else { halt }
}
on *:text:!jail*:#:{
if ($2 == off) {
if ($timer(.jail $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , your alert has been switched off.
.timer. $+ jail $+ $nick off
}
else { halt }
}
else { halt }
}
on *:text:!hosp*:#:{
if ($2 == off) {
if ($timer(.hosp $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , your alert has been switched off.
.timer. $+ hosp $+ $nick off
}
else { halt }
}
else { halt }
}
on *:join:#:{
if ($nick == $me) { halt }
else {
if ($readini(ids.ini, ID, $nick)) { halt }
elseif (!$readini(ids.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ , we currently do not have an id saved for you. Please add it using !addid T orn_City_ID | halt }
}
}
on *:text:!trade*:#:{
if (!$2) {
if ($readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Trade with $+ $nick $+ : http://www.torncity.com/trade.php?step=start&userID= $+ $readini(tc.ini, ID, $nick) }
elseif (!$readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $nick $+ . Please add it using !addid T orn_City_ID }
}
if ($2) {
if ($readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Trade with $+ $2 $+ : http://www.torncity.com/trade.php?step=start&userID= $+ $readini(tc.ini, ID, $2) }
elseif (!$readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $2 $+ . Please add it using !addid T orn_City_ID }
}
else { halt }
}
on *:text:!bust*:#:{
if (!$2) {
if ($readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Bust $+ $nick $+ : http://www.torncity.com/jail1.php?XID= $+ $readini(tc.ini, ID, $nick) $+ &action=breakout }
elseif (!$readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $nick $+ . Please add it using !addid T orn_City_ID }
}
if ($2) {
if ($readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Bust $+ $2 $+ : http://www.torncity.com/jail1.php?XID= $+ $readini(tc.ini, ID, $2) $+ &action=breakout }
elseif (!$readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $2 $+ . Please add it using !addid T orn_City_ID }
}
else { halt }
}
on *:text:!attack*:#:{
if (!$2) {
if ($readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Attack $+ $nick $+ : http://www.torncity.com/attack.php?playerID= $+ $readini(tc.ini, ID, $nick) $+ &refreshcode=666 }
elseif (!$readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $nick $+ . Please add it using !addid T orn_City_ID }
}
if ($2) {
if ($readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Attack $+ $2 $+ : http://www.torncity.com/attack.php?playerID= $+ $readini(tc.ini, ID, $2) $+ &refreshcode=666 }
elseif (!$readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $2 $+ . Please add it using !addid T orn_City_ID }
}
else { halt }
}
on *:text:!bail*:#:{
if (!$2) {
if ($readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Bail $+ $nick $+ : http://www.torncity.com/jail1.php?XID= $+ $readini(tc.ini, ID, $nick) $+ &action=buy }
elseif (!$readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $nick $+ . Please add it using !addid T orn_City_ID }
}
if ($2) {
if ($readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Bail $+ $2 $+ : http://www.torncity.com/jail1.php?XID= $+ $readini(tc.ini, ID, $2) $+ &action=buy }
elseif (!$readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $2 $+ . Please add it using !addid T orn_City_ID }
}
else { halt }
}
on *:text:!mug*:#:{
if (!$2) {
if ($readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Mug $+ $nick $+ : http://www.torncity.com/attack.php?playerID= $+ $readini(tc.ini, ID, $nick) $+ &refreshcode=666 }
elseif (!$readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $nick $+ . Please add it using !addid T orn_City_ID }
}
if ($2) {
if ($readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Mug $+ $2 $+ : http://www.torncity.com/attack.php?playerID= $+ $readini(tc.ini, ID, $2) $+ &refreshcode=666 }
elseif (!$readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $2 $+ . Please add it using !addid T orn_City_ID }
}
else { halt }
}
on *:text:!revive*:#:{
if (!$2) {
if ($readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Revive $+ $nick $+ : http://www.torncity.com/revive.php?ID= $+ $readini(tc.ini, ID, $nick) }
elseif (!$readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $nick $+ . Please add it using !addid T orn_City_ID }
}
if ($2) {
if ($readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Revive $+ $2 $+ : http://www.torncity.com/revive.php?ID= $+ $readini(tc.ini, ID, $2) }
elseif (!$readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $2 $+ . Please add it using !addid T orn_City_ID }
}
else { halt }
}
on *:text:!mail*:#:{
if (!$2) {
if ($readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Mail $+ $nick $+ : http://www.torncity.com/messages.php?action=send&XID= $+ $readini(tc.ini, ID, $nick) }
elseif (!$readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $nick $+ . Please add it using !addid T orn_City_ID }
}
if ($2) {
if ($readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Mail $+ $2 $+ : http://www.torncity.com/messages.php?action=send&XID= $+ $readini(tc.ini, ID, $2) }
elseif (!$readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $2 $+ . Please add it using !addid T orn_City_ID }
}
else { halt }
}
on *:text:!cash*:#:{
if (!$2) {
if ($readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Send cash to $+ $nick $+ : http://www.torncity.com/sendcash.php?XID= $+ $readini(tc.ini, ID, $nick) }
elseif (!$readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $nick $+ . Please add it using !addid T orn_City_ID }
}
if ($2) {
if ($readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Send cash to $+ $2 $+ : http://www.torncity.com/sendcash.php?XID= $+ $readini(tc.ini, ID, $2) }
elseif (!$readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $2 $+ . Please add it using !addid T orn_City_ID }
}
else { halt }
}
on *:text:!friend*:#:{
if (!$2) {
if ($readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Be friends with $+ $nick $+ : http://www.torncity.com/friendlist.php?step=add&XID= $+ $readini(tc.ini, ID, $nick) }
elseif (!$readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $nick $+ . Please add it using !addid T orn_City_ID }
}
if ($2) {
if ($readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Be friends with $+ $2 $+ : http://www.torncity.com/friendlist.php?step=add&XID= $+ $readini(tc.ini, ID, $2) }
elseif (!$readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $2 $+ . Please add it using !addid T orn_City_ID }
}
else { halt }
}
on *:text:!enemy*:#:{
if (!$2) {
if ($readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Be enemies with $+ $nick $+ : http://www.torncity.com/blacklist.php?step=add&XID= $+ $readini(tc.ini, ID, $nick) }
elseif (!$readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $nick $+ . Please add it using !addid T orn_City_ID }
}
if ($2) {
if ($readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Be enemies with $+ $2 $+ : http://www.torncity.com/blacklist.php?step=add&XID= $+ $readini(tc.ini, ID, $2) }
elseif (!$readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $2 $+ . Please add it using !addid T orn_City_ID }
}
else { halt }
}
on *:text:!display*:#:{
if (!$2) {
if ($readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ 's display case: http://www.torncity.com/display.php?userID= $+ $readini(tc.ini, ID, $nick) }
elseif (!$readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $nick $+ . Please add it using !addid T orn_City_ID }
}
if ($2) {
if ($readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $2 $+ 's display case: http://www.torncity.com/display.php?userID= $+ $readini(tc.ini, ID, $2) }
elseif (!$readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $2 $+ . Please add it using !addid T orn_City_ID }
}
else { halt }
}
on *:text:!profile*:#:{
if (!$2) {
if ($readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ 's profile: http://www.torncity.com/profiles.php?XID= $+ $readini(tc.ini, ID, $nick) }
elseif (!$readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $nick $+ . Please add it using !addid T orn_City_ID }
}
if ($2) {
if ($readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $2 $+ 's profile: http://www.torncity.com/profiles.php?XID= $+ $readini(tc.ini, ID, $2) }
elseif (!$readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $2 $+ . Please add it using !addid T orn_City_ID }
}
else { halt }
}
on *:text:!properties*:#:{
if (!$2) {
if ($readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $nick $+ 's properties: http://www.torncity.com/properties.php?step=otherproperties&ID= $+ $readini(tc.ini, ID, $nick) }
elseif (!$readini(tc.ini, ID, $nick)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $nick $+ . Please add it using !addid T orn_City_ID }
}
if ($2) {
if ($readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ $+ $2 $+ 's properties: http://www.torncity.com/properties.php?step=otherproperties&ID= $+ $readini(tc.ini, ID, $2) }
elseif (!$readini(tc.ini, ID, $2)) { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ No ID found for $+ $2 $+ . Please add it using !addid T orn_City_ID }
}
else { halt }
}
on *:text:*drug*minutes*left*:#:{
var %dtime $calc(60* $4 )
var % [ $+ [ drug ] ] [ $+ [ $nick ] ] $remove($1,$chr(91))
.timer $+ .drugs $+ $nick -co 1 %dtime notice $nick Your % [ $+ [ drug ] ] [ $+ [ $nick ] ] effects should now be wearing off.
.msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Okay $+ $nick $+ , I will remind you in $+ $duration($timer(.drugs $+ $nick).secs) $+ mins when your % [ $+ [ drug ] ] [ $+ [ $nick ] ] effects should be wearing off. ( $+ $time($calc($gmt + $duration($duration($timer(.drugs $+ $nick).secs).secs)))) TC Time)
}
on *:text:*currently*plane*flying*:#: {
if ($16 isnum) {
set % [ $+ [ destination ] ] [ $+ [ $nick ] ] $9 $10
set %ptime $calc( $16 * 60)
.timer $+ .travel $+ $nick -co 1 %ptime notice $nick You are now landing at % [ $+ [ destination ] ] [ $+ [ $nick ] ]
.msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Okay $+ $nick $+ , I will remind you in $+ $duration($timer(.travel $+ $nick).secs) $+ that you are due to land in % [ $+ [ destination ] ] [ $+ [ $nick ] ] ( $+ $time($calc($gmt + $duration($duration($timer(.travel $+ $nick).secs).secs)))) TC Time)
}
else {
set % [ $+ [ destination ] ] [ $+ [ $nick ] ] $9
set %ptime $calc( $15 * 60)
.timer $+ .travel $+ $nick -co 1 %ptime notice $nick You are now landing at % [ $+ [ destination ] ] [ $+ [ $nick ] ]
.msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Okay $+ $nick $+ , I will remind you in $+ $duration($timer(.travel $+ $nick).secs) $+ that you are due to land in % [ $+ [ destination ] ] [ $+ [ $nick ] ] ( $+ $time($calc($gmt + $duration($duration($timer(.travel $+ $nick).secs).secs)))) TC Time)
}
else { halt }
}
on *:text:!calc*:#:{
if ($2- isletter a-zA-Z) { halt }
else { msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $2- = $comma($calc($remove($2-,$chr(44)))) }
}
on *:text:Nerve*:#:{
if ($chr(47) isin $2) {
var %temp.nerve = $replace($2,/,$chr(32) $chr(32))
var %bar.nerve = $right(%temp.nerve,2)
var %nerve = $left(%temp.nerve,2)
var %min.nerve = $asctime($calc($gmt + %daylight),nn)
var %sec.nerve = $asctime($calc($gmt + %daylight),ss)
var %secs.passed.nerve = $calc(%min.nerve * 60 + %sec.nerve)
while (%secs.passed.nerve > 300) {
var %secs.passed.nerve = $calc(%secs.passed.nerve - 300)
}
var %refill.nerve = $calc(300 - %secs.passed.nerve + (%bar.nerve - %nerve - 1) * 300)
.timer $+ .nerve $+ $nick -co 1 %refill.nerve notice $nick Your Nerve Bar is now full $nick $+ .
.msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Okay $+ $nick $+ , I will remind you in $+ $duration($timer(.nerve $+ $nick).secs) $+ when your Nerve Bar has fully regenerated. ( $+ $time($calc($gmt + $duration($duration($timer(.nerve $+ $nick).secs).secs)))) TC Time)
}
else { halt }
}
on *:text:Happy*:#:{
if ($chr(47) isin $2) {
var %temp.happy = $replace($2,/,$chr(32) $chr(32))
var %bar.happy = $right(%temp.happy,4)
var %happy = $left(%temp.happy,4)
var %min.happy = $asctime($calc($gmt + %daylight),nn)
var %sec.happy = $asctime($calc($gmt + %daylight),ss)
var %secs.passed.happy = $calc(%min.happy * 60 + %sec.happy)
while (%secs.passed.happy > 900) {
var %secs.passed.happy = $calc(%secs.passed.happy - 900)
}
var %refill.happy = $calc($calc($calc($calc($calc(%bar.happy - %energy.happy) - 5) / 5) * 15) * 60)
.timer $+ .happy $+ $nick -co 1 $calc($calc(900 - %secs.passed.happy) + %refill.happy) notice $nick your Happy Bar is now full $nick $+ .
.msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Okay $+ $nick $+ , I will remind you in $+ $duration($timer(.happy $+ $nick).secs) $+ when your Happy Bar has fully regenerated. ( $+ $time($calc($gmt + $duration($duration($timer(.happy $+ $nick).secs).secs))) TC Time)
}
else { halt }
}
on *:text:Energy*:#:{
if ($chr(47) isin $2) {
var %temp.energy = $replace($2,/,$chr(32) $chr(32))
var %bar = $right(%temp.energy,3)
var %energy = $left(%temp.energy,3)
if (%bar == 150) {
var %min = $asctime($calc($gmt + %daylight),nn)
var %sec = $asctime($calc($gmt + %daylight),ss)
var %secs.passed = $calc(%min * 60 + %sec)
while (%secs.passed > 600) {
var %secs.passed = $calc(%secs.passed - 600)
}
var %refill = $calc($calc($calc($calc($calc(%bar - %energy) - 5) / 5) * 10) * 60)
.timer $+ .energy $+ $nick -co 1 $calc($calc(600 - %secs.passed) + %refill) notice $nick Your Energy Bar is now full $nick $+ .
.msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Okay $+ $nick $+ , I will remind you in $+ $duration($timer(.energy $+ $nick).secs) $+ when your Energy Bar has fully regenerated. ( $+ $time($calc($gmt + $duration($duration($timer(.energy $+ $nick).secs).secs)))) TC Time)
}
else {
var %min = $asctime($calc($gmt + %daylight),nn)
var %sec = $asctime($calc($gmt + %daylight),ss)
var %secs.passed = $calc(%min * 60 + %sec)
while (%secs.passed > 900) {
var %secs.passed = $calc(%secs.passed - 900)
}
var %refill = $calc($calc($calc($calc($calc(%bar - %energy) - 5) / 5) * 15) * 60)
.timer $+ .energy $+ $nick -co 1 $calc($calc(900 - %secs.passed) + %refill) notice $nick your Energy Bar is now full $nick $+ .
.msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Okay $+ $nick $+ , I will remind you in $+ $duration($timer(.energy $+ $nick).secs) $+ when your Energy Bar has fully regenerated. ( $+ $time($calc($gmt + $duration($duration($timer(.energy $+ $nick).secs).secs)))) TC Time)
}
else { halt }
}
else { halt }
}
on *:TEXT:You are in hospital for*:#:{
if ($7 == hours,) || ($7 == hour) {
var %h = $calc($6 * 3600)
}
if (%h == $null) {
var %h = 0
}
if ($9 == minutes) || ($9 == minute) {
var %m = $calc($8 * 60)
}
if ($7 == minutes) || ($7 == minute) {
var %m = $calc($6 * 60)
}
if (%m == $null) {
var %m = 0
}
if ($12 == seconds) {
var %s = $11
}
if ($9 == seconds) {
var %s = $8
}
if ($7 == seconds) {
var %s = $6
}
if (%s == $null) {
var %s = 0
}
var %ptime = $calc(%h + %m)
var %htime = $calc(%ptime + %s)
.timer $+ .hosp $+ $nick -co 1 %htime notice $nick You are due to be released from hospital.
.msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Okay $+ $nick $+ , I will remind you in $+ $duration($timer(.hosp $+ $nick).secs) when you are due to be released from the hospital. ( $+ $time($calc($gmt + $duration($duration($timer(.hosp $+ $nick).secs).secs)))) TC Time)
}
on *:TEXT:You will be in jail for*:#:{
if ($8 == hours,) || ($8 == hour) {
var %h = $calc($7 * 3600)
}
if (%h == $null) {
var %h = 0
}
if ($10 == minutes) || ($10 == minute) {
var %m = $calc($9 * 60)
}
if ($8 == minutes) || ($8 == minute) {
var %m = $calc($7 * 60)
}
if (%m == $null) {
var %m = 0
}
if ($13 == seconds) {
var %s = $12
}
if ($10 == seconds) {
var %s = $9
}
if ($8 == seconds) {
var %s = $7
}
if (%s == $null) {
var %s = 0
}
var %ptime = $calc(%h + %m)
var %jtime = $calc(%ptime + %s)
.timer $+ .jail $+ $nick -co 1 %jtime notice $nick You are due to be released from jail.
.msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ Okay $+ $nick $+ , I will remind you in $+ $duration($timer(.jail $+ $nick).secs) $+ when you are due to be released from the jail. ( $+ $time($calc($gmt + $duration($duration($timer(.jail $+ $nick).secs).secs)))) TC Time)
}
on *:text:!time:#:{
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] $+ It is currently $+ $time $+ TC Time.
}
on *:TEXT:!addid*:#: {
if ($read(Id.txt, s, $2)) { msg $chan %color 4 That ID has already been added as $read(Id.txt, s, $2) If it is incorrect then please get that individual to PM an OP to delete it and re-add their ID }
if ($3) {
if (!$read(Id.txt, s, $2)) {
if ($3 !isnum) { msg $chan %color $2 $3 is not an ID , use !addid NICK ID }
if ($3 isnum) { write Id.txt $2 $3 | msg $chan %color 4 ID Added. }
else { msg $chan %color [ $+ [ # ] ] Please follow the correct command. !addid Name ID }
}
}
}
hi
alias comma is for what?
unless to put "else { halt }" u can revove it all
if ($readini(ids.ini, ID, $nick))!!!
attention here if the nick = [nick] into the ini file will be writed ~nick~ so better use file.txt or hash tables
for
on *:text:!a*:#:{
if ($1 == !a) || ($1 == !alert) || ($1 == !alerts)
u can put it like that
on *:text:*:#:{
if ($istok(!a.!alert.!alerts,$1,46))
u can also type one event
on *:text:*:#:{
if ($1 == You have gained) {
if ($4) && ($5 == more) && ..... {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] .....
}
}
elseif ($istok(!a.!alert.!alerts,$1,46)) {
if ($2 == $null) {
if (!$timer(.travel $+ $nick)) && ......
msg $chan $+ % [ $+ [ color ] ] .....
}
}
elseif ($1 == !nerve) {
if ($2 == off) {
if ($timer(.nerve $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] .....
.....
}
}
}
elseif ($1 == !happy) {
if ($2 == off) {
if ($timer(.happy $+ $nick)) {
msg $chan $+ % [ $+ [ color ] ] [ $+ [ $chan ] ] .....
....
}
}
}
elseif ..... .....
... ... ... ..
... ...
...
elseif ($1 == !addid) {
if ($read(Id.txt,s,$2)) { msg $chan %color ... their ID }
if ($3) {
if (!$read(Id.txt,s,$2)) {
if ($3 !isnum) { msg $chan % ...... }
}
}
}
}