I have recently acquired the Superslots code and was wondering if someone could tell me which pieces of the code
i would have to edit to raise the amount of trivia points that it would give out for each type of win...
I have added my code below and any help would be very much appreciated... :)
#slots on
alias ShowSlotsSpin {
mstat *s1 b) 4 -\ Current Jackpot = %pot.pool b)
2 - $chr(124) %slots1 $chr(124) %slots2 $chr(124) %slots3 $chr(124) %slots4 $chr(124) %slots5 $chr(124) b)
1 - $chr(124) %slots6 $chr(124) %slots7 $chr(124) %slots8 $chr(124) %slots9 $chr(124) %slots10 $chr(124) b)
3 - $chr(124) %slots11 $chr(124) %slots12 $chr(124) %slots13 $chr(124) %slots14 $chr(124) %slots15 $chr(124) b)
5 -/ Since Jackpot = %sinceJackpot a
}
alias ScatteredRowWin {
set %slotsBooty 10000
mstat *s1 $webnick($nick) Wins %slotsBooty for Scattered Win
stx_addpoints $webnick($nick) %slotsBooty
tell $webnick($nick) You win %slotsBooty Your balance is now $hof(p,$webnick($nick))
}
alias SlotsJackpot {
mstat *s3 JACKPOT!!!! you have won %pot.pool Points $webnick($nick) with 5 %slotsWinChar on Line %slotsline
stx_addpoints $webnick($nick) %pot.pool
set %pot.pool 50000
set %slots.pot.winner $webnick($nick)
set %sinceJackpot 0
}
alias PayWinSlots {
SlotsWinFctr
stx_addpoints $webnick($nick) %SlotsIncTriv
set %payWinSlots %slotsWinFctr
if ( %slotsWild == 1 ) {
set %payWinSlots $calc(%slotsWinFctr * 10)
mstat *s1 $webnick($nick) Wins %payWinSlots with %slotsLength %slotsWinChar on Line %slotsline (WildCard Win)
}
set %slotsBooty %payWinSlots
PaySlotsST50
}
alias PaySlotsSt50 {
if ( %slotsWild == 0 ) mstat *s1 $webnick($nick) Wins %slotsBooty with %slotsLength %slotsWinChar on Line %slotsline
set %slotsWild 0
stx_addpoints $webnick($nick) %slotsBooty
tell $webnick($nick) you win %slotsBooty Your balance is now $hof(p,$webnick($nick))
}
on *:TEXT:!slots*:#:{
if (%spunslots. [ $+ [ $webnick($nick) ] ] = played) {
SpinWait
Return
}
if ($2 == $null) || ($2 < 1) {
set %spin.line 1
set %slotsPunt 100
goto spinner
}
if ($2 > 5) {
set %spin.line 5
set %slotsPunt 500
msg # 5 is the max number of lines you can bet on $webnick($nick)
goto Spinner
}
if ($2 == 5) {
set %spin.line 5
set %slotsPunt 500
goto Spinner
}
if ($2 == 4) {
set %spin.line 4
set %slotsPunt 400
goto Spinner
}
if ($2 == 3) {
set %spin.line 3
set %slotsPunt 300
goto Spinner
}
if ($2 == 2) {
set %spin.line 2
set %slotsPunt 200
goto Spinner
}
if ($2 == 1) {
set %spin.line 1
set %slotsPunt 100
goto Spinner
}
else { .msg # $webnick($nick) please use a number between 1 - 5 to bet on multiple lines, eg. !slots 3 | return }
:spinner {
if ( $hof(p,$webnick($nick)) < %slotsPunt ) { mstat *s3 Sorry You Dont Have enough Points | return }
stx_addpoints $webnick($nick) - $+ %slotsPunt
tell $webnick($nick) You have bet on %spin.line Lines at a cost of %slotsPunt Your balance is now $hof(p,$webnick($nick))
inc %pot.pool %slotsPunt
inc %sinceJackpot
set %slotsBooty 0
set %slotsWild 0
if ( %sinceJackpot < 10 ) { set %sinceJackpot 00 $+ %sinceJackpot }
elseif ( %sinceJackpot < 100 ) { set %sinceJackpot 0 $+ %sinceJackpot }
set %slots1 $replace($rand(1,6),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(r))
set %slots2 $replace($rand(1,6),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(r))
set %slots3 $replace($rand(1,7),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(mo))
set %slots4 $replace($rand(1,6),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(r))
set %slots5 $replace($rand(1,6),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(r))
set %slots6 $replace($rand(1,6),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(r))
set %slots7 $replace($rand(1,7),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(mo))
set %slots8 $replace($rand(1,6),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(r))
set %slots9 $replace($rand(1,7),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(mo))
set %slots10 $replace($rand(1,6),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(r))
set %slots11 $replace($rand(1,6),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(r))
set %slots12 $replace($rand(1,6),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(r))
set %slots13 $replace($rand(1,7),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(mo))
set %slots14 $replace($rand(1,6),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(r))
set %slots15 $replace($rand(1,6),1,(r),2,(L),3,(g),4,(au),5,(8),6,(mo),7,(r))
set -u120 %spunslots. [ $+ [ $webnick($nick) ] ] played
ShowSlotsSpin
CheckWinSlots
}
}
alias CheckWinSlots {
if ( %spin.line == 1 ) {
Slotsline1
ScatteredRow
}
if ( %spin.line == 2 ) {
Slotsline1
Slotsline2
ScatteredRow
}
if ( %spin.line == 3 ) {
Slotsline1
Slotsline2
Slotsline3
ScatteredRow
}
if ( %spin.line == 4 ) {
Slotsline1
Slotsline2
Slotsline3
Slotsline4
ScatteredRow
}
if ( %spin.line == 5 ) {
SlotsLine1
SlotsLine2
SlotsLine3
SlotsLine4
SlotsLine5
ScatteredRow
}
}
alias ScatteredRow {
if (%slots6 == %slots7) || (%slots6 == %slots2) || (%slots6 == %slots12) {
if (%slots6 == %slots8) || (%slots6 == %slots3) || (%slots6 == %slots13) {
if (%slots6 == %slots9) || (%slots6 == %slots4) || (%slots6 == %slots14) {
if (%slots6 == %slots10) || (%slots6 == %slots5) || (%slots6 == %slots15) {
ScatteredRowWin
return
}
}
}
}
if (%slots1 == %slots7) || (%slots1 == %slots2) || (%slots1 == %slots12) {
if (%slots1 == %slots8) || (%slots1 == %slots3) || (%slots1 == %slots13) {
if (%slots1 == %slots9) || (%slots1 == %slots4) || (%slots1 == %slots14) {
if (%slots1 == %slots10) || (%slots1 == %slots5) || (%slots1 == %slots15) {
ScatteredRowWin
return
}
}
}
}
if (%slots11 == %slots7) || (%slots11 == %slots2) || (%slots11 == %slots12) {
if (%slots11 == %slots8) || (%slots11 == %slots3) || (%slots11 == %slots13) {
if (%slots11 == %slots9) || (%slots11 == %slots4) || (%slots11 == %slots14) {
if (%slots11 == %slots10) || (%slots11 == %slots5) || (%slots11 == %slots15) {
ScatteredRowWin
return
}
}
}
}
}
;----------- Line 1
alias SlotsLine1 {
if (%slots6 == %slots7) && (%slots7 == %slots8) && (%slots8 == %slots9) && (%slots9 == %slots10) {
set %slotsWinChar %slots6
set %slotsLine 1
SlotsJackpot
halt
}
if (%slots6 == %slots7) && (%slots7 == %slots8) && (%slots8 == %slots9) {
;xxxxr or rrrrx
if ( %slots10 == (r) ) || (%slots6 == (r) ) { slotsLn1Col5 | return }
set %slotsWild 0
set %slotLength 4
set %slotsWinChar %slots6
set %slotsLine 1
set %slotsWinFctr 50
PayWinSlots
return
}
;xxx or rrr
if (%slots6 == %slots7) && (%slots7 == %slots8) {
;xxxr or rrrr
if ( %slots9 == (r) ) {
;xxxrx or xxxrr
if ( %slots10 == %slots6 ) || ( %slots10 == (r) ) {
slotsLn1Col5
return
}
slotsLn1Col4
return
}
;rrr
if ( %slots8 == (r) ) { slotsLn1Col3 | return }
;xxx
else {
set %slotsWild 0
set %slotLength 3
set %slotsWinChar %slots6
set %slotsLine 1
set %slotsWinFctr 20
PayWinSlots
return
}
}
;xx or rr
if (%slots6 == %slots7) {
;xxr or rrr
if ( %slots8 == (r) ) {
;xxrr or rrrr
if ( %slots9 == (r) ) {
;xxrrr or rrrrr or xxrrx
if ( %slots10 == (r) ) || (%slots10 == %slots6) { slotsLn1Col5 | return }
slotsLn1Col4
return
}
slotsLn1Col3
return
}
}
;rx or xr
if (%slots6 == (r) ) || (%slots7 == (r) ) {
set %slotsWild 1
slotsLn1Col2
}
}
alias slotsLn1Col2 {
set %slotsWild 1
;rxr or xrr
if (%slots8 == (r) ) {
;rxrx or xrrr
if (%slots7 == %slots9) {
;rxrxx or xrrrr
if (%slots7 == %slots10 ) { slotsLn1Col5 | return }
slotsLn1Col4
return
}
slotsLn1Col3
Return
}
;rxx
if (%slots7 == %slots8) { slotsLn1Col3 | return }
;xrx
if (%slots6 == %slots8) {
;xrxx or xrxr
if (%slots6 == %slots9) || (%slots9 == (r) ) {
;xrxrx or xrxrr
if (%slots6 == %slots10) || (%slots10 == (r) ) { slotsLn1Col5 | return }
slotsLn1Col4
return
}
set %slotsWinFctr 20
set %slotsWinChar %slots8
set %slotsLine 1
set %slotsLength 3
PayWinSlots
}
;rrx
if (%slots6 == %slots7) {
;rrxx
if (%slots8 == %slots9) || (%slots9 == (r) ) { slotsLn1Col4 | return }
set %slotLength 3
set %slotsWinChar %slots8
set %slotsLine 1
set %slotsWinFctr 20
PayWinSlots
return
}
}
alias slotsLn1Col3 {
set %slotsWild 1
;rxxr or rxrr or xrrr or xxrr
if (%slots9 == (r) ) {
slotsLn1Col4
Return
}
;xrrr or rrrr or rxrr or xrrx
if (%slots8 == %slots9) || (%slots6 == %slots9) { slotsLn1Col4 | return }
;rrrx
if (%slots6 == %slots7) && (%slots7 == %slots8) { slotsLn1Col4 | return }
set %slotsWinFctr 20
set %slotsLine 1
set %slotsLength 3
if ( %slots6 != (r) ) set %slotsWinChar %slots6
elseif ( %slots7 != (r) ) set %slotsWinChar %slots7
elseif ( %slots8 != (r) ) set %slotsWinChar %slots8
PayWinSlots
}
alias slotsLn1Col4 {
set %slotsWild 1
if (%slots10 == (r) ) {
slotsLn1Col5
return
}
if (%slots9 == %slots10) {
set %slotsWinFctr 100
set %slotsLine 1
set %slotsLength 5
if ( %slots6 != (r) ) set %slotsWinChar %slots6
elseif ( %slots7 != (r) ) set %slotsWinChar %slots7
elseif ( %slots8 != (r) ) set %slotsWinChar %slots8
elseif ( %slots9 != (r) ) set %slotsWinChar %slots9
elseif ( %slots10 != (r) ) set %slotsWinChar %slots10
PayWinSlots
return
}
set %slotsWinFctr 50
set %slotsLine 1
set %slotsLength 4
if ( %slots6 != (r) ) set %slotsWinChar %slots6
elseif ( %slots7 != (r) ) set %slotsWinChar %slots7
elseif ( %slots8 != (r) ) set %slotsWinChar %slots8
elseif ( %slots9 != (r) ) set %slotsWinChar %slots9
PayWinSlots
}
alias slotsLn1Col5 {
set %slotsWild 1
set %slotsWinFctr 100
set %slotsLine 1
set %slotsLength 5
if ( %slots6 != (r) ) set %slotsWinChar %slots6
elseif ( %slots7 != (r) ) set %slotsWinChar %slots7
elseif ( %slots8 != (r) ) set %slotsWinChar %slots8
elseif ( %slots9 != (r) ) set %slotsWinChar %slots9
elseif ( %slots10 != (r) ) set %slotsWinChar %slots10
PayWinSlots
}
;--------------Line 2
alias SlotsLine2 {
if (%slots1 == %slots2) && (%slots2 == %slots3) && (%slots3 == %slots4) && (%slots4 == %slots5) {
set %slotsWinChar %slots1
set %slotsLine 2
SlotsJackpot
halt
}
if (%slots1 == %slots2) && (%slots2 == %slots3) && (%slots3 == %slots4) {
if ( %slots5 == (r) ) || (%slots1 == (r) ) { slotsLn2Col5 | return }
set %slotsWild 0
set %slotLength 4
set %slotsWinChar %slots1
set %slotsLine 2
set %slotsWinFctr 50
PayWinSlots
return
}
if (%slots1 == %slots2) && (%slots2 == %slots3) {
if ( %slots4 == (r) ) {
if ( %slots5 == %slots1 ) || ( %slots5 == (r) ) {
slotsLn2Col5
return
}
slotsLn2Col4
return
}
if ( %slots3 == (r) ) { slotsLn2Col3 | return }
else {
set %slotsWild 0
set %slotLength 3
set %slotsWinChar %slots1
set %slotsLine 2
set %slotsWinFctr 20
PayWinSlots
return
}
}
if (%slots1 == %slots2) {
if ( %slots3 == (r) ) {
if ( %slots4 == (r) ) {
if ( %slots5 == (r) ) || (%slots1 == %slots5) { slotsLn2Col5 | return }
slotsLn2Col4
return
}
slotsLn2Col3
return
}
if (%slots1 == (r) ) {
set %slotsWild 1
set %slotLength 3
set %slotsWinChar %slots3
set %slotsLine 2
set %slotsWinFctr 20
PayWinSlots
return
}
}
if (%slots1 == (r) ) || (%slots2 == (r) ) {
slotsLn2Col2
}
}
alias slotsLn2Col2 {
set %slotsWild 1
if (%slots3 == (r) ) {
if (%slots2 == %slots4) {
if (%slots5 == %slots5 ) { slotsLn2Col5 | return }
slotsLn2Col4
return
}
slotsLn2Col3
return
}
if (%slots2 == %slots3) { slotsLn2Col3 | return }
if (%slots1 == %slots3) {
if (%slots3 == %slots4) || (%slots4 == (r) ) {
if (%slots1 == %slots5) || (%slots5 == (r) ) { slotsLn2Col5 | return }
slotsLn2Col4
return
}
set %slotsWinFctr 20
set %slotsWinChar %slots3
set %slotsLine 2
set %slotsLength 3
PayWinSlots
}
if (%slots1 == %slots2) {
if (%slots3 == %slots4) || (%slots4 == (r) ) { slotsLn2Col4 | return }
set %slotLength 3
set %slotsWinChar %slots3
set %slotsLine 2
set %slotsWinFctr 20
PayWinSlots
return
}
}
alias slotsLn2Col3 {
set %slotsWild 1
if (%slots4 == (r) ) {
slotsLn2Col4
return
}
if (%slots3 == %slots4) || (%slots1 == %slots4) { slotsLn2Col4 | return }
if (%slots1 == %slots2) && (%slots2 == %slots3) { slotsLn2Col4 | return }
else {
set %slotsWinFctr 20
set %slotsLine 2
set %slotsLength 3
if ( %slots1 != (r) ) set %slotsWinChar %slots1
elseif ( %slots2 != (r) ) set %slotsWinChar %slots2
elseif ( %slots3 != (r) ) set %slotsWinChar %slots3
PayWinSlots
}
}
alias slotsLn2Col4 {
set %slotsWild 1
if (%slots5 == (r) ) {
slotsLn2Col5
return
}
if (%slots4 == %slots5) {
set %slotsWinFctr 100
set %slotsLine 2
set %slotsLength 5
if ( %slots1 != (r) ) set %slotsWinChar %slots1
elseif ( %slots2 != (r) ) set %slotsWinChar %slots2
elseif ( %slots3 != (r) ) set %slotsWinChar %slots3
elseif ( %slots4 != (r) ) set %slotsWinChar %slots4
elseif ( %slots5 != (r) ) set %slotsWinChar %slots5
PayWinSlots
}
else {
set %slotsWinFctr 50
set %slotsLine 2
set %slotsLength 4
if ( %slots1 != (r) ) set %slotsWinChar %slots1
elseif ( %slots2 != (r) ) set %slotsWinChar %slots2
elseif ( %slots3 != (r) ) set %slotsWinChar %slots3
elseif ( %slots4 != (r) ) set %slotsWinChar %slots4
PayWinSlots
}
}
alias slotsLn2Col5 {
set %slotsWild 1
set %slotsWinFctr 100
set %slotsLine 2
set %slotsLength 5
if ( %slots1 != (r) ) set %slotsWinChar %slots1
elseif ( %slots2 != (r) ) set %slotsWinChar %slots2
elseif ( %slots3 != (r) ) set %slotsWinChar %slots3
elseif ( %slots4 != (r) ) set %slotsWinChar %slots4
elseif ( %slots5 != (r) ) set %slotsWinChar %slots5
PayWinSlots
}
;--------------Line 3
alias SlotsLine3 {
if (%slots11 == %slots12) && (%slots12 == %slots13) && (%slots13 == %slots14) && (%slots14 == %slots15) {
set %slotsWinChar %slots11
set %slotsLine 3
SlotsJackpot
halt
}
if (%slots11 == %slots12) && (%slots12 == %slots13) && (%slots13 == %slots14) {
if ( %slots15 == (r) ) || (%slots11 == (r) ) { slotsLn3Col5 | return }
set %slotsWild 0
set %slotLength 4
set %slotsWinChar %slots11
set %slotsLine 3
set %slotsWinFctr 50
PayWinSlots
return
}
if (%slots11 == %slots12) && (%slots12 == %slots13) {
if ( %slots14 == (r) ) {
if ( %slots15 == %slots11 ) || ( %slots15 == (r) ) {
slotsLn3Col5
return
}
slotsLn3Col4
return
}
if ( %slots13 == (r) ) { slotsLn3Col3 | return }
else {
set %slotsWild 0
set %slotLength 3
set %slotsWinChar %slots11
set %slotsLine 3
set %slotsWinFctr 20
PayWinSlots
return
}
}
if (%slots11 == %slots12) {
if ( %slots13 == (r) ) {
if ( %slots14 == (r) ) {
if ( %slots15 == (r) ) || (%slots11 == %slots15) { slotsLn3Col5 | return }
slotsLn3Col4
return
}
slotsLn3Col3
return
}
if (%slots11 == (r) ) {
set %slotsWild 1
set %slotLength 3
set %slotsWinChar %slots13
set %slotsLine 3
set %slotsWinFctr 20
PayWinSlots
return
}
}
if (%slots11 == (r) ) || (%slots12 == (r) ) {
slotsLn3Col2
}
}
alias slotsLn3Col2 {
set %slotsWild 1
if (%slots13 == (r) ) {
if (%slots12 == %slots14) {
if (%slots12 == %slots15 ) { slotsLn3Col5 | return }
slotsLn3Col4
return
}
slotsLn3Col3
return
}
if (%slots12 == %slots13) { slotsLn3Col3 | return }
if (%slots11 == %slots13) {
if (%slots13 == %slots14) || (%slots14 == (r) ) {
if (%slots11 == %slots15) || (%slots15 == (r) ) { slotsLn3Col5 | return }
slotsLn2Col4
return
}
set %slotsWinFctr 20
set %slotsWinChar %slots13
set %slotsLine 3
set %slotsLength 3
PayWinSlots
}
if (%slots11 == %slots12) {
if (%slots13 == %slots14) || (%slots14 == (r) ) { slotsLn3Col4 | return }
set %slotLength 3
set %slotsWinChar %slots13
set %slotsLine 3
set %slotsWinFctr 20
PayWinSlots
return
}
}
alias slotsLn3Col3 {
set %slotsWild 1
if (%slots14 == (r) ) {
slotsLn3Col4
return
}
if (%slots13 == %slots14) || (%slots11 == %slots14) { slotsLn3Col4 | return }
if (%slots11 == %slots12) && (%slots12 == %slots13) { slotsLn3Col4 | return }
else {
set %slotsWinFctr 20
set %slotsLine 3
set %slotsLength 3
if ( %slots11 != (r) ) set %slotsWinChar %slots11
elseif ( %slots12 != (r) ) set %slotsWinChar %slots12
elseif ( %slots13 != (r) ) set %slotsWinChar %slots13
PayWinSlots
}
}
alias slotsLn3Col4 {
set %slotsWild 1
if (%slots15 == (r) ) {
slotsLn3Col5
return
}
if (%slots14 == %slots15) {
set %slotsWinFctr 100
set %slotsLine 3
set %slotsLength 5
if ( %slots11 != (r) ) set %slotsWinChar %slots11
elseif ( %slots12 != (r) ) set %slotsWinChar %slots12
elseif ( %slots13 != (r) ) set %slotsWinChar %slots13
elseif ( %slots14 != (r) ) set %slotsWinChar %slots14
elseif ( %slots15 != (r) ) set %slotsWinChar %slots15
PayWinSlots
}
else {
set %slotsWinFctr 50
set %slotsLine 3
set %slotsLength 4
if ( %slots11 != (r) ) set %slotsWinChar %slots11
elseif ( %slots12 != (r) ) set %slotsWinChar %slots12
elseif ( %slots13 != (r) ) set %slotsWinChar %slots13
elseif ( %slots14 != (r) ) set %slotsWinChar %slots14
PayWinSlots
}
}
alias slotsLn3Col5 {
set %slotsWild 1
set %slotsWinFctr 100
set %slotsLine 3
set %slotsLength 5
if ( %slots11 != (r) ) set %slotsWinChar %slots11
elseif ( %slots12 != (r) ) set %slotsWinChar %slots12
elseif ( %slots13 != (r) ) set %slotsWinChar %slots13
elseif ( %slots14 != (r) ) set %slotsWinChar %slots14
elseif ( %slots15 != (r) ) set %slotsWinChar %slots15
PayWinSlots
}
;--------------Line 4
alias SlotsLine4 {
if (%slots1 == %slots7) && (%slots7 == %slots13) && (%slots13 == %slots9) && (%slots9 == %slots5) {
set %slotsWinChar %slots1
set %slotsLine 4
SlotsJackpot
halt
}
if (%slots1 == %slots7) && (%slots7 == %slots13) && (%slots13 == %slots9) {
if ( %slots5 == (r) ) || (%slots1 == (r) ) { slotsLn4Col5 | return }
set %slotsWild 0
set %slotLength 4
set %slotsWinChar %slots1
set %slotsLine 4
set %slotsWinFctr 50
PayWinSlots
return
}
if (%slots1 == %slots7) && (%slots7 == %slots13) {
if ( %slots9 == (r) ) {
if ( %slots5 == %slots1 ) || ( %slots5 == (r) ) {
slotsLn4Col5
return
}
slotsLn4Col4
return
}
if ( %slots13 == (r) ) { slotsLn4Col3 | return }
else {
set %slotsWild 0
set %slotLength 3
set %slotsWinChar %slots1
set %slotsLine 4
set %slotsWinFctr 20
PayWinSlots
return
}
}
if (%slots1 == %slots7) {
if ( %slots13 == (r) ) {
if ( %slots9 == (r) ) {
if ( %slots15 == (r) ) || (%slots1 == %slots15) { slotsLn4Col5 | return }
slotsLn4Col4
return
}
slotsLn4Col3
return
}
if (%slots1 == (r) ) {
set %slotsWild 1
set %slotLength 3
set %slotsWinChar %slots13
set %slotsLine 4
set %slotsWinFctr 20
PayWinSlots
return
}
}
if (%slots1 == (r) ) || (%slots7 == (r) ) {
slotsLn4Col2
}
}
alias slotsLn4Col2 {
set %slotsWild 1
if (%slots13 == (r) ) {
if (%slots7 == %slots9) {
if (%slots7 == %slots5 ) { slotsLn4Col5 | return }
slotsLn4Col4
return
}
slotsLn4Col3
return
}
if (%slots7 == %slots13) { slotsLn4Col3 | return }
if (%slots1 == %slots13) {
if (%slots13 == %slots9) || (%slots9 == (r) ) {
if (%slots1 == %slots5) || (%slots5 == (r) ) { slotsLn4Col5 | return }
slotsLn4Col4
return
}
set %slotsWinFctr 20
set %slotsWinChar %slots13
set %slotsLine 4
set %slotsLength 3
PayWinSlots
}
if (%slots1 == %slots7) {
if (%slots13 == %slots9) || (%slots9 == (r) ) { slotsLn4Col4 | return }
set %slotLength 3
set %slotsWinChar %slots13
set %slotsLine 4
set %slotsWinFctr 20
PayWinSlots
return
}
}
alias slotsLn4Col3 {
set %slotsWild 1
if (%slots9 == (r) ) {
slotsLn4Col4
return
}
if (%slots13 == %slots9) || (%slots1 == %slots9) { slotsLn4Col4 | return }
if (%slots1 == %slots7) && (%slots7 == %slots13) { slotsLn4Col4 | return }
set %slotsWinFctr 20
set %slotsLine 4
set %slotsLength 3
if ( %slots1 != (r) ) set %slotsWinChar %slots1
elseif ( %slots7 != (r) ) set %slotsWinChar %slots7
elseif ( %slots13 != (r) ) set %slotsWinChar %slots13
PayWinSlots
}
alias slotsLn4Col4 {
set %slotsWild 1
if (%slots5 == (r) ) {
slotsLn4Col5
return
}
if (%slots9 == %slots5) {
set %slotsWinFctr 100
set %slotsLine 4
set %slotsLength 5
if ( %slots1 != (r) ) set %slotsWinChar %slots1
elseif ( %slots7 != (r) ) set %slotsWinChar %slots7
elseif ( %slots13 != (r) ) set %slotsWinChar %slots13
elseif ( %slots9 != (r) ) set %slotsWinChar %slots9
elseif ( %slots5 != (r) ) set %slotsWinChar %slots5
PayWinSlots
}
else {
set %slotsWinFctr 50
set %slotsLine 4
set %slotsLength 4
if ( %slots1 != (r) ) set %slotsWinChar %slots1
elseif ( %slots7 != (r) ) set %slotsWinChar %slots7
elseif ( %slots13 != (r) ) set %slotsWinChar %slots13
elseif ( %slots9 != (r) ) set %slotsWinChar %slots9
PayWinSlots
}
}
alias slotsLn4Col5 {
set %slotsWild 1
set %slotsWinFctr 100
set %slotsLine 4
set %slotsLength 5
if ( %slots1 != (r) ) set %slotsWinChar %slots1
elseif ( %slots7 != (r) ) set %slotsWinChar %slots7
elseif ( %slots13 != (r) ) set %slotsWinChar %slots13
elseif ( %slots9 != (r) ) set %slotsWinChar %slots9
elseif ( %slots5 != (r) ) set %slotsWinChar %slots5
PayWinSlots
}
;--------------Line 5
alias SlotsLine5 {
if (%slots11 == %slots7) && (%slots7 == %slots3) && (%slots3 == %slots9) && (%slots9 == %slots15) {
set %slotsWinChar %slots11
set %slotsLine 5
SlotsJackpot
halt
}
if (%slots11 == %slots7) && (%slots7 == %slots3) && (%slots3 == %slots9) {
if ( %slots15 == (r) ) || (%slots11 == (r) ) { slotsLn5Col5 | return }
set %slotsWild 0
set %slotLength 4
set %slotsWinChar %slots11
set %slotsLine 5
set %slotsWinFctr 50
PayWinSlots
return
}
if (%slots11 == %slots7) && (%slots7 == %slots3) {
if ( %slots9 == (r) ) {
if ( %slots15 == %slots11 ) || ( %slots15 == (r) ) {
slotsLn5Col5
return
}
slotsLn5Col4
return
}
if ( %slots3 == (r) ) { slotsLn5Col3 | return }
else {
set %slotsWild 0
set %slotLength 3
set %slotsWinChar %slots11
set %slotsLine 5
set %slotsWinFctr 20
PayWinSlots
return
}
}
if (%slots11 == %slots7) {
if ( %slots3 == (r) ) {
if ( %slots9 == (r) ) {
if ( %slots15 == (r) ) || (%slots11 == %slots15) { slotsLn5Col5 | return }
slotsLn5Col4
return
}
slotsLn5Col3
return
}
if (%slots11 == (r) ) {
set %slotsWild 1
set %slotLength 3
set %slotsWinChar %slots3
set %slotsLine 5
set %slotsWinFctr 20
PayWinSlots
return
}
}
if (%slots11 == (r) ) || (%slots7 == (r) ) {
slotsLn5Col2
}
}
alias slotsLn5Col2 {
set %slotsWild 1
if (%slots3 == (r) ) {
if (%slots7 == %slots9) {
if (%slots7 == %slots15 ) { slotsLn5Col5 | return }
slotsLn5Col4
return
}
slotsLn5Col3
return
}
if (%slots7 == %slots3) slotsLn5Col3
if (%slots11 == %slots3) {
if (%slots3 == %slots9) || (%slots9 == (r) ) {
if (%slots11 == %slots15) || (%slots15 == (r) ) { slotsLn5Col5 | return }
slotsLn5Col4
return
}
set %slotsWinFctr 20
set %slotsWinChar %slots3
set %slotsLine 5
set %slotsLength 3
PayWinSlots
}
if (%slots11 == %slots7) {
if (%slots3 == %slots9) || (%slots9 == (r) ) { slotsLn5Col4 | return }
set %slotLength 3
set %slotsWinChar %slots3
set %slotsLine 5
set %slotsWinFctr 20
PayWinSlots
return
}
}
alias slotsLn5Col3 {
set %slotsWild 1
if (%slots9 == (r) ) {
slotsLn5Col4
return
}
if (%slots3 == %slots9) || (%slots11 == %slots9) { slotsLn5Col4 | return }
if (%slots11 == %slots7) && (%slots7 == %slots13) { slotsLn5Col4 | return }
set %slotsWinFctr 20
set %slotsLine 5
set %slotsLength 3
if ( %slots11 != (r) ) set %slotsWinChar %slots11
elseif ( %slots7 != (r) ) set %slotsWinChar %slots7
elseif ( %slots3 != (r) ) set %slotsWinChar %slots3
PayWinSlots
}
alias slotsLn5Col4 {
set %slotsWild 1
if (%slots15 == (r) ) {
slotsLn5Col5
return
}
if (%slots9 == %slots15) {
set %slotsWinFctr 100
set %slotsLine 5
set %slotsLength 5
if ( %slots11 != (r) ) set %slotsWinChar %slots11
elseif ( %slots7 != (r) ) set %slotsWinChar %slots7
elseif ( %slots3 != (r) ) set %slotsWinChar %slots3
elseif ( %slots9 != (r) ) set %slotsWinChar %slots9
elseif ( %slots15 != (r) ) set %slotsWinChar %slots15
PayWinSlots
}
else {
set %slotsWinFctr 50
set %slotsLine 5
set %slotsLength 4
if ( %slots11 != (r) ) set %slotsWinChar %slots11
elseif ( %slots7 != (r) ) set %slotsWinChar %slots7
elseif ( %slots3 != (r) ) set %slotsWinChar %slots3
elseif ( %slots9 != (r) ) set %slotsWinChar %slots9
PayWinSlots
}
}
alias slotsLn5Col5 {
set %slotsWild 1
set %slotsWinFctr 100
set %slotsLine 5
set %slotsLength 5
if ( %slots11 != (r) ) set %slotsWinChar %slots11
elseif ( %slots7 != (r) ) set %slotsWinChar %slots7
elseif ( %slots3 != (r) ) set %slotsWinChar %slots3
elseif ( %slots9 != (r) ) set %slotsWinChar %slots9
elseif ( %slots15 != (r) ) set %slotsWinChar %slots15
PayWinSlots
}
;;;; other aliases
alias tell {
.ctcpreply $1 TIME $2-
}
alias SpinWait {
tell $webnick($nick) You can only spin once every 2 minutes.
return
}
alias pvar { return $readini(inplay.ini, $1, $2) }
#slots end
A Superslots Request