;##########################################
; spuzzy2@hotmail.com
;##########################################

alias getinfo { return 3 $+ $readini(Players\ $+ $1 $+ .ini,$1,$2) $+ 10 }
alias getinfo2 { return $readini(Players\ $+ $1 $+ .ini,$1,$2) }
alias getinfo3 { return $readini(PlayerLogs\ $+ $1 $+ .ini,$1,$2) }
alias getinfo4 { return $readini(GangLogs\ $+ $1 $+ .ini,$1,$2) }
alias getstat { return $readini(players\ $+ $1 $+ .ini,$1,STAT) }


alias Money_Game_MENU {
  writeini players\ $+ $1 $+ .ini $1 STAT money
  msg = $+ $1  $space
  msg = $+ $1 7Money Game
  msg = $+ $1  $space
  msg = $+ $1 10You have3 $getinfo2($1,ENERGY) Energy
  msg = $+ $1 10It will cost you3 3 ENERGY10 to attempt!
  msg = $+ $1 10You have3 $calc( 20 - $getinfo2($1,money)) 10money game trys left!
  msg = $+ $1  $space
  msg = $+ $1 [Play]:10 Play Money Game (60% chance)
  msg = $+ $1  $space
  msg = $+ $1 10[3WALK10]: Go back
  halt

}

alias Money_Game_PLAY {
  msg = $+ $1 10You take come to play and win 1 Billion Bucks ...
  %player.money = $getinfo2($1,money)
  if %player.money == 20 { msg = $+ $1 10You may only attempt to Win 1 Billion Bucks 20 times every reset! | halt }
  %player.eng = $getinfo2($1,ENERGY)
  if %player.eng == 0 { msg = $+ $1 10You have no energy left! | halt }
  if %player.eng < 3 { msg = $+ $1 10You do not have enough energy to attempt to Win 1 Billion Bucks You Might Pass Out! | halt }
  inc %player.money 1
  writeini players\ $+ $1 $+ .ini $1 money %player.money
  %player.eng = $calc( %player.eng - 3)
  writeini Players\ $+ $1 $+ .ini $1 ENERGY %player.eng

  :battlesafe
  %attack.roll = $rand(1,10)
  if %attack.roll == 1 {
    msg = $+ $1 10You have played The Game And Won.....ohhh not the 1 billion! You gain3 $ $+ 500 000!
    %player.bank = $getinfo2($1,BANK)
    %player.bank = $calc( %player.bank + 5000000)
    writeini Players\ $+ $1 $+ .ini $1 BANK %player.bank
  }
  if %attack.roll == 2 {
    /msg #all-out-war 3 $nick 10You have played The Game And Won.....ohhh not the 1 billion! You gain3 $ $+ 500 000!
    %player.bank = $getinfo2($1,BANK)
    %player.bank = $calc( %player.bank + 5000000)
    writeini Players\ $+ $1 $+ .ini $1 BANK %player.bank
  }
  if %attack.roll == 3 {
   /msg #all-out-war 3 $nick 10has Played The Money Game And Has Just Won 1 Billion Dollars! $nick gains3 $ $+ 10000 00000!
    msg = $+ $1 10You have Played The Game And....Have Just Won 1 Billion Dollars! You gain3 $ $+ 100000 000000!
    %player.bank = $getinfo2($1,BANK)
    %player.bank = $calc( %player.cash + 10000000000)
    writeini Players\ $+ $1 $+ .ini $1 BANK %player.bank
  }
  if %attack.roll == 4 {
    msg = $+ $1 10You have played The Game And Won.....ohhh not the 1 billion! You gain3 $ $+ 50000 00000!
    %player.bank = $getinfo2($1,BANK)
    %player.bank = $calc( %player.bank + 500000000)
    writeini Players\ $+ $1 $+ .ini $1 BANK %player.bank
  }
  if %attack.roll == 5 {
    msg = $+ $1 10You have played The Game And Won.....ohhh not the 1 billion! You gain3 $ $+ 5000 000!
    %player.bank = $getinfo2($1,BANK)
    %player.bank = $calc( %player.bank + 5000000)
    writeini Players\ $+ $1 $+ .ini $1 BANK %player.bank
  }
  if %attack.roll == 6 {
    msg = $+ $1 10You have played The Game And Won.....ohhh not the 1 billion! You gain3 $ $+ 500 000!
    %player.bank = $getinfo2($1,BANK)
    %player.bank = $calc( %player.bank + 500000)
    writeini Players\ $+ $1 $+ .ini $1 BANK %player.bank
  }
  if %attack.roll == 7 { msg = $+ $1 10You failed to Win 1 Billion Bucks! Better luck next time }
  if %attack.roll == 8 { msg = $+ $1 10You failed to Win 1 Billion Bucks! Better luck next time }
  if %attack.roll == 9 { msg = $+ $1 10You failed to Win 1 Billion Bucks! Better luck next time }
  if %attack.roll == 10 {
    msg = $+ $1 10You have been bust by the police and fined3 $ $+ 1000000000!
    /msg #all-out-war 10 $nick has been busted by the police and fined for 100000000 Dollars!
    %player.bank = $getinfo2($1,BANK)
    %player.bank = $calc( %player.bank - 1000000000)
    writeini Players\ $+ $1 $+ .ini $1 BANK %player.bank
    halt
  }
}