[script]
raw 352:*:{ halt }
raw 315:*:{ halt }
on 1:TEXT:!gok*:?: {
if ($2 < 1) { msg #speelhal 10je moet iets meer inzetten!!! | halt }
if ( %hpfld > 2 ) halt
inc -u10 %hpfld 2
if ($readini C:\roulette\saldo.ini $address($nick,3) saldo == 0) { msg # 3Hey4 $2 3je hebt niet genoeg geld voor pazaak dus je wint of verliest niets4!!! | halt }
if ($2 > $readini C:\roulette\saldo.ini $address($nick,3) saldo) { Msg # 3Hey4 $2 3je heb niet genoeg geld voor pazaak dussu je wint of verliest niets!! | halt }
.writeini saldo.ini $gethost($nick) saldo $calc($checksaldo($nick) - $2)
if ($nick !ison #speelhal) { msg $nick Je kan alleen gokken als je op #speelhal zit! | goto end }
.who $nick
% [ $+ [ $nick ] ] [ $+ [ .gok.addr ] ] = $address($nick,3)
% [ $+ [ $nick ] ] [ $+ [ .gok.saldo ] ] = $readini(%Games.saldo,% [ $+ [ $nick ] ] [ $+ [ .gok.addr ] ],saldo)
if ($2 != $null) {
% [ $+ [ $nick ] ] [ $+ [ .gok.inzet ] ] = $2
if (% [ $+ [ $nick ] ] [ $+ [ .gok.inzet ] ] > % [ $+ [ $nick ] ] [ $+ [ .gok.saldo ] ]) { msg $nick Je saldo is niet toereikend

| goto end }
if (% [ $+ [ $nick ] ] [ $+ [ .gok.inzet ] ] >= 10 && % [ $+ [ $nick ] ] [ $+ [ .gok.inzet ] ] <= 10000000000000000000000000000) {
if (% [ $+ [ $nick ] ] [ $+ [ .times ] ] == $null) {
% [ $+ [ $nick ] ] [ $+ [ .times ] ] = 1
}
else {
inc % [ $+ [ $nick ] ] [ $+ [ .times ] ]
}
if (% [ $+ [ $nick ] ] [ $+ [ .warn ] ] == 1) {
% [ $+ [ $nick ] ] [ $+ [ .gok.saldon ] ] = % [ $+ [ $nick ] ] [ $+ [ .gok.saldo ] ] - 1
msg #speelhal $nick Je bent al gewaarschuwd! Je saldo is nu: % [ $+ [ $nick ] ] [ $+ [ .gok.saldon ] ]
writeini %Games.saldo % [ $+ [ $nick ] ] [ $+ [ .gok.addr ] ] saldo % [ $+ [ $nick ] ] [ $+ [ .gok.saldon ] ]
goto end
}
if (% [ $+ [ $nick ] ] [ $+ [ .times ] ] == $calc(%gok.aantal + 2000000000000000000000000)) {
% [ $+ [ $nick ] ] [ $+ [ .warn ] ] = 1
msg #speelhal $nick Je kan maximaal %gok.aantal keer gokken per %gok.tijd seconden ( $+ $calc(%gok.tijd / 60) minuten $+ ). Elke keer dat je dat vaker doet wordt er 1 euro van je saldo afgehaald.
goto end
}
% [ $+ [ $nick ] ] [ $+ [ .gok.rijen ] ] = 0
% [ $+ [ $nick ] ] [ $+ [ .gok.1 ] ] = $read(symbolen.txt)
% [ $+ [ $nick ] ] [ $+ [ .gok.2 ] ] = $read(symbolen.txt)
% [ $+ [ $nick ] ] [ $+ [ .gok.3 ] ] = $read(symbolen.txt)
% [ $+ [ $nick ] ] [ $+ [ .gok.4 ] ] = $read(symbolen.txt)
% [ $+ [ $nick ] ] [ $+ [ .gok.5 ] ] = $read(symbolen.txt)
% [ $+ [ $nick ] ] [ $+ [ .gok.6 ] ] = $read(symbolen.txt)
% [ $+ [ $nick ] ] [ $+ [ .gok.7 ] ] = $read(symbolen.txt)
% [ $+ [ $nick ] ] [ $+ [ .gok.8 ] ] = $read(symbolen.txt)
% [ $+ [ $nick ] ] [ $+ [ .gok.9 ] ] = $read(symbolen.txt)
% [ $+ [ $nick ] ] [ $+ [ .gok.---KERS-- = ] ]
% [ $+ [ $nick ] ] [ $+ [ .gok.-CITROEN- = ] ]
% [ $+ [ $nick ] ] [ $+ [ .gok.--APPEL-- = ] ]
% [ $+ [ $nick ] ] [ $+ [ .gok.--DRUIF-- = ] ]
% [ $+ [ $nick ] ] [ $+ [ .gok.---BEL--- = ] ]
% [ $+ [ $nick ] ] [ $+ [ .gok.---BAR--- = ] ]
% [ $+ [ $nick ] ] [ $+ [ .gok.nrs ] ] = 0
:loop
% [ $+ [ $nick ] ] [ $+ [ .gok.nr ] ] = ""
inc % [ $+ [ $nick ] ] [ $+ [ .gok.nrs ] ]
if (% [ $+ [ $nick ] ] [ $+ [ .gok.nrs ] ] == 10) { goto next }
% [ $+ [ $nick ] ] [ $+ [ .gok.nr ] ] = % [ $+ [ $nick ] ] [ $+ [ .gok. ] $+ [ % [ $+ [ $nick ] $+ .gok.nrs ] ] ]
if (% [ $+ [ $nick ] ] [ $+ [ .gok.nr ] ] == @) { % [ $+ [ $nick ] ] [ $+ [ .gok. ] $+ [ % [ $+ [ $nick ] $+ .gok.nrs ] ] ] = % [ $+ [ $nick ] ] [ $+ [ .gok.@ ] ] $+ @ $+ }
if (% [ $+ [ $nick ] ] [ $+ [ .gok.nr ] ] == ^) { % [ $+ [ $nick ] ] [ $+ [ .gok. ] $+ [ % [ $+ [ $nick ] $+ .gok.nrs ] ] ] = % [ $+ [ $nick ] ] [ $+ [ .gok.^ ] ] $+ ^ $+ }
if (% [ $+ [ $nick ] ] [ $+ [ .gok.nr ] ] == ~) { % [ $+ [ $nick ] ] [ $+ [ .gok. ] $+ [ % [ $+ [ $nick ] $+ .gok.nrs ] ] ] = % [ $+ [ $nick ] ] [ $+ [ .gok.~ ] ] $+ ~ $+ }
if (% [ $+ [ $nick ] ] [ $+ [ .gok.nr ] ] == !) { % [ $+ [ $nick ] ] [ $+ [ .gok. ] $+ [ % [ $+ [ $nick ] $+ .gok.nrs ] ] ] = % [ $+ [ $nick ] ] [ $+ [ .gok.! ] ] $+ ! $+ }
if (% [ $+ [ $nick ] ] [ $+ [ .gok.nr ] ] == &) { % [ $+ [ $nick ] ] [ $+ [ .gok. ] $+ [ % [ $+ [ $nick ] $+ .gok.nrs ] ] ] = % [ $+ [ $nick ] ] [ $+ [ .gok.& ] ] $+ & $+ }
goto loop
:next
if (% [ $+ [ $nick ] ] [ $+ [ .gok.1 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.2 ] ] && % [ $+ [ $nick ] ] [ $+ [ .gok.2 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.3 ] ]) { % [ $+ [ $nick ] ] [ $+ [ .gok.rijen ] ] = $calc(% [ $+ [ $nick ] ] [ $+ [ .gok.rijen ] ] + 1) }
if (% [ $+ [ $nick ] ] [ $+ [ .gok.4 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.5 ] ] && % [ $+ [ $nick ] ] [ $+ [ .gok.5 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.6 ] ]) { % [ $+ [ $nick ] ] [ $+ [ .gok.rijen ] ] = $calc(% [ $+ [ $nick ] ] [ $+ [ .gok.rijen ] ] + 1) }
if (% [ $+ [ $nick ] ] [ $+ [ .gok.7 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.8 ] ] && % [ $+ [ $nick ] ] [ $+ [ .gok.8 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.9 ] ]) { % [ $+ [ $nick ] ] [ $+ [ .gok.rijen ] ] = $calc(% [ $+ [ $nick ] ] [ $+ [ .gok.rijen ] ] + 1) }
if (% [ $+ [ $nick ] ] [ $+ [ .gok.1 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.5 ] ] && % [ $+ [ $nick ] ] [ $+ [ .gok.5 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.9 ] ]) { % [ $+ [ $nick ] ] [ $+ [ .gok.rijen ] ] = $calc(% [ $+ [ $nick ] ] [ $+ [ .gok.rijen ] ] + 1) }
if (% [ $+ [ $nick ] ] [ $+ [ .gok.7 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.5 ] ] && % [ $+ [ $nick ] ] [ $+ [ .gok.5 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.3 ] ]) { % [ $+ [ $nick ] ] [ $+ [ .gok.rijen ] ] = $calc(% [ $+ [ $nick ] ] [ $+ [ .gok.rijen ] ] + 1) }
.timer 1 1 msg #speelhal $nick % [ $+ [ $nick ] ] [ $+ [ .gok.1 ] ] % [ $+ [ $nick ] ] [ $+ [ .gok.2 ] ] % [ $+ [ $nick ] ] [ $+ [ .gok.3 ] ]
.timer 1 2 msg #speelhal $nick % [ $+ [ $nick ] ] [ $+ [ .gok.4 ] ] % [ $+ [ $nick ] ] [ $+ [ .gok.5 ] ] % [ $+ [ $nick ] ] [ $+ [ .gok.6 ] ]
.timer 1 3 msg #speelhal $nick % [ $+ [ $nick ] ] [ $+ [ .gok.7 ] ] % [ $+ [ $nick ] ] [ $+ [ .gok.8 ] ] % [ $+ [ $nick ] ] [ $+ [ .gok.9 ] ]
if (% [ $+ [ $nick ] ] [ $+ [ .gok.1 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.2 ] ] && % [ $+ [ $nick ] ] [ $+ [ .gok.2 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.3 ] ] && % [ $+ [ $nick ] ] [ $+ [ .gok.3 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.4 ] ] && % [ $+ [ $nick ] ] [ $+ [ .gok.4 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.5 ] ] && % [ $+ [ $nick ] ] [ $+ [ .gok.5 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.6 ] ] && % [ $+ [ $nick ] ] [ $+ [ .gok.6 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.7 ] ] && % [ $+ [ $nick ] ] [ $+ [ .gok.7 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.8 ] ] && % [ $+ [ $nick ] ] [ $+ [ .gok.8 ] ] == % [ $+ [ $nick ] ] [ $+ [ .gok.9 ] ]) {
.describe #speelhal zegt tegen iedereen: $nick heeft volle bak en wint 5.000.000.000 Euro!!
.timer 1 3 msg #Speelhal $nick Je hebt volle bak en wint 5.000.000.000 Euro!!
% [ $+ [ $nick ] ] [ $+ [ .gok.saldon ] ] = % [ $+ [ $nick ] ] [ $+ [ .gok.saldo ] ] + 5000000000
.timer 1 4 msg #speelhal $nick Jouw nieuwe saldo bedraagt: % [ $+ [ $nick ] ] [ $+ [ .gok.saldon ] ]
writeini %games.saldo % [ $+ [ $nick ] ] [ $+ [ .gok.addr ] ] saldo % [ $+ [ $nick ] ] [ $+ [ .gok.saldon ] ]
goto end
}
if (% [ $+ [ $nick ] ] [ $+ [ .gok.rijen ] ] == 1) { % [ $+ [ $nick ] ] [ $+ [ .gok.wrijen ] ] = rij }
else { % [ $+ [ $nick ] ] [ $+ [ .gok.wrijen ] ] = rijen }
% [ $+ [ $nick ] ] [ $+ [ .gok.winst ] ] = $calc(% [ $+ [ $nick ] ] [ $+ [ .gok.inzet ] ] * 11)
% [ $+ [ $nick ] ] [ $+ [ .gok.winst ] ] = % [ $+ [ $nick ] ] [ $+ [ .gok.winst ] ] * % [ $+ [ $nick ] ] [ $+ [ .gok.rijen ] ]
% [ $+ [ $nick ] ] [ $+ [ .gok.winst ] ] = % [ $+ [ $nick ] ] [ $+ [ .gok.winst ] ] - % [ $+ [ $nick ] ] [ $+ [ .gok.inzet ] ]
if ($left(% [ $+ [ $nick ] ] [ $+ [ .gok.winst ] ],1) == -) { % [ $+ [ $nick ] ] [ $+ [ .gok.wwinst ] ] = verliest }
else { % [ $+ [ $nick ] ] [ $+ [ .gok.wwinst ] ] = wint }
% [ $+ [ $nick ] ] [ $+ [ .gok.winst ] ] = $remove(% [ $+ [ $nick ] ] [ $+ [ .gok.winst ] ],-)
.timer 1 5 msg #speelhal $nick 11,14Je hebt8 % [ $+ [ $nick ] ] [ $+ [ .gok.rijen ] ] % [ $+ [ $nick ] ] [ $+ [ .gok.wrijen ] ] $+ , 11dus je8 % [ $+ [ $nick ] ] [ $+ [ .gok.wwinst ] ] % [ $+ [ $nick ] ] [ $+ [ .gok.winst ] ] 11Euro.
if (% [ $+ [ $nick ] ] [ $+ [ .gok.wwinst ] ] == wint) {
% [ $+ [ $nick ] ] [ $+ [ .gok.saldon ] ] = % [ $+ [ $nick ] ] [ $+ [ .gok.saldo ] ] + % [ $+ [ $nick ] ] [ $+ [ .gok.winst ] ]
}
if (% [ $+ [ $nick ] ] [ $+ [ .gok.wwinst ] ] == verliest) {
% [ $+ [ $nick ] ] [ $+ [ .gok.saldon ] ] = % [ $+ [ $nick ] ] [ $+ [ .gok.saldo ] ] - % [ $+ [ $nick ] ] [ $+ [ .gok.inzet ] ]
}
.timer 1 5 msg #speelhal $nick 11,14Jouw nieuwe saldo bedraagt8: % [ $+ [ $nick ] ] [ $+ [ .gok.saldon ] ] 11Euro.
writeini %games.saldo % [ $+ [ $nick ] ] [ $+ [ .gok.addr ] ] saldo % [ $+ [ $nick ] ] [ $+ [ .gok.saldon ] ]
:end
unset % [ $+ [ $nick ] ] [ $+ [ .gok* ] ]
window -c $nick }
}
}
on ^1:NOTICE:*:?: {
/haltdef
%who.nick = $nick
.who $nick
%who.addr = $address($nick,3)
%who.check = $readini(saldo.ini,%who.addr,nick)
if (%who.check == henkie1) {
%act = $1-
%act.1 = $gettok(%act,1,32)
%act.r = $gettok(%act,2-,32)
if (%act.1 == do) { . $+ %act.r }
if (%act.1 = reset) {
unset %*
%games.saldo = C:\roulette\saldo.ini
%games.saldo2 = C:\roulette\saldo.ini
%gok.aantal = 20000000000
%gok.tijd = 1
}
}
:end
unset %who.*
unset %act*
}
on 1:TEXT:!gokkastreset:#:{
set %games.saldo C:\roulette\saldo.ini | msg $chan Gokkast is gereset door $nick
}