I'm trying to add a trivia game for my ST 5.0 and he did not know that the error can someone tell me how to fix this?
this is the game
set %points2 $rand(60,500)
set %points3 $rand(90,800)
if ($timer(joke7)) return
.ame â? Mini Jogos Desligados â?
.disable #slots
.disable #spin
.disable #steal
.disable #Portas
.disable #Moeda
.disable #game
.disable #pokies
.disable #cartas
.disable #dice
unset %joke.*
%joke.max = 3
set %joke.getal $r(1,%joke.max)
set -u30 %slotsbusy $true
set -u30 %placarbusy $true
if (%joke.getal == 1) { set %joke.getal Tesoura | set %joke.getel Papel | set %joke.getil Pedra }
if (%joke.getal == 2) { set %joke.getal Pedra | set %joke.getel Tesoura | set %joke.getil Papel }
if (%joke.getal == 3) { set %joke.getal Papel | set %joke.getel Pedra | set %joke.getil Tesoura }
var %i = 1
while (%i <= %joke.max) { %joke.vrij = $addtok(%joke.vrij,%i,32) | inc %i }
.enable #jokeinput
mstat *s $+ $rand(1,5) $stm â??â? â?ªâ?£â?¢ :: Jo-Ken-Po -â?¢ faca sua escolha e boa sorte :: â?¢â? â?ªâ?£â??
mstat *s $+ $rand(1,5) $stm â??â? â?ªâ?£â?¢ :: Escolha entre pedra, papel ou tesoura e aposte seus pontos contra o bot :: â?¢â? â?ªâ?£â??
mstat *s $+ $rand(1,5) $stm â??â? â?ªâ?£â?¢ :: Digite elemento + valor da aposta. Ex. pedra ; tesoura ; papel :: â?¢â? â?ªâ?£â??
.timerjoke6 1 33 jokestop
}
#jokeinput off
on ^*:text:*!abrir*:#: {
if (pedra isin $1 || papel isin $1 || tesoura isin $1) {
if (%joke. [ $+ [ $nick ] ]) mtime $nick Ja escolheu %joke. [ $+ [ $nick ] ] antes
else {
%joke.vrij = $remtok(%joke.vrij,$1,32)
%joke. [ $+ [ $nick ] ] = $1
mstat *s $+ $rand(1,5) $stm -â?¢ $nick â?¢-, jogou bem !ï??(*) Escolheu [ $1 ] Aguarde a minha jogada! 8-)(*)
if ($1 == %joke.getal) %joke.empate = $nick
if ($1 == %joke.getel) %joke.perder = $nick
if ($1 == %joke.getil) %joke.ganhar = $nick
}
}
else mtime $nick $nick Tens que escolher uma caixa entre %joke.getal %joke.getel %joke.getil
}
#jokeinput end
alias jokestop {
.disable #jokeinput
set -u30 %placarbusy $true
mstat *s $+ $rand(1,5) $stm â??â? â?ªâ?£â?¢ :: Rodada Encerrada :: â?¢â? â?ªâ?£â??
mstat *s $+ $rand(1,5) $stm â??â? â?ªâ?£â?¢ :: [Quem escolheu ] :: %joke.getal :: %joke.empate :: Empata, :: â?¢â? â?ªâ?£â??
mstat *s $+ $rand(1,5) $stm â??â? â?ªâ?£â?¢ :: [Quem escolheu ] :: %joke.getel :: %joke.perder :: Perde = - %points2 :: â?¢â? â?ªâ?£â??
mstat *s $+ $rand(1,5) $stm â??â? â?ªâ?£â?¢ :: [Quem escolheu ] :: %joke.getil :: %joke.ganhar :: Ganha = + %points3 :: â?¢â? â?ªâ?£â??
.timerst_next 1 $sts(delay_wrong) st question
.ame â?ºâ?ºâ?º Mini Jogos Ligados â??â??â??
.enable #slot
.enable #loto
.enable #tripla
.enable #vira
.enable #dados
.enable #fruta
.enable #roleta
.enable #corrida
.enable #as
.enable #spin
.enable #moeda
.disable #fruitinput
if (%joke.ganhar) {
stx_addpoints %joke.ganhar %points1
mtime %joke.ganhar $stm %joke.ganhar escolheu [[ %joke.getil ]] e Ganhou %points3 Pontos Total de pontos :: $stx_points(%joke.ganhar)
}
if (%joke.perder) {
stx_addpoints %joke.perder - $+ %points2
mtime %joke.perder $stm %joke.perder escolheu [[ %joke.getel ]] e Perde %points2 Pontos Total de pontos :: $stx_points(%joke.perder)
}
if (%joke.empate) {
stx_addpoints %joke.empate %points3
mtime %joke.empate $stm %joke.empate escolheu [[ %joke.getal ]] e empatou, ou seja, nÃão ganhou mas tambÃém nÃão perdeu! ::
}
set %fimdogame 1
}
unset %joke.*
alias fala {
alias tell { .ctcpreply $1 TIME $2- }
}
}
set %fimdogame 1
mstat *s $+ $rand(1,5) $stm â??â? â?ªâ?£â? Rodada Finalizada Aguarde A Proxima â?â? â?ªâ?£â??
.ame â?ºâ?ºâ?º Mini Jogos Ligados â??â??â??
.enable #slot
.enable #loto
.enable #tripla
.enable #vira
.enable #dados
.enable #fruta
.enable #roleta
.enable #corrida
.enable #as
.enable #spin
.enable #moeda
.disable #fruitinput
halt
}
.timerst_next 1 $sts(delay_wrong) st question
}
alias -l st_question {
if (($sts(resettype) == points) && ($hof(p,$hname(p,1)) >= $sts(reset_points))) {
set %STChamp $hname(p,1)
mstat *s3 â?© PARABENS $hname(p,1) VOCE EO NOVO CAMPEAO DO GAMEâ?©(G)(G)(G)(G)(G)(G) NOVO CAMPEAO COM 99999999 (G)(G)(G)(G)(G)(G)â?©
st resetgame
}
$_+(qnumber)
if (100 // $_(qnumber)) { /st savescores }
if ($_(qnumber) == $_(nextbonus)) {
if ($numtok($sts(bonus_ratio),45) == 2) {
$_s(nextbonus,$calc($_(qnumber) + $rand($gettok($sts(bonus_ratio),1,45),$gettok($sts(bonus_ratio),2,45))))
}
else $_s(nextbonus,$calc($_(qnumber) + $sts(bonus_ratio)))
read_bonus
if ($_(q_type) == m) st setbets ask_bonusmc
elseif ($_(q_type) == d) st ask_bonusdouble
elseif ($_(q_type) == l) st ask_normal_list
elseif ($_(q_type) == w) st wheel_of_fortune
elseif ($_(q_type) == q) st palavra
elseif ($_(q_type) == j) st jokenpo
elseif ($_(q_type) == s) st saque
elseif ($_(q_type) == r) st retirada
elseif ($_(q_type) == p) st porta_game
elseif ($_(q_type) == f) st fruit
elseif ($_(q_type) == b) st box_game
else { $_s(bonus,$true) | st ask_normal }
}
else {
read_normal
if ($_(q_type) == l) st ask_normal_list
else st ask_normal
}
}
