View

Official eToken Script

Snippet Author: Kayla
Rated:

Snippet Description: ETOKENS MADE AND RELEASED BY CIBER!

Okay, as some of you might know #etokens so called: [21:28:43] -ChanServ- Description: The official Steroidbot eToken room

Is a complete lie, Screwy stole my nick pass, etoken script, and channels, I got Cibber and the channels back. Ciber was filtered for some stupid reason, Cibber was stolen(then gotten back, along with channels).

Screwy has taken the script and clamined it as his own, infact it is not. You might remember playing this in the official channel, #ciber and #runescape on irc.swiftirc.net, and i'm only releasing this because someone got ahold of it, and I already made a new much cleaner version that needs a dedicated server to run on.

Don't laugh at the coding, this was one of my first mIRC scripts, and it saves in like 4 files I know, but you'll get used to it.

Also, here I am releasing a eToken macro client, that you can use to play eTokens easier! This client was actually made for the NEW eTokens, that facefuck screwy hasn't gotten ahold of, but you can edit it to work with this version (under eToken Script) :)

Edit it as you'd like, all credit for this script goes to Ciber (creator) and Staccia/Kayla (editor).

;;;;;;;;;;;;;;;;;;;;;;;;;
;eTokens                ;
;ONCE U GET THIS CODE,  ;
;RECONNECT, SETTINGS    ;
;ARENT SET FOR YOU YET! ;
;;;;;;;;;;;;;;;;;;;;;;;;;

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 <1-9>
    notice $nick NeverWinFun (Cost: FREE) - !eToken neverwin <1-2>
    notice $nick Cointoss (Cost: 300) - !eToken cointoss <heads/tails>
    notice $nick Craps (Cost: Varies) - !eToken craps <1-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 <1-2> | HALT }
    notice $nick The number must be 1 or 2.
  }
  if ($2 == lotto) {
    if ($3 == $null) { /notice $nick Correct Format: !eToken lotto <1-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

;;;;;;;;;;;;;;;;;;;;;;;;;
;Macro                  ;
;;;;;;;;;;;;;;;;;;;;;;;;;
menu * { 
  .eToken:/dialog -md etoken etoken
}
dialog etoken {
  title "eToken"
  size -1 -1 310 310
  option dbu
  button "Password", 1, 5 5 50 12
  edit "New Password", 2, 60 5 50 12, center autohs
  button "Withdraw", 3, 5 20 50 12
  edit "Amount", 4, 60 20 50 12, center autohs  
  button "Deposit", 5, 5 35 50 12
  edit "Amount", 6, 60 35 50 12, center autohs
  button "Rape", 7, 5 50 50 12
  edit "Person", 8, 60 50 50 12, center autohs
  button "Cure STD", 9, 5 65 50 12
  edit "Amount", 10, 60 65 50 12, center autohs
  button "Sell Junk", 11, 5 80 50 12
  edit "Amount", 12, 60 80 50 12, center autohs
  button "View", 13, 5 95 50 12
  edit "Person", 14, 60 95 50 12, center autohs
  button "Force View", 15, 5 110 50 12
  edit "Person", 16, 60 110 50 12, center autohs
  button "Farm Upgrade", 17, 5 125 50 12
  edit "Arces?", 18, 60 125 50 12, center autohs
  button "Sell Weed", 19, 5 140 50 12
  edit "Amount", 20, 60 140 50 12, center autohs
  button "Hack", 21, 5 155 50 12
  edit "Person", 22, 60 155 50 12, center autohs
  button "Kick", 23, 5 170 50 12
  edit "Person", 24, 60 170 50 12, center autohs
  button "Change User Level", 25, 5 185 50 12
  edit "Person & Level", 26, 60 185 50 12, center autohs
  button "DDoS", 27, 5 200 50 12
  edit "Person", 28, 60 200 50 12, center autohs
  button "Drug View", 29, 5 215 50 12
  edit "Person", 30, 60 215 50 12, center autohs
  button "Buy Chemicals", 31, 5 230 50 12
  edit "Amount Combination", 32, 60 230 50 12, center autohs
  button "Sell Drugs", 33, 5 245 50 12
  edit "Amount Drug", 34, 60 245 50 12, center autohs
  button "PP check", 35, 5 260 50 12
  edit "Person", 36, 60 260 50 12, center autohs
  button "Arrest", 37, 5 275 50 12
  edit "Person", 38, 60 275 50 12, center autohs
  button "Tase", 39, 5 290 50 12
  edit "Person", 40, 60 290 50 12, center autohs
  list 41, 120 5 180 125, vsbar hsbar
  edit "", 42, 120 130 145 12, center autohs
  button "Submit", 43, 268 130 32 12
  button "Buy Ram", 44, 120 145 30 12
  button "Balance", 45, 150 145 30 12
  button "Slots", 46, 180 145 30 12
  button "Voice", 47, 210 145 30 12
  button "Halfop", 48, 240 145 30 12
  button "Op", 49, 270 145 30 12
  button "Admin", 50, 120 157 30 12
  button "SAdmin", 51, 150 157 30 12
  button "Owner", 52, 180 157 30 12
  button "Beg", 53, 210 157 30 12
  button "Sync", 54, 240 157 30 12
  button "UpCPU", 55, 270 157 30 12
  button "UpFire", 56, 120 169 30 12
  button "AFK", 57, 150 169 30 12
  button "Back", 58, 180 169 30 12
  button "Run", 59, 210 169 30 12
  button "Visit", 60, 240 169 30 12
  button "Buy Farm", 61, 270 169 30 12
  button "Plant", 62, 120 181 30 12
  button "Lockdown", 63, 150 181 30 12
  button "LDrugs", 64, 180 181 30 12
  button "Sell Gold", 65, 210 181 30 12
  button "Buy SOR", 66, 240 181 30 12
  button "Logout", 67, 270 181 30 12
  button "Fire", 68, 120 195 50 12
  edit "Person", 69, 175 195 50 12, center autohs
  button "Promote", 70, 120 210 50 12
  edit "Person", 71, 175 210 50 12, center autohs
  button "Deomote", 72, 120 225 50 12
  edit "Person", 73, 175 225 50 12, center autohs
  button "Ban", 74, 120 240 50 12
  edit "Person", 75, 175 240 50 12, center autohs
  button "Unban", 76, 120 255 50 12
  edit "Person", 77, 175 255 50 12, center autohs
  button "Add Tokens", 78, 120 270 50 12
  edit "Person & Amount", 79, 175 270 50 12, center autohs
  button "Del Tokens", 80, 120 285 50 12
  edit "Person & Amount", 81, 175 285 50 12, center autohs
}
on *:TEXT:*:#etokens: {
  if ($dialog(etoken)) { did -az etoken 41 < $+ $nick $+ > $1- }
}
on *:NOTICE:*:?: {
  if ($dialog(etoken)) { did -az etoken 41 < $+ $nick $+ > $1- }
}
on *:DIALOG:etoken:sclick:1: {
  if ($did($dname,2)) { /et etoken setpass $did($dname,2) }
}
on *:DIALOG:etoken:sclick:3: {
  if ($did($dname,4)) { msg #etokens !etoken bank withdrawal $did($dname,4) }
}
on *:DIALOG:etoken:sclick:5: {
  if ($did($dname,6)) { msg #etokens !etoken bank deposit $did($dname,6) }
}
on *:DIALOG:etoken:sclick:7: {
  if ($did($dname,8)) { msg #etokens !etoken rape $did($dname,8) }
}
on *:DIALOG:etoken:sclick:9: {
  if ($did($dname,10)) { msg #etokens !etoken curestd $did($dname,10) }
}
on *:DIALOG:etoken:sclick:11: {
  if ($did($dname,12)) { msg #etokens !etoken selljunk $did($dname,12) }
}
on *:DIALOG:etoken:sclick:13: {
  if ($did($dname,14)) { msg #etokens !etoken view $did($dname,14) }
}
on *:DIALOG:etoken:sclick:15: {
  if ($did($dname,16)) { msg #etokens !etoken forceview $did($dname,16) }
}
on *:DIALOG:etoken:sclick:17: {
  if ($did($dname,18)) { msg #etokens !etoken farm upgrade $did($dname,18) }
}
on *:DIALOG:etoken:sclick:19: {
  if ($did($dname,20)) { msg #etokens !etoken sellweed $did($dname,20) }
}
on *:DIALOG:etoken:sclick:21: {
  if ($did($dname,22)) { msg #etokens !etoken hack $did($dname,22) }
}
on *:DIALOG:etoken:sclick:23: {
  if ($did($dname,24)) { msg #etokens !etoken kick $did($dname,24) }
}
on *:DIALOG:etoken:sclick:25: {
  if ($did($dname,26)) { msg #etokens !etoken userlevel set $did($dname,26) }
}
on *:DIALOG:etoken:sclick:27: {
  if ($did($dname,28)) { msg #etokens !etoken dos $did($dname,28) }
}
on *:DIALOG:etoken:sclick:29: {
  if ($did($dname,30)) { msg #etokens !etoken Drugs View $did($dname,30) }
}
on *:DIALOG:etoken:sclick:31: {
  if ($did($dname,32)) { msg #etokens !etoken buychemicals $did($dname,32) }
}
on *:DIALOG:etoken:sclick:33: {
  if ($did($dname,34)) { msg #etokens !etoken Drugs sell $did($dname,34) }
}
on *:DIALOG:etoken:sclick:35: {
  if ($did($dname,36)) { msg #etokens !etoken check $did($dname,36) }
}
on *:DIALOG:etoken:sclick:37: {
  if ($did($dname,38)) { msg #etokens !etoken pd arrest $did($dname,38) }
}
on *:DIALOG:etoken:sclick:39: {
  if ($did($dname,40)) { msg #etokens !etoken pd tase $did($dname,40) }
}
on *:DIALOG:etoken:sclick:43: {
  if ($did($dname,42)) { msg #etokens $did($dname,42) | did -a etoken 41 < $+ $me $+ > $did($dname,42) }
}
on *:DIALOG:etoken:sclick:44: { msg #etokens !etoken buyram }
on *:DIALOG:etoken:sclick:45: { msg #etokens !etoken bank Balance }
on *:DIALOG:etoken:sclick:46: { msg #etokens !etoken slots }
on *:DIALOG:etoken:sclick:47: { msg #etokens !etoken voice }
on *:DIALOG:etoken:sclick:48: { msg #etokens !etoken halfop }
on *:DIALOG:etoken:sclick:49: { msg #etokens !etoken op }
on *:DIALOG:etoken:sclick:50: { msg #etokens !etoken adminop }
on *:DIALOG:etoken:sclick:51: { msg #etokens !etoken superadminop }
on *:DIALOG:etoken:sclick:52: { msg #etokens !etoken owner }
on *:DIALOG:etoken:sclick:53: { msg #etokens !etoken beg }
on *:DIALOG:etoken:sclick:54: { msg #etokens !etoken sync }
on *:DIALOG:etoken:sclick:55: { msg #etokens !etoken upgradecpu }
on *:DIALOG:etoken:sclick:56: { msg #etokens !etoken upgradefirewall }
on *:DIALOG:etoken:sclick:57: { msg #etokens !etoken AFK }
on *:DIALOG:etoken:sclick:58: { msg #etokens !etoken back }
on *:DIALOG:etoken:sclick:59: { msg #etokens !etoken run }
on *:DIALOG:etoken:sclick:60: { msg #etokens !etoken Visit }
on *:DIALOG:etoken:sclick:61: { msg #etokens !etoken farm buy }
on *:DIALOG:etoken:sclick:62: { msg #etokens !etoken farm plant }
on *:DIALOG:etoken:sclick:63: { msg #etokens !etoken lockdown }
on *:DIALOG:etoken:sclick:64: { msg #etokens !etoken drugs dealer list }
on *:DIALOG:etoken:sclick:65: { msg #etokens !etoken sellgold }
on *:DIALOG:etoken:sclick:66: { msg #etokens !etoken buysor }
on *:DIALOG:etoken:sclick:67: { msg #etokens !etoken Logout }
on *:DIALOG:etoken:sclick:68: {
  if ($did($dname,69)) { msg #etokens !etoken pd fire $did($dname,69) }
}
on *:DIALOG:etoken:sclick:70: {
  if ($did($dname,71)) { msg #etokens !etoken pd promote $did($dname,71) }
}
on *:DIALOG:etoken:sclick:72: {
  if ($did($dname,73)) { msg #etokens !etoken pd deomote $did($dname,73) }
}
on *:DIALOG:etoken:sclick:74: {
  if ($did($dname,75)) { msg #etokens !etoken ban $did($dname,75) }
}
on *:DIALOG:etoken:sclick:76: {
  if ($did($dname,77)) { msg #etokens !etoken unban $did($dname,77) }
}
on *:DIALOG:etoken:sclick:78: {
  if ($did($dname,79)) { msg #etokens !etoken add $did($dname,79) }
}
on *:DIALOG:etoken:sclick:80: {
  if ($did($dname,81)) { msg #etokens !etoken remove $did($dname,81) }
}

Favorite Script -

FURBY

Comments:
could shorten them sclick to like



on *:DIALOG:etoken:sclick:*: {

  if ($did == 78) { msg #etokens !etoken add $did($dname,79) }

} Posted by: FURBY

Smilies	Message:
	Comments:

X-Static Codes

Search

Scripting

Links

Sponsors

Stats

View

Official eToken Script