wizard1970

ok,forget that game is very complicated , i have this and i put in st5 an when i do paper 50 nothing happens ;_______________________________________________________________________________ _____ ;::::::::::::::::::: Jo-Ken-Po ;¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯ ¯¯¯¯¯ alias -l st_jo_ken_pon { if ($timer(jkp7)) return unset %jkp.* %jkp.max = 3 set %jkp.jkpal $r(1,3) if (%jkp.jkpal == 1) { set %jkp.myplay scissors | set %jkp.lose paper | set %jkp.win rock } if (%jkp.jkpal == 2) { set %jkp.myplay rock | set %jkp.lose scissors | set %jkp.win Paper } if (%jkp.jkpal == 3) { set %jkp.myplay paper | set %jkp.lose rock | set %jkp.win scissors } var %i = 1 while (%i <= %jkp.max) { %jkp.vrij = $addtok(%jkp.vrij,%i,32) | inc %i } .enable #jkpinput .timerjkp1 1 1 mstat *s1 
 ►► Jo Ken Po $& 
 rock, paper ou scissors .timerjkp2 1 3 mstat *s1 
 Win or Lose Points $& 
 Use! <element> to play!! .timerjkp3 1 13 mstat *s1 you have 20 seconds to play .timerjkp4 1 23 mstat *s1 you have 10 seconds to play .timerjkp5 1 28 mstat *s1 you have 15 seconds to play .timerjkp7 1 33 jkpstop } #jkpinput off on *:text:! *:#:{ if (%jkp. [ $+ [ $nick ] ]) mtime $nick you have chose %jkp. [ $+ [ $nick ] ] before ! else { if (!$istok(%jkp.vrij,$2,32)) mtime $nick has been chose $2 . else { %jkp.vrij = $remtok(%jkp.vrij,$2,32) %jkp. [ $+ [ $nick ] ] = $2 mtime $nick you chose $2 ! if ($2 == %jkp.myplay) %jkp.tie = $nick if ($2 == %jkp.lose) %jkp.lose = $nick if ($2 == %jkp.win) %jkp.win = $nick } } else mtime $nick $nick You have to choose. } #jkpinput end alias jkpstop { .disable #jkpinput mstat *s1 end of Jo Ken Poâ–“â–’ 
 %jkp.myplay â–º tie %jkp.lose â–º -50 points %jkp.win â–º 100 Points .timerst_next 1 $sts(delay_wrong) st question if (%jkp.win) { stx_addpoints %jkp.win 100 mtime %jkp.ganha $stm %jkp.win You get 100 points in Jo Ken Po } if (%jkp.lose) { stx_addpoints %jkp.lose -50 mtime %jkp.perde $stm %jkp.loose you looses 50 points in Jo Ken Po } if (%jkp.tie) { stx_addpoints %jkp.tie 0 mtime %jkp.tie $stm %jkp.tie its a tie with Jo Ken Po } unset %jkp.* }

yes, i change that but still not working, maybe the timers i put like this " msg # S Tahoma;0 Special game - Jo-Ken-Po - maximum bet: $thget(jkpbet) !
choose between rock , Paper or scissors. • Paper beat ", when the game appears, i do paper 50 and nothing happens, it seems that is stuck

thanks but is another problem, when i start the game this part appears " Special game - Jo-Ken-Po - maximum bet: $thget(jkpbet) !
choose between rock , Paper or scissors. • Paper beat Rock, rocks beat scissors, and scissors beats Paper.
Use scissors, paper or rocks + points - Ex. rocks 50; scissors 25; paper 30 " but doesn't work anymore more, and I wait and I wait and does not reach the end of the game I do !paper and nothing, maybe the timers of the game are wrong....i don't know. don't appears this " Betting closed! I chose • $thget(myplay) • (yn)
(I) Congrats to who won! - nice try for those who made a tie! - And who lost,next time is better (i) "

I have this code that took the tats and want to switch to st5, I know it is possible and I tried but it dosen't work. can you halp me please? ;######################################################## ;# JO-KEN-PO Settings. # ;######################################################## alias jkp.preparing { var %hand = $rand(1,99) var %s = $rand(1,100) if (%hand > 0 && %hand <= 70) { thset jkpbet $rand(50,1000) } else { thset jkpbet $rand(50,1000) } thset jkptotal 0 if (%mao > 0 && %mao <= 33) { thset jkp.win rock | thset jkp.lose paper | thset myplay scissors } elseif (%hand > 33 && %han <= 66) { thset jkp.win paper | thset jkp.lose scissors | thset myplay rock } else { thset jkp.win scissors | thset jkp.lose rock | thset myplay paper } mstat *s4 $stm Special game - Jo-Ken-Po - maximum bet: $thget(jkpbet) !
choose between rock , Paper or scissors. • Paper beat Rock, rocks beat scissors, and scissors beats Paper.
Use scissors, paper or rocks + points - Ex. rocks 50; scissors 25; paper 30 } alias processjkp { if ($th2(jkp) == $null) { if ($2) { if ($2 isnum) { if ($2 > 0 && $2 <= $thget(jkpbet)) { if ($2 <= $user.score($nick)) { thset jkptotal $calc($thget(jkptotal) + 1) thset JTemp.jkp. $+ $thget(jkptotal) $nick if ($1 isin $thget(jkp.win)) { thuset2 jkp win thuset2 jbet $2 } elseif ($1 isin $thget(jkp.lose)) { thuset2 jkp lose thuset2 jbet $calc((-1) * $2) } else { thuset2 jkp tie thuset2 jbet 0 } mstat *s4 $stm • $nick • you play well - you choose $1 and bet $2 points! Now you have to wait (Y) } else { .msg $chan $nick , sorry, but you can not bet more that you have! } } else { .msg $chan $nick You have to bet 1 and $thget(jkpbet) $+ ! } } else { .msg $chan the bet has to be a number, $nick ! } } else { .msg $chan You should bet a value, $nick ! Ex. rocks 35 } } else { .msg $chan Hey, $nick , you already betting;) } } alias jkpscore { mstat *s4 $stm (O) Betting closed! I chose • $thget(myplay) • (yn)
(I) Congrats to who won! - nice try for those who made a tie! - And who lost,next time is better (i) %ij = 1 .timer.jkp. $+ $cid -m 0 500 jkpinc jkp. $+ $cid } alias jkpinc { if ($thget($eval(JTemp.jkp. $+ %ij,1)) == $null) { .timer. $+ $1 off unset %ij hdel -w Trivia $+ $idenn JTemp.* } else { thset jtemp.cng $thget($eval(JTemp.jbet. $+ $thget($eval(JTemp.jkp. $+ %ij,1)),1)) setvar $thget($eval(JTemp.jkp. $+ %ij,1)) Score $calc($realvar($thget($eval(JTemp.jkp. $+ %ij,1)), Score) + $thget(jtemp.cng)) thset $eval(Score. $+ $thget($eval(JTemp.jkp. $+ %ij,1)),1) $calc($thget($eval(Score. $+ $thget($eval(JTemp.jkp. $+ %ij,1)),1)) + $thget(temp.cng)) if ($thget($eval(JTemp.jbet. $+ $thget($eval(JTemp.jkp. $+ %ij,1)),1)) == 0) { mstat *s4 $stm $thget($eval(JTemp.jkp. $+ %ij,1)) : (*) $thget($eval(JTemp.jkp. $+ %ij,1)) (*) empatou, ou seja, nÃão ganhou mas tambÃém nÃão perdeu! } else { mstat *s4 $stm $thget($eval(JTemp.jkp. $+ %ij,1)) : (*) $thget($eval(JTemp.jkp. $+ %ij,1)) (*) $iif($thget($eval(JTemp.jbet. $+ $thget($eval(JTemp.jkp. $+ %ij,1)),1)) > 0,ganhou $thget($eval(JTemp.jbet. $+ $thget($eval(JTemp.jkp. $+ %ij,1)),1)), perdeu $calc($thget($eval(JTemp.jbet. $+ $thget($eval(JTemp.jkp. $+ %ij,1)),1)) * -1)) ponto $+ $iif($thget($eval(JTemp.jbet. $+ $thget($eval(JTemp.jkp. $+ %ij,1)),1)) != 1,s) $+ ! Total de pontos: $user.score($thget($eval(JTemp.jkp. $+ %ij,1))) } inc %ij } } and i put this in section " handling normal input " in st5.0 on *:TEXT:*:#:{ if (rock isin $1 || scissors isin $1 || paper isin $1) { processjkp $1- } } any help is welcome,please thanks

sorry :(

still not working,a guest im my room enters like this...Master, not Guest_Master

when they enter the room......they enter and the bot warns to register. The bot give 3 minutes and then put the glasses and says in the wisper to register and puts the link sorry my inglish and thanks

ok I will try to explain better in my room i have the mode +m but the word guest not appears before the nick, only the nick without a male...female....etc... Is there any solution? on *:JOIN:#: { if (> isin $nick) { set -u185 %specnick. [ [ $nick ] ] msg # $replace($nick,>,Guest_) $+ , You have 3 minutes to ask any questions, after which you can observe the room as a spec .timerspec 1 180 mode $!comchan($me,1) -v %specnick. [ [ $nick ] ] } } on ^*:part:#: { unset %specnick. [ [ $nick ] ] } on ^*:kick:#: { unset %specnick. [ [ $knick ] ] }

i have a problem, in my room i have the mode +m but the guest not appears before the nick, only the nick without a male...female....etc... Is there any solution?