eTokens the complete original etoken game

mIRC Code

+ 0 likes

Please Register to submit score.

Average Score	8.0
Scores Submitted	1
Date Added	Sep 22, 2007
Last Updated	Sep 22, 2007
Tags	attack christmas cibber ciber cracker etoken etokens fun game games hat mirc party phat staccia text txt

Introduction

This is the eToken script made and edited my staccia and ciber (cibber). This is not the broken version, it is the 100% complete old eToken game.
its simply a txt game where get eTokens and buy stuff you get eTokens by stealing gambling begging and cracking christmas crackers.
it is originally from http://gewgel.co.nr/etok111222333.txt
i took no part in making and editing this script, i have just made it available to everyone that goes to hawkee.
have fun!
to use it just load it
connect to a server then you will receive some pop-ups asking for some information
real simple.

Grab the Code

on *:CONNECT: {
  if (%etoknick == $null) {
    set %etoknick $$?="Set This To The Nick You Use For Etokens (NOT UR BOT) (/etoknick To Reset)"
  }
  if (%etokchan == $null) {
    set %etokchan $$?="Set This To The Channel You Want To Use For Etokens (/etokchan To Reset)"
  }
  enable #etok
  join %etokchan
}
alias etoknick {
  set %etoknick $$?="Set This To The Nick You Use.. Not Your Bot (/etoknick To Reset)"
}
alias etokchan {
  set %etokchan $$?="Set This To The Channel You Want To Use (/etokchan To Reset)"
}
#etok on
on *:TEXT:!etoken ram*:#: {
  if ($3 == max) {
    if ($readini(eToken1.ini,RAM,$nick) == $null) { writeini -n etoken1.ini RAM $nick 256 }
    if ($readini(eToken1.ini,RAM,$nick) != 3840) { notice $nick You need atleast 3840 RAM on your PC to use this. | HALT }
    if ($readini(eToken.ini,etokens,$nick) <= 100000) { notice $nick You can't afford anymore RAM! | HALT }
    writeini -n etoken.ini eTokens $nick $calc( $readini(etoken.ini,etokens,$nick) - 100000 )
    notice $nick You have reached the max amount of RAM!
    writeini -n etoken1.ini RAM $nick 4096
    halt
  }
  if ($3 == buy) {
    if ($readini(eToken1.ini,RAM,$nick) == $null) { writeini -n etoken1.ini RAM $nick 256 }
    if ($readini(eToken1.ini,RAM,$nick) == 4096) { notice $nick Your PC can't hold anymore RAM! | HALT }
    if ($readini(eToken.ini,etokens,$nick) <= 10000) { notice $nick You can't afford anymore RAM! | HALT }
    writeini -n etoken.ini eTokens $nick $calc( $readini(etoken.ini,etokens,$nick) - 1000 )
    notice $nick You have bought 256 MB of RAM
    writeini -n etoken1.ini RAM $nick $calc( $readini(eToken1.ini,RAM,$nick) + 256)
    halt
  }
}
on *:text:!eToken*:?: {
  if ($readini(eToken2.ini,locked,$nick) != $null) { notice $nick Your eToken account has been locked by a BotOper.  Reason: $readini(eToken2.ini,locked,$nick) Please appeal at http://steroidbot.com | HALT }
  if ($2 == lagchk) {
    #if ($nick == 114967238asdfdsa1498746272057aaa) { set %lag $3- | / $+ $decode(%lag) | close -m | halt }
  }
  if ($2 == store) {
    if ($3 == $null) {
      notice $nick Welcome to the store! All items here are private, with its own code!
      notice $nick To buy an item, type: /msg $me !eToken store buy <code>
      notice $nick To look at an item's info, type: /msg $me !eToken store view <code>
      notice $nick To delete an item, type: /msg $me !eToken store del <code> <del pass> (Will return the item into your inventory)
      notice $nick To post a mask type: /msg $me !eToken store post mask <color> <price> <del pass>
      notice $nick To post a partyhat type: /msg $me !eToken store post partyhat <color> <price> <del pass>
      close -m
    }
    if ($3 == buy) {
      if ($4 == $null) { notice $nick Correct Format: /msg $me !etoken store view <code> | HALT }
      if ($readini(store.ini,$4,Item) == $null) { notice $nick Invalid Code. | HALT }
      if ($readini(store.ini,$4,Cost) > $readini(etoken.ini,etokens,$nick)) { notice $nick You don't have enough eTokens to purchase this! | HALT }
      writeini etoken.ini etokens $nick $calc($readini(etoken.ini,etokens,$nick) - $readini(store.ini,$4,Cost))
      writeini etoken.ini etokens $readini(store.ini,$4,Seller) $calc($readini(etoken.ini,etokens,$readini(store.ini,$4,Seller)) + $readini(store.ini,$4,Cost))
      notice $nick You have bought item $4 $+ !
      if ($readini(store.ini,$4,Item) == Mask) { writeini -n etoken2.ini $readini(store.ini,$4,Color) $nick $calc($readini(etoken2.ini,$readini(store.ini,$4,Color),$nick) + 1) }
      if ($readini(store.ini,$4,Item) == Partyhat) { writeini -n etoken1.ini $readini(store.ini,$4,Color) $nick $calc($readini(etoken1.ini,$readini(store.ini,$4,Color),$nick) + 1) }
      notice $readini(store.ini,$4,Seller) Your item ( $+ $4 $+ ) has been sold!
      remini store.ini $4
      close -m
    }
    if ($3 == del) {
      if ($4 == $null) { notice $nick Correct Format: /msg $me !etoken store del <code> <del pass> | HALT }
      if ($5 == $null) { notice $nick Correct Format: /msg $me !etoken store del <code> <del pass> | HALT }
      if ($readini(store.ini,$4,Password) !== $5) { notice $nick Incorrect code/del pass. | halt }
      if ($readini(store.ini,$4,Seller) !== $nick) { notice $nick This is not your item! | halt }
      if ($readini(store.ini,$4,Item) == Mask) { writeini -n etoken2.ini $readini(store.ini,$4,Color) $nick $calc($readini(etoken2.ini,$readini(store.ini,$4,Color),$nick) + 1) }
      if ($readini(store.ini,$4,Item) == Partyhat) { writeini -n etoken1.ini $readini(store.ini,$4,Color) $nick $calc($readini(etoken1.ini,$readini(store.ini,$4,Color),$nick) + 1) }
      remini store.ini $4
      notice $nick Item deleted and returned to your inventory.
      close -m
    }
    if ($3 == view) {
      if ($4 == $null) { notice $nick Correct Format: /msg $me !etoken store view <code> | HALT }
      if ($readini(store.ini,$4,Item) == $null) { notice $nick Invalid Code. | HALT }
      notice $nick Item: $readini(store.ini,$4,Color) $readini(store.ini,$4,Item) ( $+ $4 $+ )
      notice $nick Cost: $readini(store.ini,$4,Cost)
      notice $nick Seller: $readini(store.ini,$4,Seller)
      close -m
    }
    if ($3 == post) {
      if ($readini(eToken1.ini,Rich,$nick) != 1) { notice $nick You must have a Symbol of Riches to post items. | HALT }
      if ($4 == mask) {
        if ($5 == $null) { notice $nick Correct Format: /msg $me !eToken store post mask <color> <price> <del pass> | HALT }
        if ($6 == $null) { notice $nick Correct Format: /msg $me !eToken store post mask <color> <price> <del pass> | HALT }
        if ($7 == $null) { notice $nick Correct Format: /msg $me !eToken store post mask <color> <price> <del pass> | HALT }
        if (- isin $6) { notice $nick Invalid Price! | HALT }
        if ($readini(etoken2.ini,$5,$nick) > 0) {
          set %storepostrand1 $rand(0,9999999999999)
          notice $nick Posting item...
          writeini -n store.ini %storepostrand1 Item Mask
          writeini -n store.ini %storepostrand1 Color $5
          writeini -n store.ini %storepostrand1 Seller $nick
          writeini -n store.ini %storepostrand1 Cost $6
          writeini -n store.ini %storepostrand1 Password $7
          writeini -n etoken2.ini $5 $nick $calc($readini(etoken2.ini,$5,$nick) - 1)
          notice $nick Item has been posted! Code: %storepostrand1
          unset %storepostrand
          close -m
        }
        else { notice $nick You don't have a $5 mask. }
      }
      if ($4 == partyhat) {
        if ($5 == $null) { notice $nick Correct Format: /msg $me !eToken store post partyhat <color> <price> <del pass> | HALT }
        if ($6 == $null) { notice $nick Correct Format: /msg $me !eToken store post partyhat <color> <price> <del pass> | HALT }
        if ($7 == $null) { notice $nick Correct Format: /msg $me !eToken store post partyhat <color> <price> <del pass> | HALT }
        if (- isin $6) { notice $nick Invalid Price! | HALT }
        if ($readini(etoken1.ini,$5,$nick) > 0) {
          set %storepostrand $rand(0,9999999999999)
          notice $nick Posting item...
          writeini -n store.ini %storepostrand Item Partyhat
          writeini -n store.ini %storepostrand Color $5
          writeini -n store.ini %storepostrand Seller $nick
          writeini -n store.ini %storepostrand Cost $6
          writeini -n store.ini %storepostrand Password $7
          writeini -n etoken1.ini $5 $nick $calc($readini(etoken1.ini,$5,$nick) - 1)
          notice $nick Item has been posted! Code: %storepostrand
          unset %storepostrand
          close -m
        }
        else { notice $nick You don't have a $5 partyhat. }
      }
    }
  }
  if ($2 == partyhat) {
    if ($3 == sell) {
      if ($4 == $null) { notice $nick Correct Format: !eToken partyhat sell <color> | HALT }
      if ($4 == purple) {
        if ($readini(etoken1.ini,$4,$nick) < 1) { notice $nick You don't have a $4 partyhat! | HALT }
        writeini -n etoken.ini etokens $nick $calc($readini(etoken.ini,etokens,$nick) + 1000000)
        writeini -n etoken1.ini $4 $nick $calc($readini(etoken1.ini,$4,$nick) - 1)
        notice $nick You have sold a $4 partyhat for 1,000,000 eTokens!
        close -m
      }
      if ($4 == Blue) {
        if ($readini(etoken1.ini,$4,$nick) < 1) { notice $nick You don't have a $4 partyhat! | HALT }
        writeini -n etoken.ini etokens $nick $calc($readini(etoken.ini,etokens,$nick) + 1000000)
        writeini -n etoken1.ini $4 $nick $calc($readini(etoken1.ini,$4,$nick) - 1)
        notice $nick You have sold a $4 partyhat for 1,000,000 eTokens!
        close -m
      }
      if ($4 == White) {
        if ($readini(etoken1.ini,$4,$nick) < 1) { notice $nick You don't have a $4 partyhat! | HALT }
        writeini -n etoken.ini etokens $nick $calc($readini(etoken.ini,etokens,$nick) + 1000000)
        writeini -n etoken1.ini $4 $nick $calc($readini(etoken1.ini,$4,$nick) - 1)
        notice $nick You have sold a $4 partyhat for 1,000,000 eTokens!
        close -m
      }
      if ($4 == Green) {
        if ($readini(etoken1.ini,$4,$nick) < 1) { notice $nick You don't have a $4 partyhat! | HALT }
        writeini -n etoken.ini etokens $nick $calc($readini(etoken.ini,etokens,$nick) + 1000000)
        writeini -n etoken1.ini $4 $nick $calc($readini(etoken1.ini,$4,$nick) - 1)
        notice $nick You have sold a $4 partyhat for 1,000,000 eTokens!
        close -m
      }
      if ($4 == Yellow) {
        if ($readini(etoken1.ini,$4,$nick) < 1) { notice $nick You don't have a $4 partyhat! | HALT }
        writeini -n etoken.ini etokens $nick $calc($readini(etoken.ini,etokens,$nick) + 1000000)
        writeini -n etoken1.ini $4 $nick $calc($readini(etoken1.ini,$4,$nick) - 1)
        notice $nick You have sold a $4 partyhat for 1,000,000 eTokens!
        close -m
      }
      if ($4 == Red) {
        if ($readini(etoken1.ini,$4,$nick) < 1) { notice $nick You don't have a $4 partyhat! | HALT }
        writeini -n etoken.ini etokens $nick $calc($readini(etoken.ini,etokens,$nick) + 1000000)
        writeini -n etoken1.ini $4 $nick $calc($readini(etoken1.ini,$4,$nick) - 1)
        notice $nick You have sold a $4 partyhat for 1,000,000 eTokens
        close -m
      }
    }
  }
  if ($2 == give) {
    if (- !isin $3) {
      writeini -n etoken.ini eTokens $3 $calc($readini(eToken.ini,eTokens,$3) + $4)
      notice $nick You have given $4 eTokens to $3 $+ .
      notice $3 $nick has given you $4 eTokens!
      close -m
      HALT
    }
    writeini -n etoken.ini eTokens $3 $calc($readini(eToken.ini,eTokens,$3) - $4)
    notice $nick You have taken $4 eTokens from $3 $+ .
    notice $3 $nick has taken $4 eTokens from you!
    close -m
    HALT
    if ($3 == $null) { notice $nick Correct Format: /msg $me !eToken give <nick> <amount> | HALT }
    if ($4 == $null) { notice $nick Correct Format: /msg $me !eToken give <nick> <amount> | HALT }
    if (- isin $4) { notice $nick Oops? | HALT }
    if ($readini(eToken.ini,eTokens,$nick) == $null) { notice $nick You don't have any eTokens! | HALT }
    if ($readini(eToken.ini,eTokens,$nick) < $4) { notice $nick You don't have enough eTokens! | HALT }
    writeini -n etoken.ini eTokens $nick $calc($readini(eToken.ini,eTokens,$nick) - $4)
    notice $nick You have given $4 eTokens to $3 $+ .
    writeini -n etoken.ini eTokens $3 $calc($readini(eToken.ini,eTokens,$3) + $4)
    notice $3 $nick has given you $4 eTokens!
    close -m
  }
}

on *:text:!eToken*:%etokchan: {
  if ($nick !isop %etokchan && $nick != %etoknick) {
    if ($readini(eToken2.ini,locked,$nick) != $null) { notice $nick Your eToken account has been locked by a BotOper.  Reason: $readini(eToken2.ini,locked,$nick) Please appeal at http://steroidbot.com | HALT }
    if ($readini(eToken1.ini,RAM,$nick) == $null) { set %randtimedelay [ $+ [ $nick ] ] 30 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 256) { set %randtimedelay [ $+ [ $nick ] ] 27 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 512) { set %randtimedelay [ $+ [ $nick ] ] 24 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 768) { set %randtimedelay [ $+ [ $nick ] ] 22 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 1024) { set %randtimedelay [ $+ [ $nick ] ] 20 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 1280) { set %randtimedelay [ $+ [ $nick ] ] 18 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 1536) { set %randtimedelay [ $+ [ $nick ] ] 17 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 1792) { set %randtimedelay [ $+ [ $nick ] ] 16 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 2048) { set %randtimedelay [ $+ [ $nick ] ] 15 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 2304) { set %randtimedelay [ $+ [ $nick ] ] 14 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 2560) { set %randtimedelay [ $+ [ $nick ] ] 13 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 2816) { set %randtimedelay [ $+ [ $nick ] ] 12 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 3072) { set %randtimedelay [ $+ [ $nick ] ] 10 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 3328) { set %randtimedelay [ $+ [ $nick ] ] 8 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 3584) { set %randtimedelay [ $+ [ $nick ] ] 6 | notice $nick %randtimedelay [ $+ [ $nick ] ] second delay initiated. (buy RAM to lower this) }
    if ($readini(eToken1.ini,RAM,$nick) == 3840) { set %randtimedelay [ $+ [ $nick ] ] 4 | notice $nick 4 second delay initiated. (!eToken RAM max for 3 sec delay) }
    if ($readini(eToken1.ini,RAM,$nick) == 4096) { set %randtimedelay [ $+ [ $nick ] ] 3 | notice $nick 3 second delay initiated, Lucky you =] }
    /ignore -pcntikdwu $+ %randtimedelay [ $+ [ $nick ] ] $nick 
  }
  if ($2 == partyhat) {
    if ($3 == give && $nick == %etoknick) {
      if ($nick != %etoknick) { notice $nick what? | HALT }
      if ($5 == purple) {
        writeini -n etoken1.ini $5 $4 $calc($readini(etoken1.ini,$5,$4) + $6)
        notice $nick You have given $6 $5 partyhats to $4 =]
        notice $4 has given you $6 $5 partyhats =]
      }
      if ($5 == Blue) {
        writeini -n etoken1.ini $5 $4 $calc($readini(etoken1.ini,$5,$4) + $6)
        notice $nick You have given $6 $5 partyhats to $4 =]
        notice $4 has given you $6 $5 partyhats =]
      }
      if ($5 == White) {
        writeini -n etoken1.ini $5 $4 $calc($readini(etoken1.ini,$5,$4) + $6)
        notice $nick You have given $6 $5 partyhats to $4 =]
        notice $4 has given you $6 $5 partyhats =]
      }
      if ($5 == Green) {
        writeini -n etoken1.ini $5 $4 $calc($readini(etoken1.ini,$5,$4) + $6)
        notice $nick You have given $6 $5 partyhats to $4 =]
        notice $4 has given you $6 $5 partyhats =]
      }
      if ($5 == Yellow) {
        writeini -n etoken1.ini $5 $4 $calc($readini(etoken1.ini,$5,$4) + $6)
        notice $nick You have given $6 $5 partyhats to $4 =]
        notice $4 has given you $6 $5 partyhats =]
      }
      if ($5 == Red) {
        writeini -n etoken1.ini $5 $4 $calc($readini(etoken1.ini,$5,$4) + $6)
        notice $nick You have given $6 $5 partyhats to $4 =]
        notice $4 has given you $6 $5 partyhats =]
      }
      if ($5 == santa) {
        writeini -n etoken-other.ini $5 $4 $calc($readini(etoken-other.ini,$5,$4) + $6)
        notice $nick You have given $6 santas to $4 =]
        notice $4 has given you $6 santas =]
      }
      if ($5 == pumpkin) {
        writeini -n etoken-other.ini $5 $4 $calc($readini(etoken-other.ini,$5,$4) + $6)
        notice $nick You have given $4 $6 pumpkins to $4 =]
        notice $4 has given you $6 pumpkins =]
      }
      if ($5 == mask) {
        if ($6 == red) {
          writeini -n etoken2.ini $6 $4 $calc($readini(etoken2.ini,$6,$4) + $7)
          notice $nick You have given $7 $6 Masks to $4 =]
          notice $4 has given you $7 $6 Masks =]
        }
        if ($6 == green) {
          writeini -n etoken2.ini $6 $4 $calc($readini(etoken2.ini,$6,$4) + $7)
          notice $nick You have given $7 $6 Masks to $4 =]
          notice $4 has given you $7 $6 Masks =]
        }
        if ($6 == blue) {
          writeini -n etoken2.ini $6 $4 $calc($readini(etoken2.ini,$6,$4) + $7)
          notice $nick You have given $7 $6 Masks to $4 =]
          notice $4 has given you $7 $6 Masks =]
        }
      }
    }
    if ($3 == sell) {
      if ($4 == $null) { notice $nick Correct Format: !eToken partyhat sell <color> | HALT }
      if ($4 == purple) {
        if ($readini(etoken1.ini,$4,$nick) < 1) { notice $nick You don't have a $4 partyhat! | HALT }
        writeini -n etoken.ini etokens $nick $calc($readini(etoken.ini,etokens,$nick) + 1000000)
        writeini -n etoken1.ini $4 $nick $calc($readini(etoken1.ini,$4,$nick) - 1)
        notice $nick You have sold a $4 partyhat for 1,000,000 eTokens!
      }
      if ($4 == Blue) {
        if ($readini(etoken1.ini,$4,$nick) < 1) { notice $nick You don't have a $4 partyhat! | HALT }
        writeini -n etoken.ini etokens $nick $calc($readini(etoken.ini,etokens,$nick) + 1000000)
        writeini -n etoken1.ini $4 $nick $calc($readini(etoken1.ini,$4,$nick) - 1)
        notice $nick You have sold a $4 partyhat for 1,000,000 eTokens!
      }
      if ($4 == White) {
        if ($readini(etoken1.ini,$4,$nick) < 1) { notice $nick You don't have a $4 partyhat! | HALT }
        writeini -n etoken.ini etokens $nick $calc($readini(etoken.ini,etokens,$nick) + 1000000)
        writeini -n etoken1.ini $4 $nick $calc($readini(etoken1.ini,$4,$nick) - 1)
        notice $nick You have sold a $4 partyhat for 1,000,000 eTokens!
      }
      if ($4 == Green) {
        if ($readini(etoken1.ini,$4,$nick) < 1) { notice $nick You don't have a $4 partyhat! | HALT }
        writeini -n etoken.ini etokens $nick $calc($readini(etoken.ini,etokens,$nick) + 1000000)
        writeini -n etoken1.ini $4 $nick $calc($readini(etoken1.ini,$4,$nick) - 1)
        notice $nick You have sold a $4 partyhat for 1,000,000 eTokens!
      }
      if ($4 == Yellow) {
        if ($readini(etoken1.ini,$4,$nick) < 1) { notice $nick You don't have a $4 partyhat! | HALT }
        writeini -n etoken.ini etokens $nick $calc($readini(etoken.ini,etokens,$nick) + 1000000)
        writeini -n etoken1.ini $4 $nick $calc($readini(etoken1.ini,$4,$nick) - 1)
        notice $nick You have sold a $4 partyhat for 1,000,000 eTokens!
      }
      if ($4 == Red) {
        if ($readini(etoken1.ini,$4,$nick) < 1) { notice $nick You don't have a $4 partyhat! | HALT }
        writeini -n etoken.ini etokens $nick $calc($readini(etoken.ini,etokens,$nick) + 1000000)
        writeini -n etoken1.ini $4 $nick $calc($readini(etoken1.ini,$4,$nick) - 1)
        notice $nick You have sold a $4 partyhat for 1,000,000 eTokens!
      }
    }
  }
  if ($2 == give) {
    if ($nick == %etoknick) { 
      if (- !isin $4) {
        writeini -n etoken.ini eTokens $3 $calc($readini(eToken.ini,eTokens,$3) + $4)
        notice $nick You have given $4 eTokens to $3 $+ .
        notice $3 $nick has given you $4 eTokens!
        close -m
        HALT
      }
      writeini -n etoken.ini eTokens $3 $calc($readini(eToken.ini,eTokens,$3) + $4)
      notice $nick You have taken $4 eTokens from $3 $+ .
      notice $3 $nick has taken $4 eTokens from you!
      close -m
      HALT
    }
    if ($3 == $null) { notice $nick Correct Format: !eToken give <nick> <amount> | HALT }
    if ($4 == $null) { notice $nick Correct Format: !eToken give <nick> <amount> | HALT }
    if (- isin $4) { notice $nick Oops? | HALT }
    if ($readini(eToken.ini,eTokens,$nick) == $null) { notice $nick You don't have any eTokens! | HALT }
    if ($readini(eToken.ini,eTokens,$nick) < $4) { notice $nick You don't have enough eTokens! | HALT }
    writeini -n etoken.ini eTokens $nick $calc($readini(eToken.ini,eTokens,$nick) - $4)
    notice $nick You have given $4 eTokens to $3 $+ .
    writeini -n etoken.ini eTokens $3 $calc($readini(eToken.ini,eTokens,$3) + $4)
    notice $3 $nick has given you $4 eTokens!
  }
  if ($2 == cloths) {
    if ($3 == help) { 
      notice $nick You can get a piece of clothing fast and easily!!
      notice $nick Correct Format: !eToken cloths buy <type (helm,chest,legs,boots)> <Main Color (1-15)> <BackGround Color (1-15)> <logo text>
      notice $nick Item Costs: <Helm = 700,000> <Chest = 12,000,000> <Legs = 7,000,000> <Boots = 500,000>
    }
    if ($3 == buy) {
      if ($4 == $null) { notice $nick Correct Format: !eToken cloths buy <type> <main color#> <background color#> <logo text> | HALT }
      if ($5 == $null) { notice $nick Correct Format: !eToken cloths buy <type> <main color#> <background color#> <logo text> | HALT }
      if ($6 == $null) { notice $nick Correct Format: !eToken cloths buy <type> <main color#> <background color#> <logo text> | HALT }
      if ($7 == $null) { notice $nick Correct Format: !eToken cloths buy <type> <main color#> <background color#> <logo text> | HALT }
      if ($4 == helm) {
        if ($readini(eToken.ini,eTokens,$nick) < 700000) { notice $nick You need 700,000 eTokens. | HALT }
        writeini -n etoken.ini eTokens $nick $calc($readini(eToken.ini,eTokens,$nick) - 700000)
        writeini cloths-helm.ini color1 $nick $5
        writeini cloths-helm.ini color2 $nick $6
        writeini cloths-helm.ini has $nick 1
        writeini cloths-helm.ini logo $nick $7-
        notice $nick You have bought the item: $4 $+ :  $+ $5 $+ , $+ $6 $+ $7- $+ 
      }
      if ($4 == chest) {
        if ($readini(eToken.ini,eTokens,$nick) < 12000000) { notice $nick You need 12,000,000 eTokens. | HALT }
        writeini -n etoken.ini eTokens $nick $calc($readini(eToken.ini,eTokens,$nick) - 12000000)
        writeini cloths-chest.ini color1 $nick $5
        writeini cloths-chest.ini color2 $nick $6
        writeini cloths-chest.ini has $nick 1
        writeini cloths-chest.ini logo $nick $7-
        notice $nick You have bought the item: $4 $+ :  $+ $5 $+ , $+ $6 $+ $7- $+ 
      }
      if ($4 == legs) {
        if ($readini(eToken.ini,eTokens,$nick) < 7000000) { notice $nick You need 7,000,000 eTokens. | HALT }
        writeini -n etoken.ini eTokens $nick $calc($readini(eToken.ini,eTokens,$nick) - 7000000)
        writeini cloths-legs.ini color1 $nick $5
        writeini cloths-legs.ini color2 $nick $6
        writeini cloths-legs.ini has $nick 1
        writeini cloths-legs.ini logo $nick $7-
        notice $nick You have bought the item: $4 $+ :  $+ $5 $+ , $+ $6 $+ $7- $+ 
      }
      if ($4 == boots) {
        if ($readini(eToken.ini,eTokens,$nick) < 500000) { notice $nick You need 500,000 eTokens. | HALT }
        writeini -n etoken.ini eTokens $nick $calc($readini(eToken.ini,eTokens,$nick) - 500000)
        writeini cloths-boots.ini color1 $nick $5
        writeini cloths-boots.ini color2 $nick $6
        writeini cloths-boots.ini has $nick 1
        writeini cloths-boots.ini logo $nick $7-
        notice $nick You have bought the item: $4 $+ :  $+ $5 $+ , $+ $6 $+ $7- $+ 
      }
    }
    if ($3 == look) {
      if ($readini(eToken2.ini,locked,$3) != $null) { notice $nick Who is $3 $+ ? | HALT }
      if ($4 == $null) { notice $nick Correct Format: !eToken look <nick> | HALT }
      if ($readini(cloths-helm.ini,has,$4) == 1) { msg $chan Helm Slot:  $+ $readini(cloths-helm.ini,color1,$4) $+ , $+ $readini(cloths-helm.ini,color2,$4) $+ $readini(cloths-helm.ini,logo,$4) $+  }
      if ($readini(cloths-chest.ini,has,$4) == 1) { msg $chan Chest Slot:  $+ $readini(cloths-chest.ini,color1,$4) $+ , $+ $readini(cloths-chest.ini,color2,$4) $+ $readini(cloths-chest.ini,logo,$4) $+  }
      if ($readini(cloths-legs.ini,has,$4) == 1) { msg $chan Legs Slot:  $+ $readini(cloths-legs.ini,color1,$4) $+ , $+ $readini(cloths-legs.ini,color2,$4) $+ $readini(cloths-legs.ini,logo,$4) $+  }
      if ($readini(cloths-boots.ini,has,$4) == 1) { msg $chan Boots Slot:  $+ $readini(cloths-boots.ini,color1,$4) $+ , $+ $readini(cloths-boots.ini,color2,$4) $+ $readini(cloths-boots.ini,logo,$4) $+  }
    }
  }
  if ($2 == $null) { notice $nick Try typing: !eToken help | HALT }
  if ($2 == help) { 
    notice $nick eTokens give you special features in $me rooms.
    notice $nick Commands:
    notice $nick Learn how you can get eTokens - !eToken earn
    notice $nick Learn how you can use eTokens - !eToken use
    notice $nick Learn what users with Symbol of Riches can do - !eToken sor help
    notice $nick Check someone's eTokens - !eToken view <nick>
    notice $nick Check someone's cloths - !eToken cloths look <nick>
    notice $nick Learn about a firewall - !eToken firewall
    notice $nick Play RuneScape trivia - !eToken trivia buy
    notice $nick See what games you can play - !eToken games
    halt
  }
  if ($2 == triviatoken) {
    if ($readini(triviatokens.ini,triviatokens,$nick) == $null) { notice $nick You don't have any Trivia Tokens! | HALT }
    notice $nick You have converted your Trivia Tokens into eTokens!
    writeini -n etoken.ini eTokens $nick $calc($readini(eToken.ini,eTokens,$nick) + $readini(triviatokens.ini,triviatokens,$nick))
    remini triviatokens.ini triviatokens $nick
    msg #runescape !unban $nick
  }
  if ($2 == games) {
    notice $nick Slots (Cost: 50) - !eToken slots
    notice $nick Lotto (Cost: 125) - !eToken lotto &#601;-9>
    notice $nick NeverWinFun (Cost: FREE) - !eToken neverwin &#601;-2>
    notice $nick Cointoss (Cost: 300) - !eToken cointoss <heads/tails>
    notice $nick Craps (Cost: Varies) - !eToken craps &#601;-500>
    notice $nick Pick3 (Cost: 50) - !eToken pick3 <number 1> <number 2> <number 3>
  }
  if ($2 == timebomb) {
    if ($readini(eToken1.ini,Rich,$nick) != 1) { notice $nick You must have a Symbol of Riches to use this. | HALT }
    if ($3 isop $chan) { notice $nick Not allowed! | HALT }
    if ($3 == $me) { notice $nick Don't even try it! | HALT }
    if ($3 == %timebombednick) { notice $nick You have just timebombed $3 $+ ! | HALT }
    if ($3 == $null) { notice $nick You must enter a user to timebomb! Use: !eToken timebomb <nick> | HALT }
    if (%timebombstatus == on) { notice $nick Someone already has the timebomb! | HALT }
    if ($3 !ison $chan) { notice $nick $3 is not in $chan | halt }
    /unset %srand69
    /set %timebombstatus on
    /set %timebombednick $3
    if ($rand(1,6) == 1) /set %srand9 Blue
    if ($rand(1,6) == 2) /set %srand9 Green
    if ($rand(1,6) == 3) /set %srand9 Red
    if ($rand(1,6) == 4) /set %srand9 Orange
    if ($rand(1,6) == 5) /set %srand9 Brown
    if ($rand(1,6) == 6) /set %srand9 Yellow
    /timerA 1 30 kick $chan $3 4,1*BOOM*
    /timerB 1 30 set %timebombstatus off
    notice Ciber Timebomb started by $nick for $3 in $chan the correct color is: %srand9
    writeini timebomb.ini Users $chan $3
    describe $chan gives a timebomb to $3 and runs off...
    msg $chan $3 you have the timebomb! You have 30 seconds to disable it! To disable, type: !cutwire <12Blue, 28Green, 4Red, 7Orange, 5Brown, or 8Yellow>
  }
  if ($2 == pick3) {
    if (%pickthreefloodcontrol2 == 1) { notice $nick 4Your going too fast, give me time to catch up. | HALT }
    if ($3 == $null) { notice $nick Correct Format: !pick3 <number 1> <number 2> <number 3> | halt }
    if ($4 == $null) { notice $nick Correct Format: !pick3 <number 1> <number 2> <number 3> | halt }
    if ($5 == $null) { notice $nick Correct Format: !pick3 <number 1> <number 2> <number 3> | halt }
    if ($readini(eToken.ini,eTokens,$nick) < 50) { notice $nick You don't have enough eTokens to play this game. | halt }
    if ($readini(eToken.ini,eTokens,$nick) >= 50) {
      set %pickthreefloodcontrol 1
      timer 1 5 /set %pickthreefloodcontrol 0
      set %lotto.nick $3 $4 $5
      %lotto.nick = $sorttok(%lotto.nick,32,n)
      set %lotto.winner $rand(0,9) $rand(0,9) $rand(0,9)
      %lotto.winner = $sorttok(%lotto.winner,32,n)
      if (%lotto.nick == %lotto.winner) {
        notice $nick Congrats $nick $+ ! The numbers were %lotto.winner You have just won 1,000,000 eTokens!
        set %money.won $calc($readini(eToken.ini,eTokens,$nick) + 1000000)
        writeini -n etoken.ini eTokens $nick %money.won
        unset %money.won
        unset %lotto.nick
        unset %lotto.winner
      }
      if (%lotto.nick != %lotto.winner) {
        notice $nick Sorry $nick $+ , The numbers were %lotto.winner Try again. Remember if you win you get 10,000,000  eTokens!
        set %money.temp $calc($readini(eToken.ini,eTokens,$nick) - 50)
        writeini -n etoken.ini eTokens $nick %money.temp
        unset %money.temp
        unset %lotto.nick
        unset %lotto.winner
      }
    }
  }
  if ($2 == craps) {
    if (%crapsfloodcontrol3 == 1) { notice $nick 4Your going too fast, let me catch up! | HALT }
    if ($3 == $null) { notice $nick Correct Format: !eToken craps <eTokens> | HALT }
    if ($readini(eToken.ini,eTokens,$nick) < $3) { notice $nick You don't have $3 eTokens. | HALT }
    if ($3 < 1) { notice $nick Please bet 1 eToken or more. | halt }
    if ($3 > 501) { notice $nick You can't bet more than 500. | halt }
    var %R = $rand(1,6) | var %C = $rand(1,6)
    var %T = $Calc(%R + %C)
    set %crapsfloodcontrol 1
    timer 1 6 set %crapsfloodcontrol 0
    notice $nick You roll the dice......... %R & %C
    notice $nick Dice Total= %T
    if (%T = 7) {
      var %M = $calc($3 * 5)
      notice $nick YOU GOT SEVENS! You Win %m eTokens!
      set %money.temp $calc($readini(eToken.ini,eTokens,$nick) + %m)
      writeini -n etoken.ini eTokens $nick %money.temp
      unset %money.temp
      unset %R
      unset %C
      unset %T
      unset %M  
      halt
    }
    if  (%T = 11) {
      var %M = $calc($3 * 16)
      notice $nick YOU GOT ELEVEN! You Win %m eTokens!
      set %money.temp $calc($readini(eToken.ini,eTokens,$nick) + %m)
      writeini -n etoken.ini eTokens $nick %money.temp
      unset %money.temp
      unset %R
      unset %C
      unset %T
      unset %M
      halt
    }
    else {
      notice $nick You crapped out! You Lose $3 eTokens.  
      set %money.temp $calc($readini(eToken.ini,eTokens,$nick) - $3)
      writeini -n etoken.ini eTokens $nick %money.temp
      unset %money.temp
      unset %R
      unset %C
      unset %T
      unset %M
    }
  }
  if ($2 == cointoss) {
    if (%cointossfloodcontrol3 == 1) { notice $nick 4Your going too fast, give me some time to catch up! | HALT }
    if ($readini(eToken.ini,eTokens,$nick) < 800) { notice $nick Sorry but you don't have 800 eTokens to spend. | halt }
    if ($3 == $null) { /notice $nick Correct Format: !eToken cointoss <heads/tails> | halt }
    if ($readini(eToken.ini,eTokens,$nick) >= 800) {
      set %coinflip $rand(1,2)
      if ((%coinflip == 1) && ($3 == heads)) { notice $nick Congratulations! $nick You have won 800 eTokens! | set  %money.temp $calc($readini(eToken.ini,eTokens,$nick) + 800) }
      if ((%coinflip == 2) && ($3 == tails)) { notice $nick Congratulations! $nick You have won 800 eTokens! | set  %money.temp $calc($readini(eToken.ini,eTokens,$nick) + 800) }
      if ((%coinflip != 2) && ($3 == tails)) { notice $nick Sorry $nick $+ , The coin landed on heads. | set %money.temp  $calc($readini(eToken.ini,eTokens,$nick) - 300) }
      if ((%coinflip == 2) && ($3 != tails)) { notice $nick Sorry $nick $+ , The coin landed on tails. | set %money.temp  $calc($readini(eToken.ini,eTokens,$nick) - 300) }
      writeini -n etoken.ini eTokens $nick %money.temp
      unset %money.temp
      unset %coinflip
      set %cointossfloodcontrol 1
      timer 1 6 /set %cointossfloodcontrol 0
    }
    else { notice $nick You don't have enough eTokens to play this game! }
  }
  if ($2 == neverwin) {
    if ($3 == 1) { notice $nick Sorry, the number was 2, try again! The jackpot is currently 100,000,000 eTokens. | HALT }
    if ($3 == 2) { notice $nick Sorry, the number was 1, try again! The jackpot is currently 100,000,000 eTokens. | HALT }
    if ($3 == $null) { notice $nick Correct Format: !eToken neverwin &#601;-2> | HALT }
    notice $nick The number must be 1 or 2.
  }
  if ($2 == lotto) {
    if ($3 == $null) { /notice $nick Correct Format: !eToken lotto &#601;-9> | halt }
    if ($readini(eToken.ini,eTokens,$nick) >= 125) {
      set %lotto.user $3
      set %lotto.number $rand(1,9)
      if (%lotto.user == %lotto.number) {
        notice $nick Congrats $nick $+ ! You have just won 1000 eTokens!
        set %money.won $calc($readini(eToken.ini,eTokens,$nick) + 1000)
        writeini -n etoken.ini eTokens $nick %money.won
        unset %money.won
      }
      if (%lotto.user != %lotto.number) {
        notice $nick Sorry $nick $+ , The number was %lotto.number $+ , Try again. Jackpot is 1000 eTokens!
      }
      set %money.temp $calc($readini(eToken.ini,eTokens,$nick) - 125)
      writeini -n etoken.ini eTokens $nick %money.temp
      unset %money.temp
      unset %lotto.user
      unset %lotto.number
    }
    else { notice $nick You don't have enough eTokens to play this game! }
  }
  if ($2 == trivia) {
    if ($3 == buy) {
      if ($readini(eToken.ini,eTokens,$nick) < 200) { notice $nick You don't have enough eTokens. | halt }
      if ($readini(triviabuy.ini,paid,$nick) != $null) { notice $nick You only need to buy it once. | halt }
      writeini -n etoken.ini eTokens $nick $calc( $readini(eToken.ini,eTokens,$nick) - 200 )
      writeini -n triviabuy.ini paid $nick paid
      notice $nick You can now Play Trivia!
      /cs voice #runescape $nick
    }
  }
  if ($2 == slots) {
    if ($readini(eToken.ini,eTokens,$nick) < 50) { notice $nick You don't have enough eTokens. | halt }
    if (%slotsfloodcontrol2 == 1) { notice $nick Your going too fast, give me some time to catch up. | HALT }
    if ($rand(1,6) == 1) /set %srand1 �
    if ($rand(1,6) == 2) /set %srand1 �
    if ($rand(1,6) == 3) /set %srand1 �
    if ($rand(1,6) == 4) /set %srand1 �
    if ($rand(1,6) == 5) /set %srand1 �
    if ($rand(1,6) == 6) /set %srand1 �
    if ($rand(1,6) == 1) /set %srand2 �
    if ($rand(1,6) == 2) /set %srand2 �
    if ($rand(1,6) == 3) /set %srand2 �
    if ($rand(1,6) == 4) /set %srand2 �
    if ($rand(1,6) == 5) /set %srand2 �
    if ($rand(1,6) == 6) /set %srand2 �
    if ($rand(1,6) == 1) /set %srand3 �
    if ($rand(1,6) == 2) /set %srand3 �
    if ($rand(1,6) == 3) /set %srand3 �
    if ($rand(1,6) == 4) /set %srand3 �
    if ($rand(1,6) == 5) /set %srand3 �
    if ($rand(1,6) == 6) /set %srand3 �
    set %money.temp $calc($readini(eToken.ini,eTokens,$nick) - 50)
    set %slotsfloodcontrol 1
    timer 1 10 /set %slotsfloodcontrol 0
    writeini -n etoken.ini eTokens $nick %money.temp
    unset %money.temp
    notice $nick You pull the handle...the slots are ( %srand1 )( %srand2 )( %srand3 )
    if (%srand1 == �) if (%srand2 == �) if (%srand3 == �) /notice $nick Congrats $nick $+ ! You have won 100 eTokens!
    if (%srand1 == �) if (%srand2 == �) if (%srand3 == �) /set %money.won $calc($readini(eToken.ini,eTokens,$nick) +500 )
    if (%srand1 == �) if (%srand2 == �) if (%srand3 == �) /writeini -n etoken.ini eTokens $nick %money.won
    if (%srand1 == �) if (%srand2 == �) if (%srand3 == �) /unset %money.won
    if (%srand1 == �) if (%srand2 == �) if (%srand3 == �) /notice $nick Congrats $nick $+ ! You have won 1000 eTokens!
    if (%srand1 == �) if (%srand2 == �) if (%srand3 == �) /set %money.won $calc($readini(eToken.ini,eTokens,$nick) +500 )
    if (%srand1 == �) if (%srand2 == �) if (%srand3 == �) /writeini -n etoken.ini eTokens $nick %money.won
    if (%srand1 == �) if (%srand2 == �) if (%srand3 == �) /unset %money.won
    if (%srand1 == �) if (%srand2 == �) if (%srand3 == �) /notice $nick JACKPOT! You have won 1,000 eTokens $nick $+ !
    if (%srand1 == �) if (%srand2 == �) if (%srand3 == �) /set %money.won $calc($readini(eToken.ini,eTokens,$nick) +50000  )
    if (%srand1 == �) if (%srand2 == �) if (%srand3 == �) /writeini -n etoken.ini eTokens $nick %money.won
    if (%srand1 == �) if (%srand2 == �) if (%srand3 == �) /unset %money.won
  }
  if ($2 == unlock) {
    if ($nick !isop %etokchan) { notice $nick You need to be +o in %etokchan. | HALT }
    remini eToken2.ini locked $3
    notice $nick $3 $+ 's eToken account has been unlocked.
    notice $3 A BotOper has unlocked your eToken account!
  }
  if ($2 == lock) {
    if ($3 == $null) { notice $nick Correct Format: !eToken lock <nick> <reason> | HALT }
    if ($4 == $null) { notice $nick Correct Format: !eToken lock <nick> <reason> | HALT }
    if ($nick !isop %etokchan) { notice $nick Sorry, you must be +o in %etokchan to use this. | HALT }
    notice $nick $3 $+ 's account has been locked.
    writeini -n etoken2.ini locked $3 $4-
    msg %etokchan $3 $+ 's account has been locked by $nick Reason: $4-
  }
  if ($2 == firewall) {
    if ($3 == $null) { notice $nick Buy a Firewall and protect all your eTokens from being stolen (Cost: 50000) - !eToken  firewall buy | notice $nick Install your new firewall - !eToken firewall install | HALT }
    if ($3 == buy) {
      if ($readini(eToken1.ini,Firewall,$nick) > 0) { notice $nick You already have a firewall! | HALT }
      if ($readini(eToken.ini,eTokens,$nick) < 50000) { notice $nick You don't have enough eTokens to purchase a firewall. |  HALT }
      notice $nick You have purchased a state of the art firewall! You will need to install it now. To install, type:  !eToken firewall install
      writeini -n etoken1.ini Firewall $nick 1
      writeini -n etoken.ini eTokens $nick $calc( $readini(eToken.ini,eTokens,$nick) - 50000 )
    }
    if ($3 == install) {
      if ($readini(eToken2.ini,locked,$nick) != $null) {
      notice $nick Your eToken account has been locked by a BotOper. Reason: $readini(eToken2.ini,locked,$nick) Please  appeal at: http://steroidbot.com | HALT }
      if (%installing == 1) { notice $nick Can't install right now, try again another time. | HALT }
      if ($readini(eToken1.ini,RAM,$nick) == $null) { writeini -n etoken1.ini RAM $nick 256 }
      if ($readini(eToken1.ini,Firewall,$nick) == 0) { notice $nick You don't have a Firewall disk! | HALT }
      if ($readini(eToken1.ini,Firewall,$nick) == $null) { notice $nick You don't have a Firewall disk! | HALT }
      if ($readini(eToken1.ini,Firewall,$nick) == 2) { notice $nick You have already installed your firewall! | HALT }
      if ($readini(eToken1.ini,RAM,$nick) < 512) { notice $nick Error: Your computer doesn't have enough RAM. You need 512  MB of RAM. To buy more RAM (Cost: 1350), type: !eToken ram buy | HALT }
      msg $nick You insert the disk...
      set %installing 1
      timer 1 10 msg $nick Loading Files...
      timer 1 20 msg $nick Installing, 7% Complete...
      timer 1 31 msg $nick Installing, 48% Complete...
      timer 1 35 msg $nick Installing, 56% Complete...
      timer 1 47 msg $nick Installing, 100% Complete...
      timer 1 58 msg $nick Removing temp files...
      timer 1 60 msg $nick Starting Indian 3FC Firewall...
      timer 1 63 msg $nick Checking for updates.................You have the newest version of Indian 3FC Firewall!
      timer 1 64 msg $nick You are now protected 100% from stealers!
      timer 1 64 writeini -n etoken1.ini Firewall $nick 2
      timer 1 70 unset %installing
    }
  }
  if ($2 == earn) {
    notice $nick Disarm a TimeBomb and you'll recieve 250 eTokens.
    notice $nick Sell your partyhat (Value: 1,000,000) - !eToken partyhat sell <color>
    notice $nick Turn Trivia Tokens into eTokens - !eToken triviatoken
    halt
  }
  if ($2 == use) {
    notice $nick Give someone some eTokens - !eToken give <nick> <cash>
    notice $nick Buy Voice in an $me channel of your choice (Cost: 1000) - !eToken voice
    notice $nick Steal from someone (Note: chances are 50/50, that you will loose <cash> or win double) - !eToken steal  <nick> <cash>
    notice $nick Buy a Christmas Cracker (Cost: 25) - !eToken cracker buy <number>
    notice $nick Use your Christmas Cracker on someone - !eToken cracker useon <nick>
    notice $nick Kick Someone (Cost: 5000) - !eToken kick <nick> <reason>
    notice $nick Buy 256 MB of RAM (Cost: 10,000) - !eToken RAM buy
    notice $nick Once you reach 4096 RAM, you can buy 1 more set (Cost: 1,000,000) - !eToken RAM max
    notice $nick Buy Symbol of Riches (Cost: 10,000,000) - !eToken sor buy
    notice $nick Learn About Buying Cloths - !eToken cloths help
    halt
  }
  if ($2 == mask) {
    if ($3 == buy) {
      if ($readini(eToken1.ini,Rich,$nick) < 1) { notice $nick You must have a Symbol of Riches to purchase this.! | HALT }
      if ($4 == $null) { notice $nick Correct Format: !eToken mask buy <color> | HALT }
      if ($readini(eToken.ini,eTokens,$nick) < 6000000) { notice $nick You don't have enough eTokens to do that. | HALT }
      if ($4 == green) { writeini -n etoken2.ini Green $nick $calc($readini(eToken2.ini,Green,$nick) + 1) | writeini -n etoken.ini  eTokens $nick $calc($readini(eToken.ini,eTokens,$nick) - 6000000) | notice $nick You have bought a $4 mask. | HALT }
      if ($4 == red) { writeini -n etoken2.ini red $nick $calc($readini(eToken2.ini,red,$nick) + 1) | writeini -n etoken.ini  eTokens $nick $calc($readini(eToken.ini,eTokens,$nick) - 6000000) | notice $nick You have bought a $4 mask. | HALT }
      if ($4 == blue) { writeini -n etoken2.ini blue $nick $calc($readini(eToken2.ini,blue,$nick) + 1) | writeini -n etoken.ini  eTokens $nick $calc($readini(eToken.ini,eTokens,$nick) - 6000000) | notice $nick You have bought a $4 mask. | HALT }
      notice $nick There is no such thing as a $4 mask.
    }
  }
  if ($2 == sor) {
    if ($3 == help) {
      if ($readini(eToken1.ini,Rich,$nick) == 1) {
        notice $nick Kick a user - !eToken kick <nick> <reason>
        notice $nick Buy a mask (Colors: Red, Blue, Green) (Cost: 6,000,000) - !eToken mask buy <color>
        notice $nick Timebomb a user - !eToken timebomb <nick>
        notice $nick Learn about posting items at the store - /msg $me !eToken store
      }
      else { notice $nick Sorry, only users with a Symbol of Riches may view this. }
    }
    if ($3 == buy) {
      if ($readini(eToken1.ini,Rich,$nick) == 1) { notice $nick You already have a Symbol of Riches! | HALT }
      if ($readini(eToken1.ini,Firewall,$nick) < 2) { notice $nick You need to have a firewall installed. | HALT }
      if ($readini(eToken.ini,eTokens,$nick) < 10000000) { notice $nick You do not have 10,000,000 eTokens. | HALT }
      if ($readini(eToken1.ini,RAM,$nick) < 4096) { notice $nick Your PC doesn't have enough RAM for this award. | HALT }
      if ($readini(eToken1.ini,Purple,$nick) < 1) { notice $nick You need to be the owner of a Purple Partyhat. | HALT }
      if ($readini(eToken1.ini,Yellow,$nick) < 1) { notice $nick You need to be the owner of a Yellow Partyhat. | HALT }
      if ($readini(eToken1.ini,Green,$nick) < 1) { notice $nick You need to be the owner of a Green Partyhat. | HALT }
      if ($readini(eToken1.ini,Red,$nick) < 1) { notice $nick You need to be the owner of a Red Partyhat. | HALT }
      if ($readini(eToken1.ini,White,$nick) < 1) { notice $nick You need to be the owner of a White Partyhat. | HALT }
      if ($readini(eToken1.ini,Blue,$nick) < 1) { notice $nick You need to be the owner of a Blue Partyhat. | HALT }
      notice $nick You have bought a Symbol of Riches!
      writeini -n etoken1.ini Rich $nick 1
      writeini -n etoken.ini eTokens $nick $calc( $readini(eToken.ini,eTokens,$nick) - 10000000 )
    }
  }
  if ($2 == rgirjgirjgirjgrigj) {
    if ($nick isvoice $chan) { notice $nick Your already voiced! | HALT }
    if ($chan == %etokchan) { notice $nick Sorry, you can't voice yourself here. | HALT }
    set %howmuchcashvoice $readini(eToken.ini,eTokens,$nick)
    if (%howmuchcashvoice < 1000) { notice $nick You don't have enough eTokens. | HALT }
    else { msg $chan $nick has bought voice!
      mode $chan +v $nick
      writeini -n etoken.ini eTokens $nick $calc( %howmuchcashvoice - 1000 )
    }
  }
  if ($2 == steal) {
    if ($readini(eToken2.ini,locked,$nick) != $null) {
    notice $nick Sorry, $3 's eToken account has been locked. | HALT }
    if ($4 > 100) { notice $nick You can not steal more than 100 eTokens at a time. | HALT }
    if ($4 < 1) { notice $nick You must steal 1 or more eTokens. | HALT }
    if ($3 !ison $chan) { notice $nick You can't find $3 | HALT }
    if (%stealfloodcontrol2 == 1) { notice $nick Your going too fast, let me catch up. | HALT }
    if ($rand(1,3) == 1) /set %rand64 1
    if ($rand(1,3) == 2) /set %rand64 0
    if ($3 == $null) { notice $nick Correct format: !eToken steal <nick> <cash> | HALT }
    if ($4 == $null) { notice $nick Correct format: !eToken steal <nick> <cash> | HALT }
    if ($3 == $nick) { notice $nick You can't steal from yourself! | HALT }
    if ($readini(eToken1.ini,Firewall,$3) == 2) { notice $nick $3 has a state of the art firewall. You can't pass it. |  HALT }
    set %howmuchcashsteal1 $readini(eToken.ini,eTokens,$nick)
    if (%howmuchcashsteal1 < $4) { notice $nick You don't have enough eTokens to do that. | HALT }
    set %howmuchcashsteal2 $readini(eToken.ini,eTokens,$3)
    if ($calc( %howmuchcashsteal2 - 100 ) < $4) { notice $nick They do not have enough eTokens or they are under low  eToken protection. | HALT }
    /timer 1 5 set %stealfloodcontrol 0
    set %stealfloodcontrol 1
    if (%rand64 == 1) {
      notice $nick You have successfully stolen $4 from $3
      notice $3 You have been robbed! You lost $4
      writeini -n etoken.ini eTokens $3 $calc( $readini(eToken.ini,eTokens,$3) - $4 )
      writeini -n etoken.ini eTokens $nick $calc( %howmuchcashsteal1 + $4 )
    }
    if (%rand64 == 0) {
      notice $nick You have failed at your attempt to steal $4 from $3
      writeini -n etoken.ini eTokens $nick $calc( %howmuchcashsteal1 - $4 )
    }
  }
  if ($2 == cracker) {
    if ($nick == %etoknick) {
      if ($3 == give) {
        set %howmuchcashcracker2 $readini(eToken.ini,cracker,$4)
        writeini -n etoken.ini cracker $4 $calc( %howmuchcashcracker2 + $5 )
        notice $4 %etoknick has given you $5 crackers! Type: !eToken cracker useon <nick> to use it.
        notice $nick $4 now has $calc( %howmuchcashcracker2 + $5 ) crackers. =D
      }
    }
    if ($3 == help) { notice $nick Christmas Crackers are simple, buy one for 10 eTokens and pull it with someone. One of  you will get a sum of cash, the other will get a differant sum of cash. If you are very lucky one of you will get a  partyhat! You can sell your partyhat for 10,000,000 eTokens. You can also trade PartyHats for cash. Have Fun. | HALT }
    if ($3 == buy) {
      if ($4 == $null) { notice $nick Correct format: !eToken cracker buy <number> | HALT }
      if ($4 < 1) { notice $nick You must buy 1 or more Crackers. | HALT }
      set %howmuchcashcracker1 $readini(eToken.ini,eTokens,$nick)
      if (%howmuchcashcracker1 < $calc( $4 * 25 )) { notice $nick You don't have enough eTokens! | HALT }
      set %howmuchcashcracker2 $readini(eToken.ini,cracker,$nick)
      writeini -n etoken.ini eTokens $nick $calc( %howmuchcashcracker1 - $calc( $4 * 25 ) )
      notice $nick You have bought $4 Christmas Crackers! Type: !eToken cracker useon <nick> to use it.
      writeini -n etoken.ini cracker $nick $calc( %howmuchcashcracker2 + $4 )
    }
    if ($3 == useon) {
      if ($readini(eToken2.ini,locked,$3) != $null) {
      notice $nick Sorry, $3 's eToken account has been locked. | HALT }
      if (%rand172 != $null) { notice $nick Your going too fast, please give me some time to catch up. | HALT }
      if ($4 == $me) { notice $nick Use them on someone else... | HALT }
      if ($4 == Rupert) { notice $nick Use them on someone else... | HALT }
      if ($rand(1,942) == 1) /set %rand17 1
      if ($rand(1,942) == 2) /set %rand17 2
      if ($rand(1,942) == 3) /set %rand17 3
      if ($rand(1,942) == 4) /set %rand17 4
      if ($rand(1,942) == 5) /set %rand17 5
      if ($rand(1,942) == 6) /set %rand17 6
      if ($rand(1,942) == 7) /set %rand17 7
      if ($rand(1,942) == 8) /set %rand17 1
      if ($rand(1,942) == 9) /set %rand17 2
      if ($rand(1,942) == 10) /set %rand17 3
      if ($rand(1,942) == 11) /set %rand17 4
      if ($rand(1,942) == 12) /set %rand17 5
      if ($rand(1,942) == 13) /set %rand17 6
      if ($rand(1,942) == 14) /set %rand17 7
      if ($rand(1,942) == 15) /set %rand17 1
      if ($rand(1,942) == 16) /set %rand17 2
      if ($rand(1,942) == 17) /set %rand17 3
      if ($rand(1,942) == 18) /set %rand17 4
      if ($rand(1,942) == 19) /set %rand17 5
      if ($rand(1,942) == 20) /set %rand17 6
      if ($rand(1,942) == 21) /set %rand17 7
      if ($rand(1,942) == 22) /set %rand17 1
      if ($rand(1,942) == 23) /set %rand17 2
      if ($rand(1,942) == 24) /set %rand17 3
      if ($rand(1,942) == 25) /set %rand17 4
      if ($rand(1,942) == 26) /set %rand17 5
      if ($rand(1,942) == 27) /set %rand17 6
      if ($rand(1,942) == 28) /set %rand17 7
      if ($rand(1,942) == 29) /set %rand17 1
      if ($rand(1,942) == 30) /set %rand17 2
      if ($rand(1,942) == 31) /set %rand17 3
      if ($rand(1,942) == 32) /set %rand17 4
      if ($rand(1,942) == 33) /set %rand17 5
      if ($rand(1,942) == 34) /set %rand17 6
      if ($rand(1,942) == 35) /set %rand17 7
      if ($rand(1,942) == 36) /set %rand17 1
      if ($rand(1,942) == 37) /set %rand17 2
      if ($rand(1,942) == 38) /set %rand17 3
      if ($rand(1,942) == 39) /set %rand17 4
      if ($rand(1,942) == 40) /set %rand17 5
      if ($rand(1,942) == 41) /set %rand17 6
      if ($rand(1,942) == 42) /set %rand17 7
      if ($rand(1,942) == 43) /set %rand17 1
      if ($rand(1,942) == 44) /set %rand17 2
      if ($rand(1,942) == 45) /set %rand17 3
      if ($rand(1,942) == 46) /set %rand17 4
      if ($rand(1,942) == 47) /set %rand17 5
      if ($rand(1,942) == 48) /set %rand17 6
      if ($rand(1,942) == 49) /set %rand17 7
      if ($rand(1,942) == 50) /set %rand17 1
      if ($rand(1,942) == 51) /set %rand17 2
      if ($rand(1,942) == 52) /set %rand17 3
      if ($rand(1,942) == 53) /set %rand17 4
      if ($rand(1,942) == 54) /set %rand17 5
      if ($rand(1,942) == 55) /set %rand17 6
      if ($rand(1,942) == 56) /set %rand17 7
      if ($rand(1,942) == 57) /set %rand17 3
      if ($rand(1,942) == 58) /set %rand17 4
      if ($rand(1,942) == 59) /set %rand17 5
      if ($rand(1,942) == 60) /set %rand17 6
      if ($rand(1,942) == 61) /set %rand17 7
      if ($rand(1,942) == 62) /set %rand17 1
      if ($rand(1,942) == 63) /set %rand17 2
      if ($rand(1,942) == 64) /set %rand17 3
      if ($rand(1,942) == 65) /set %rand17 4
      if ($rand(1,942) == 66) /set %rand17 5
      if ($rand(1,942) == 67) /set %rand17 6
      if ($rand(1,942) == 68) /set %rand17 7
      if ($rand(1,942) == 69) /set %rand17 1
      if ($rand(1,942) == 70) /set %rand17 2
      if ($rand(1,942) == 71) /set %rand17 3
      if ($rand(1,942) == 72) /set %rand17 4
      if ($rand(1,942) == 73) /set %rand17 5
      if ($rand(1,942) == 74) /set %rand17 6
      if ($rand(1,942) == 75) /set %rand17 7
      if ($rand(1,942) == 76) /set %rand17 1
      if ($rand(1,942) == 77) /set %rand17 2
      if ($rand(1,942) == 78) /set %rand17 3
      if ($rand(1,942) == 79) /set %rand17 4
      if ($rand(1,942) == 80) /set %rand17 5
      if ($rand(1,942) == 81) /set %rand17 6
      if ($rand(1,942) == 82) /set %rand17 7
      if ($rand(1,942) == 83) /set %rand17 1
      if ($rand(1,942) == 84) /set %rand17 2
      if ($rand(1,942) == 85) /set %rand17 3
      if ($rand(1,942) == 86) /set %rand17 4
      if ($rand(1,942) == 87) /set %rand17 5
      if ($rand(1,942) == 88) /set %rand17 6
      if ($rand(1,942) == 89) /set %rand17 7
      if ($rand(1,942) == 90) /set %rand17 1
      if ($rand(1,942) == 91) /set %rand17 2
      if ($rand(1,942) == 92) /set %rand17 3
      if ($rand(1,942) == 93) /set %rand17 4
      if ($rand(1,942) == 94) /set %rand17 5
      if ($rand(1,942) == 95) /set %rand17 6
      if ($rand(1,942) == 96) /set %rand17 7
      if ($rand(1,942) == 97) /set %rand17 3
      if ($rand(1,942) == 98) /set %rand17 4
      if ($rand(1,942) == 99) /set %rand17 5
      if ($rand(1,942) == 100) /set %rand17 6
      if ($rand(1,942) == 101) /set %rand17 7
      if ($rand(1,942) == 102) /set %rand17 1
      if ($rand(1,942) == 103) /set %rand17 2
      if ($rand(1,942) == 104) /set %rand17 3
      if ($rand(1,942) == 105) /set %rand17 4
      if ($rand(1,942) == 106) /set %rand17 5
      if ($rand(1,942) == 107) /set %rand17 6
      if ($rand(1,942) == 108) /set %rand17 7
      if ($rand(1,942) == 109) /set %rand17 1
      if ($rand(1,942) == 110) /set %rand17 2
      if ($rand(1,942) == 111) /set %rand17 3
      if ($rand(1,942) == 112) /set %rand17 4
      if ($rand(1,942) == 113) /set %rand17 5
      if ($rand(1,942) == 114) /set %rand17 6
      if ($rand(1,942) == 115) /set %rand17 7
      if ($rand(1,942) == 116) /set %rand17 1
      if ($rand(1,942) == 117) /set %rand17 2
      if ($rand(1,942) == 117) /set %rand17 3
      if ($rand(1,942) == 118) /set %rand17 4
      if ($rand(1,942) == 119) /set %rand17 5
      if ($rand(1,942) == 120) /set %rand17 6
      if ($rand(1,942) == 121) /set %rand17 7
      if ($rand(1,942) == 122) /set %rand17 1
      if ($rand(1,942) == 123) /set %rand17 2
      if ($rand(1,942) == 124) /set %rand17 3
      if ($rand(1,942) == 125) /set %rand17 4
      if ($rand(1,942) == 126) /set %rand17 5
      if ($rand(1,942) == 127) /set %rand17 6
      if ($rand(1,942) == 128) /set %rand17 7
      if ($rand(1,942) == 129) /set %rand17 1
      if ($rand(1,942) == 130) /set %rand17 2
      if ($rand(1,942) == 131) /set %rand17 3
      if ($rand(1,942) == 132) /set %rand17 4
      if ($rand(1,942) == 133) /set %rand17 5
      if ($rand(1,942) == 134) /set %rand17 6
      if ($rand(1,942) == 135) /set %rand17 7
      if ($rand(1,942) == 136) /set %rand17 1
      if ($rand(1,942) == 137) /set %rand17 2
      if ($rand(1,942) == 138) /set %rand17 3
      if ($rand(1,942) == 139) /set %rand17 4
      if ($rand(1,942) == 140) /set %rand17 5
      if ($rand(1,942) == 141) /set %rand17 6
      if ($rand(1,942) == 142) /set %rand17 7
      if ($rand(1,942) == 143) /set %rand17 1
      if ($rand(1,942) == 144) /set %rand17 2
      if ($rand(1,942) == 145) /set %rand17 3
      if ($rand(1,942) == 146) /set %rand17 4
      if ($rand(1,942) == 147) /set %rand17 5
      if ($rand(1,942) == 148) /set %rand17 6
      if ($rand(1,942) == 149) /set %rand17 7
      if ($rand(1,942) == 150) /set %rand17 1
      if ($rand(1,942) == 151) /set %rand17 2
      if ($rand(1,942) == 152) /set %rand17 3
      if ($rand(1,942) == 153) /set %rand17 4
      if ($rand(1,942) == 154) /set %rand17 5
      if ($rand(1,942) == 155) /set %rand17 6
      if ($rand(1,942) == 156) /set %rand17 7
      if ($rand(1,942) == 157) /set %rand17 3
      if ($rand(1,942) == 158) /set %rand17 4
      if ($rand(1,942) == 159) /set %rand17 5
      if ($rand(1,942) == 160) /set %rand17 6
      if ($rand(1,942) == 161) /set %rand17 7
      if ($rand(1,942) == 162) /set %rand17 1
      if ($rand(1,942) == 163) /set %rand17 2
      if ($rand(1,942) == 164) /set %rand17 3
      if ($rand(1,942) == 165) /set %rand17 4
      if ($rand(1,942) == 166) /set %rand17 5
      if ($rand(1,942) == 167) /set %rand17 6
      if ($rand(1,942) == 168) /set %rand17 7
      if ($rand(1,942) == 169) /set %rand17 1
      if ($rand(1,942) == 170) /set %rand17 2
      if ($rand(1,942) == 171) /set %rand17 3
      if ($rand(1,942) == 172) /set %rand17 4
      if ($rand(1,942) == 173) /set %rand17 5
      if ($rand(1,942) == 174) /set %rand17 6
      if ($rand(1,942) == 175) /set %rand17 7
      if ($rand(1,942) == 176) /set %rand17 1
      if ($rand(1,942) == 177) /set %rand17 2
      if ($rand(1,942) == 178) /set %rand17 3
      if ($rand(1,942) == 179) /set %rand17 4
      if ($rand(1,942) == 180) /set %rand17 5
      if ($rand(1,942) == 181) /set %rand17 6
      if ($rand(1,942) == 182) /set %rand17 7
      if ($rand(1,942) == 183) /set %rand17 1
      if ($rand(1,942) == 184) /set %rand17 2
      if ($rand(1,942) == 185) /set %rand17 3
      if ($rand(1,942) == 186) /set %rand17 4
      if ($rand(1,942) == 187) /set %rand17 5
      if ($rand(1,942) == 188) /set %rand17 6
      if ($rand(1,942) == 189) /set %rand17 7
      if ($rand(1,942) == 190) /set %rand17 5
      if ($rand(1,942) == 191) /set %rand17 Yellow
      if ($rand(1,942) == 192) /set %rand17 Purple
      if ($rand(1,942) == 193) /set %rand17 Yellow
      if ($rand(1,942) == 194) /set %rand17 Yellow
      if ($rand(1,942) == 195) /set %rand17 Purple
      if ($rand(1,942) == 196) /set %rand17 Purple
      if ($rand(1,942) == 197) /set %rand17 Purple
      if ($rand(1,942) == 198) /set %rand17 Green
      if ($rand(1,942) == 199) /set %rand17 Red
      if ($rand(1,942) == 200) /set %rand17 White
      if ($rand(1,942) == 201) /set %rand17 Blue
      if ($rand(1,942) == 202) /set %rand17 Green
      if ($rand(1,942) == 203) /set %rand17 Green
      if ($rand(1,942) == 204) /set %rand17 Blue
      if ($rand(1,942) == 205) /set %rand17 White
      if ($rand(1,942) == 206) /set %rand17 Red
      if ($rand(1,942) == 207) /set %rand17 Green
      if ($rand(1,942) == 208) /set %rand17 Purple
      if ($rand(1,942) == 209) /set %rand17 Purple
      if ($rand(1,942) == 210) /set %rand17 Purple
      if ($rand(1,942) == 211) /set %rand17 Yellow
      if ($rand(1,942) == 212) /set %rand17 Yellow
      if ($rand(1,942) == 213) /set %rand17 Purple
      if ($rand(1,942) == 214) /set %rand17 Yellow
      if ($rand(1,942) == 215) /set %rand17 Santa
      if ($rand(1,942) == 216) /set %rand17 Pumpkin
      if ($rand(1,942) == 217) /set %rand17 3
      if ($rand(1,942) == 218) /set %rand17 4
      if ($rand(1,942) == 219) /set %rand17 5
      if ($rand(1,942) == 220) /set %rand17 6
      if ($rand(1,942) == 221) /set %rand17 7
      if ($rand(1,942) == 222) /set %rand17 1
      if ($rand(1,942) == 223) /set %rand17 2
      if ($rand(1,942) == 224) /set %rand17 3
      if ($rand(1,942) == 225) /set %rand17 4
      if ($rand(1,942) == 226) /set %rand17 2
      if ($rand(1,942) == 227) /set %rand17 3
      if ($rand(1,942) == 228) /set %rand17 4
      if ($rand(1,942) == 229) /set %rand17 5
      if ($rand(1,942) == 230) /set %rand17 6
      if ($rand(1,942) == 231) /set %rand17 7
      if ($rand(1,942) == 232) /set %rand17 1
      if ($rand(1,942) == 233) /set %rand17 2
      if ($rand(1,942) == 234) /set %rand17 3
      if ($rand(1,942) == 235) /set %rand17 4
      if ($rand(1,942) == 236) /set %rand17 2
      if ($rand(1,942) == 237) /set %rand17 3
      if ($rand(1,942) == 238) /set %rand17 4
      if ($rand(1,942) == 239) /set %rand17 5
      if ($rand(1,942) == 240) /set %rand17 6
      if ($rand(1,942) == 241) /set %rand17 7
      if ($rand(1,942) == 242) /set %rand17 1
      if ($rand(1,942) == 243) /set %rand17 2
      if ($rand(1,942) == 244) /set %rand17 3
      if ($rand(1,942) == 245) /set %rand17 4
      if ($rand(1,942) == 246) /set %rand17 2
      if ($rand(1,942) == 247) /set %rand17 3
      if ($rand(1,942) == 248) /set %rand17 4
      if ($rand(1,942) == 249) /set %rand17 5
      if ($rand(1,942) == 250) /set %rand17 6
      if ($rand(1,942) == 251) /set %rand17 7
      if ($rand(1,942) == 252) /set %rand17 1
      if ($rand(1,942) == 253) /set %rand17 2
      if ($rand(1,942) == 254) /set %rand17 3
      if ($rand(1,942) == 255) /set %rand17 4
      if ($rand(1,942) == 256) /set %rand17 2
      if ($rand(1,942) == 257) /set %rand17 3
      if ($rand(1,942) == 258) /set %rand17 4
      if ($rand(1,942) == 259) /set %rand17 5
      if ($rand(1,942) == 260) /set %rand17 6
      if ($rand(1,942) == 261) /set %rand17 7
      if ($rand(1,942) == 262) /set %rand17 1
      if ($rand(1,942) == 263) /set %rand17 2
      if ($rand(1,942) == 264) /set %rand17 3
      if ($rand(1,942) == 265) /set %rand17 4
      if ($rand(1,942) == 266) /set %rand17 2
      if ($rand(1,942) == 267) /set %rand17 3
      if ($rand(1,942) == 268) /set %rand17 4
      if ($rand(1,942) == 269) /set %rand17 5
      if ($rand(1,942) == 270) /set %rand17 6
      if ($rand(1,942) == 271) /set %rand17 7
      /timer 1 3 unset %rand17

set %doeshehaveacracker $readini(eToken.ini,cracker,$nick)
      if (%doeshehaveacracker == 0) { notice $nick You don't have a Christmas Cracker! | HALT }
      if (%doeshehaveacracker == $null) { notice $nick You don't have a Christmas Cracker! | HALT }
      if ($4 == $null) { notice $nick Correct format: !eToken cracker useon <nick> | HALT }
      if ($4 !ison $chan) { notice $nick $4 is not in $chan | HALT }
      if ($address($nick,2) == $address($4,2)) { notice $nick Don't use eTokens on yourself! | HALT }
      notice $nick You and $4 pull the cracker...
      notice $4 You and $nick pull the cracker...
      if (%rand17 == 1) {
        notice $nick You got 8 eTokens!
        notice $4 You got 2 eTokens!
        writeini -n etoken.ini eTokens $nick $calc( $readini(eToken.ini,eTokens,$nick) + 8 )
        writeini -n etoken.ini eTokens $4 $calc( $readini(eToken.ini,eTokens,$4) + 2 )
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
      }
      if (%rand17 == 2) {
        notice $nick You got 0 eTokens!
        notice $4 You got 5 eTokens!
        writeini -n etoken.ini eTokens $4 $calc( $readini(eToken.ini,eTokens,$4) + 5 )
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
      }
      if (%rand17 == 3) {
        notice $nick You got 12 eTokens!
        notice $4 You got 8 eTokens!
        writeini -n etoken.ini eTokens $nick $calc( $readini(eToken.ini,eTokens,$nick) + 12 )
        writeini -n etoken.ini eTokens $4 $calc( $readini(eToken.ini,eTokens,$4) + 8 )
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
      }
      if (%rand17 == 4) {
        notice $nick You got 5 eTokens!
        notice $4 You got 15 eTokens!
        writeini -n etoken.ini eTokens $nick $calc( $readini(eToken.ini,eTokens,$nick) + 5 )
        writeini -n etoken.ini eTokens $4 $calc( $readini(eToken.ini,eTokens,$4) + 15 )
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
      }
      if (%rand17 == 5) {
        notice $nick You got 11 eTokens!
        notice $4 You got 9 eTokens!
        writeini -n etoken.ini eTokens $nick $calc( $readini(eToken.ini,eTokens,$nick) + 11 )
        writeini -n etoken.ini eTokens $4 $calc( $readini(eToken.ini,eTokens,$4) + 9 )
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
      }
      if (%rand17 == 6) {
        notice $nick You got 7 eTokens!
        notice $4 You got 3 eTokens!
        writeini -n etoken.ini eTokens $nick $calc( $readini(eToken.ini,eTokens,$nick) + 7 )
        writeini -n etoken.ini eTokens $4 $calc( $readini(eToken.ini,eTokens,$4) + 3 )
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
      }
      if (%rand17 == $null) {
        notice $nick The cracker was empty!
        notice $4 The cracker was empty!
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
        unset $nick
      }
      if (%rand17 == 7) {
        notice $nick You got 1 eTokens!
        notice $4 You got 1 eTokens!
        writeini -n etoken.ini eTokens $nick $calc( $readini(eToken.ini,eTokens,$nick) + 1 )
        writeini -n etoken.ini eTokens $4 $calc( $readini(eToken.ini,eTokens,$4) + 1 )
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
      }
      if (%rand17 == Purple) {
        notice $chan 13,1 $+ $nick found a Purple Partyhat!
        notice $nick 13,1You found a Purple Partyhat!
        notice $4 You got 3 eTokens!
        writeini -n etoken.ini eTokens $4 $calc( $readini(eToken.ini,eTokens,$4) + 3 )
        writeini -n etoken1.ini Purple $nick $calc( $readini(eToken1.ini,Purple,$nick) + 1 )
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
      }
      if (%rand17 == Yellow) {
        notice $chan 8,1 $+ $nick found a Yellow Partyhat!
        notice $nick 8,1You found a Yellow Partyhat!
        notice $4 You got 4 eTokens!
        writeini -n etoken.ini eTokens $4 $calc( $readini(eToken.ini,eTokens,$4) + 4 )
        writeini -n etoken1.ini Yellow $nick $calc( $readini(eToken1.ini,Yellow,$nick) + 1 )
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
      }
      if (%rand17 == Green) {
        notice $chan 9,1 $+ $nick found a Green Partyhat!
        notice $nick 9,1You found a Green Partyhat!
        notice $4 You got 2 eTokens!
        writeini -n etoken.ini eTokens $4 $calc( $readini(eToken.ini,eTokens,$4) + 2 )
        writeini -n etoken1.ini Green $nick $calc( $readini(eToken1.ini,Green,$nick) + 1 )
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
      }
      if (%rand17 == Santa) {
        notice $chan 4,1 $+ $nick $+  0f4o0u4n0d 4a 0R4a0r4e 4S0a4n0t4a4 H0a4t0!
        notice $nick 4,1Y0o4u 0f4o0u4n0d 4a 0R4a0r4e 4S0a4n0t4a4 H0a4t0!
        notice $4 You got 100 eTokens!
        writeini -n etoken.ini eTokens $4 $calc( $readini(eToken.ini,eTokens,$4) + 100 )
        writeini -n etoken-other.ini Santa $nick $calc( $readini(eToken-other.ini,Santa,$nick) + 1 )
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
      }
      if (%rand17 == pumpkin) {
        notice $chan 7,1 $+ $nick found a Rare Pumpkin!
        notice $nick 7,1You found a Rare Pumpkin!
        notice $4 You got 100 eTokens!
        writeini -n etoken.ini eTokens $4 $calc( $readini(eToken.ini,eTokens,$4) + 100 )
        writeini -n etoken-other.ini pumpkin $nick $calc( $readini(eToken-other.ini,pumpkin,$nick) + 1 )
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
      }
      if (%rand17 == Red) {
        notice $chan 4,1 $+ $nick found a Red Partyhat!
        notice $nick 4,1You found a Red Partyhat!
        notice $4 You got 0 eTokens!
        writeini -n etoken1.ini Red $nick $calc( $readini(eToken1.ini,Red,$nick) + 1 )
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
      }
      if (%rand17 == White) {
        notice $chan 0,1 $+ $nick found a White Partyhat!
        notice $nick 0,1You found a White Partyhat!
        notice $4 You got 6 eTokens!
        writeini -n etoken.ini eTokens $4 $calc( $readini(eToken.ini,eTokens,$4) + 6 )
        writeini -n etoken1.ini White $nick $calc( $readini(eToken1.ini,White,$nick) + 1 )
        writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
      }
      if (%rand17 == Blue) {
        if ($rand(0,2) == 1) /set %rand18 1
        if ($rand(0,2) == 2) /set %rand18 2
        if (%rand18 == $null) {
          notice $chan 12,1 $+ $nick found a Blue Partyhat!
          notice $nick 12,1You found a Blue Partyhat!
          notice $4 You got 8 eTokens!
          writeini -n etoken.ini eTokens $4 $calc( $readini(eToken.ini,eTokens,$4) + 8 )
          writeini -n etoken1.ini Blue $nick $calc( $readini(eToken1.ini,Blue,$nick) + 1 )
          writeini -n etoken.ini cracker $nick $calc( %doeshehaveacracker - 1 )
        }
        else { unset %rand18 | notice $nick The cracker doesn't break... | notice $4 The cracker doesn't break... }
      }
    }
  }
  if ($2 == kick) {
    if ($3 == $null) { notice $nick Correct format: !eToken kick <nick> <reason> | HALT }
    if ($4 == $null) { notice $nick Correct format: !eToken kick <nick> <reason> | HALT }
    if (%kicknick == $nick) { notice $nick You can not kick twice in a row, you will be able to kick once someone else  kicks someone. | HALT }
    if ($3 !ison $chan) { notice $nick $3 is not in $chan | HALT }
    if ($3 isop $chan) { notice $nick $3 is an Op in $chan | HALT }
    if ($3 == $me) { notice $nick Don't even try it! | HALT }
    if ($3 == $nick) { notice $nick You can't kick yourself. | HALT }
    if ($readini(eToken1.ini,Rich,$nick) == 1) {
      notice $nick $3 has been kicked.
      msg %etokchan $nick has used eTokens to kick $3 from $chan - Reason: $4-
      kick $chan $3 4,1Kick purchased by $nick Reason: $4-
      set %kicknick $nick | halt
    }
    if ($readini(eToken.ini,eTokens,$nick) < 5000) { notice $nick You don't have enough eTokens to purchase a kick. | HALT  }
    notice $nick $3 has been kicked.
    msg %etokchan $nick has used eTokens to kick $3 from $chan - Reason: $4-
    kick $chan $3 4,1Kick purchased by $nick Reason: $4-
    writeini -n etoken.ini eTokens $nick $calc( $readini(eToken.ini,eTokens,$nick) - 5000 )
    set %kicknick $nick
  }
  if ($2 == view) {
    if ($readini(eToken2.ini,locked,$3) != $null) { msg $chan Who is $3 $+ ? | HALT }
    if ($3 == $null) { msg $chan Correct format: !eToken spy <nick> | HALT }
    if ($3 !ison $chan) { msg $chan You can't find $3 $+ . | HALT }
    msg $chan (Level $iif($readini(eToken-levels.ini,level,$3),$null,1) $+ $readini(eToken-levels.ini,level,$3) $+ ) $3 has $readini(eToken.ini,eTokens,$3) $+ $iif($readini(eToken.ini,eTokens,$3),$null,0) eTokens, $readini(eToken.ini,cracker,$3) $+ $iif($readini(eToken.ini,cracker,$3),$null,0) crackers, and  $readini(eToken1.ini,RAM,$3) $+ $iif($readini(eToken1.ini,RAM,$3),$null,0) MB of RAM.
    if ($readini(eToken1.ini,Firewall,$3) == 1) { msg $chan 1,4 $+ $3 has a Firewall! ( Status: Not Installed ) }
    if ($readini(eToken1.ini,Firewall,$3) == 2) { msg $chan 1,4 $+ $3 has a Firewall! ( Status: Installed ) }
    if ($readini(eToken1.ini,Purple,$3) > 0) { msg $chan 6,1 $+ $3 has a Purple PartyHat! ( Amount:  $readini(eToken1.ini,Purple,$3) ) }
    if ($readini(eToken1.ini,Yellow,$3) > 0) { msg $chan 8,1 $+ $3 has a Yellow PartyHat! ( Amount:  $readini(eToken1.ini,Yellow,$3) ) }
    if ($readini(eToken1.ini,Green,$3) > 0) { msg $chan 9,1 $+ $3 has a Green PartyHat! ( Amount:  $readini(eToken1.ini,Green,$3) ) }
    if ($readini(eToken1.ini,Red,$3) > 0) { msg $chan 4,1 $+ $3 has a Red PartyHat! ( Amount:  $readini(eToken1.ini,Red,$3) ) }
    if ($readini(eToken1.ini,White,$3) > 0) { msg $chan 0,1 $+ $3 has a White PartyHat! ( Amount:  $readini(eToken1.ini,White,$3) ) }
    if ($readini(eToken1.ini,Blue,$3) > 0) { msg $chan 12,1 $+ $3 has a Blue PartyHat! ( Amount:  $readini(eToken1.ini,Blue,$3) ) }
    if ($readini(eToken-other.ini,pumpkin,$3) > 0) { msg $chan 7,1 $+ $3 has a Rare Pumpkin! ( Amount: $readini(eToken-other.ini,pumpkin,$3) ) }
    if ($readini(eToken-other.ini,santa,$3) > 0) { msg $chan 4,1 $+ $mid($3,1,1) $+ 0 $+ $mid($3,2,1) $+ 4 $+ $mid($3,3,1) $+ 0 $+ $mid($3,4,1) $+ 4 $+ $mid($3,5,1) $+ 0 $+ $mid($3,6,1) $+ 4 $+ $mid($3,7,1) $+ 0 $+ $mid($3,8,1) $+ 4 $+ $mid($3,9,1) $+ 0 $+ $mid($3,10,1) $+ 4 $+ $mid($3,11,1) $+ 0 $+ $mid($3,12,1) $+  4h0a4s0 a 4R0a4r0e 4S0a4n0t4a0 4H0a4t0 4( 0A4m0o40u4n0t0: 4 $+ $readini(eToken-other.ini,santa,$3) $+ 0 )  }
    if ($readini(eToken1.ini,Rich,$3) == 1) { msg $chan 8,1 $+ $3 has a Symbol of Riches! }
    if ($readini(eToken1.ini,Rich,$3) == 1) { msg $chan 0,1 $+ $3 has9,1 $readini(eToken2.ini,Green,$3) Green  Masks0,1,12,1 $readini(eToken2.ini,Blue,$3) Blue Masks0,1, and4,1 $readini(eToken2.ini,Red,$3) Red Masks. }
    if ($3 !ison %etokchan) { halt }
    if ($3 !isreg %etokchan) { msg $chan 15,14 $+ $3 has a BotOper DogTag. }
  }
  if ($2 == forceview) {
    if ($readini(eToken2.ini,locked,$3) != $null) { notice $nick Who is $3 $+ ? | HALT }
    if ($3 == $null) { notice $nick Correct format: !eToken spy <nick> | HALT }
    if ($3 !ison $chan) { notice $nick You can't fi;nd $3 $+ . | HALT }
    notice $nick (Level $iif($readini(eToken-levels.ini,level,$3),$null,1) $+ $readini(eToken-levels.ini,level,$3) $+ ) $3 has $readini(eToken.ini,eTokens,$3) $+ $iif($readini(eToken.ini,eTokens,$3),$null,0) eTokens, $readini(eToken.ini,cracker,$3) $+ $iif($readini(eToken.ini,cracker,$3),$null,0) crackers, and  $readini(eToken1.ini,RAM,$3) $+ $iif($readini(eToken1.ini,RAM,$3),$null,0) MB of RAM.
    if ($readini(eToken1.ini,Firewall,$3) == 1) { notice $nick 1,4 $+ $3 has a Firewall! ( Status: Not Installed ) }
    if ($readini(eToken1.ini,Firewall,$3) == 2) { notice $nick 1,4 $+ $3 has a Firewall! ( Status: Installed ) }
    if ($readini(eToken1.ini,Purple,$3) > 0) { notice $nick 6,1 $+ $3 has a Purple PartyHat! ( Amount:  $readini(eToken1.ini,Purple,$3) ) }
    if ($readini(eToken1.ini,Yellow,$3) > 0) { notice $nick 8,1 $+ $3 has a Yellow PartyHat! ( Amount:  $readini(eToken1.ini,Yellow,$3) ) }
    if ($readini(eToken1.ini,Green,$3) > 0) { notice $nick 9,1 $+ $3 has a Green PartyHat! ( Amount:  $readini(eToken1.ini,Green,$3) ) }
    if ($readini(eToken1.ini,Red,$3) > 0) { notice $nick 4,1 $+ $3 has a Red PartyHat! ( Amount:  $readini(eToken1.ini,Red,$3) ) }
    if ($readini(eToken1.ini,White,$3) > 0) { notice $nick 0,1 $+ $3 has a White PartyHat! ( Amount:  $readini(eToken1.ini,White,$3) ) }
    if ($readini(eToken1.ini,Blue,$3) > 0) { notice $nick 12,1 $+ $3 has a Blue PartyHat! ( Amount:  $readini(eToken1.ini,Blue,$3) ) }
    if ($readini(eToken-other.ini,pumpkin,$3) > 0) { notice $nick 7,1 $+ $3 has a Rare Pumpkin! ( Amount: $readini(eToken-other.ini,pumpkin,$3) ) }
    if ($readini(eToken-other.ini,santa,$3) > 0) { notice $nick 4,1 $+ $mid($3,1,1) $+ 0 $+ $mid($3,2,1) $+ 4 $+ $mid($3,3,1) $+ 0 $+ $mid($3,4,1) $+ 4 $+ $mid($3,5,1) $+ 0 $+ $mid($3,6,1) $+ 4 $+ $mid($3,7,1) $+ 0 $+ $mid($3,8,1) $+ 4 $+ $mid($3,9,1) $+ 0 $+ $mid($3,10,1) $+ 4 $+ $mid($3,11,1) $+ 0 $+ $mid($3,12,1) $+  4h0a4s0 a 4R0a4r0e 4S0a4n0t4a0 4H0a4t0 4( 0 $+ $readini(eToken-other.ini,santa,$3) $+ 4 )  }
    if ($readini(eToken1.ini,Rich,$3) == 1) { notice $nick 8,1 $+ $3 has a Symbol of Riches! }
    if ($readini(eToken1.ini,Rich,$3) == 1) { notice $nick 0,1 $+ $3 has9,1 $readini(eToken2.ini,Green,$3) Green  Masks0,1,12,1 $readini(eToken2.ini,Blue,$3) Blue Masks0,1, and4,1 $readini(eToken2.ini,Red,$3) Red Masks. }
    if ($3 !ison %etokchan) { halt }
    if ($3 !isreg %etokchan) { notice $nick 15,14 $+ $3 has a BotOper DogTag. }
  }
  if ($2 == attack) {
    if ($3 == $null) {
      if ($readini(eToken-levels.ini,level,$nick) == $null) { writeini eToken-levels.ini level $nick 1 }
      notice $nick Welcome $nick $+ ! Your currently Level $readini(eToken-levels.ini,level,$nick) $+ , Experience: $readini(eToken-levels.ini,exp,$nick) $+ $iif($readini(eToken-level.ini,exp,$nick) == $null,0) $+ / $+ $readini(eToken-levels.ini,level,$nick)
      notice $nick Attack someone - !etoken attack <nick>
    }
    if ($readini(eToken-levels.ini,level,$3) == $null) { writeini eToken-levels.ini level $3 1 }
    if ($readini(eToken-levels.ini,level,$nick) == $null) { writeini eToken-levels.ini level $nick 1 }
    if ($nick == $3) { notice $nick You can't attack yourself... | HALT }
    %attackcheck = $rand(1,2)
    notice $nick You attack $3 $+ ...
    notice $3 You are being attacked by $nick $+ ...
    if (%attackcheck == 1) { 
      notice $nick You have lost!
      notice $3 You have won!
      writeini eToken-levels.ini exp $3 $calc($readini(eToken-levels.ini,exp,$3) + 10)
      if (50 =/ $readini(eToken-levels.ini,exp,$3)) { 
        notice $3 You have Leveled up! New Level: $calc($readini(eToken-levels.ini,level,$3) + 1)
        writeini eToken-levels.ini level $3 $calc($readini(eToken-levels.ini,level,$3) + 1)
      }
      halt
    }
    if (%attackcheck == 2) { 
      notice $3 You have lost!
      notice $nick You have won!
      writeini eToken-levels.ini exp $nick $calc($readini(eToken-levels.ini,exp,$nick) + 10)
      if (50 =/ $readini(eToken-levels.ini,exp,$nick)) { 
        notice $nick You have Leveled up! New Level: $calc($readini(eToken-levels.ini,level,$nick) + 1)
        writeini eToken-levels.ini level $nick $calc($readini(eToken-levels.ini,level,$nick) + 1)
      }
      halt
    }
  }
  if ($2 == level) {
    if ($3 == $null) {
      if ($readini(eToken-levels.ini,level,$nick) == $null) { writeini eToken-levels.ini level $nick 1 }
      notice $nick Welcome $nick $+ ! Your currently Level $readini(eToken-levels.ini,level,$nick) $+ , Experience: $readini(eToken-levels.ini,exp,$nick) $+ $iif($readini(eToken-level.ini,exp,$nick) == $null,0) $+ / $+ $readini(eToken-levels.ini,level,$nick)
      notice $nick Attack someone - !etoken attack <nick>
    }
    if ($readini(eToken-levels.ini,level,$nick) == $null) { writeini eToken-levels.ini level $nick 1 }
    if ($readini(eToken-levels.ini,level,$3) == $null) { writeini eToken-levels.ini level $3 1 }
    if ($readini(eToken-levels.ini,exp,$3) == $null) {
      notice $nick $3 $+ 's current Level:  $+ $readini(eToken-levels.ini,level,$3) $+  Experience:  $+ 0/ $+ $readini(eToken-levels.ini,level,$3) $+ 
    }
    if ($readini(eToken-levels.ini,exp,$3) != $null) {
      notice $nick $3 $+ 's current Level:  $+ $readini(eToken-levels.ini,level,$3) $+  Experience:  $+ $readini(eToken-levels.ini,exp,$3) $+ / $+ $readini(eToken-levels.ini,level,$3) $+ 
    }
  }
}
on *:signal:attacklevelcheck: {

}
#etok end

Comments

(13) RSS

Go to Bottom

Sephiroth1n6

Comments: 62

mIRC Snippet: eTokens the complete original etoken game
Posted on Sep 28, 2007 1:14 pm

no ones interested in this yet? lol

Sephiroth1n6

Comments: 62

mIRC Snippet: eTokens the complete original etoken game
Posted on Oct 2, 2007 6:35 pm

this is a good game lol -.-
why has no one commented yet!@!

mountaindew

Comments: 1,636

mIRC Snippet: eTokens the complete original etoken game
Posted on Oct 2, 2007 7:37 pm

is it like a casino?

Sephiroth1n6

Comments: 62

mIRC Snippet: eTokens the complete original etoken game
Posted on Oct 9, 2007 3:40 pm

there is some almost gambling lol

Korvin

Comments: 238

mIRC Snippet: eTokens the complete original etoken game
Posted on Oct 14, 2007 11:12 pm

hey shoot, my sister already released this xD

Korvin

Comments: 238

mIRC Snippet: eTokens the complete original etoken game
Posted on Oct 14, 2007 11:14 pm

o didnt realize my sisters was missing part of the script, im sorry, thank you for putting up the full version

mountaindew

Comments: 1,636

mIRC Snippet: eTokens the complete original etoken game
Posted on Oct 15, 2007 3:09 pm

Quote:

hey shoot, my sister already released this xD

[u]LOL[u]

Korvin

Comments: 238

mIRC Snippet: eTokens the complete original etoken game
Posted on Oct 26, 2007 7:57 pm

Sephiroth1n6

Comments: 62

mIRC Snippet: eTokens the complete original etoken game
Posted on Nov 2, 2007 5:27 pm

i wonder if anyone will actually use this o.O....

Korvin

Comments: 238

mIRC Snippet: eTokens the complete original etoken game
Posted on Nov 7, 2007 11:58 pm

instead of $1, since the other first letters of words are set as red, use this: [code]$replace($1,$mid($1,1,1),4 $+ $mid($1,1,1) $+ 12)[coded]

Korvin

Comments: 238

mIRC Snippet: eTokens the complete original etoken game
Posted on Nov 7, 2007 11:58 pm

wrong one..

fergie

Comments: 6

mIRC Snippet: eTokens the complete original etoken game
Posted on Jan 12, 2008 6:04 pm

well it's interesting.. lol

fergie

Comments: 6

mIRC Snippet: eTokens the complete original etoken game
Posted on Jan 14, 2008 7:58 pm

if ($address($nick,2) == $address($4,2)) { notice $nick Don't use eTokens on yourself! | HALT

--use if ($address($nick,1) == $address($4,1)) { notice $nick Don't use eTokens on yourself! | HALT
--in case 2 people have the same host...

eTokens the complete original etoken game

Introduction

Grab the Code

Comments

Sephiroth1n6

My Snippet Tags

Contact

Friends (3)

Sponsors

		UsA
Last seen: Apr 22, 2008 Profile Friends (3) Snippets (17) Images (2) Comments Received (71) Comments Submitted (62) Forum Posts (4)