wizard1970
-
Posts
34 -
Joined
-
Last visited
Content Type
Profiles
Forums
Events
Posts posted by wizard1970
-
-
mstat is an alias. I took a look at your code, and you donot have an alias for mstat. So, I'm guessing that is why it isn't working.
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
-
i took just a quick look and i copied the game to a file on my desktop to have a better look when i get some time.i am assuming that this code is supposed to add or subtract trivia points.if that is the case you need to add stx_addpoints in places that its gonna add points for examplestx_addpoints $nick 50 OR in sutraction cases stx_addpoints $nick -50[/code]
as for the last part that you are putting in your trivia file you probably dont need it.once you get the stx_addpoints part in that game file where you need it then you should be good to go.
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?
Somebody Help Me Please?
in General IRCX
Posted
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.*
}