hi
This is Scramble script with Hungarian language...
My problem is, points are not added.
PROBLEM IS HERE
write Scramble.ini Pont $nick $iif($readini(Scramble.ini,points,$nick),$calc($readini(Scramble.ini,points,$nick) + 50),50)
PLS HELP :(
alias -l scramble {
var %a,%b $1
while ($numtok(%a,32) < $len($1)) var %a $addtok(%a,$r(1,$len($1)),32)
return $regsubex(%a,/(\S+(?: |$))/g,$mid(%b,\1,1))
}
alias -l s_new {
var -g %s_word $read(words.txt),%s_scramble $scramble(%s_word)
msg $1 A következő szó: 🟡 %s_scramble 🟡
msg $1 ⏰ A megfejtésig [30] másodperc áll rendelkezésre $+ ! ⏰
.timerscramble 1 30 s_fail $1
}
alias -l s_fail {
msg $1 Nem érkezett jó megoldás :( A megfejtés: 🔴 %s_word 🔴
describe $1 <<< FIGYELEM KÖVETKEZŐ ßetűM!X! >>> (Tipp: használd így:➕<szóköz><megfejtés>)
unset %s_word
.timerscramble 1 5 s_new $1
}
alias -l s_cleanup {
.timerscramble off
unset %s_word %s_scramble
}
on owner:TEXT:!betűmix &:#: {
if ($nick isop $chan) {
if ($2 == start) {
if (%s_scramble) notice $nick The game is already going... Type !word to see what the scrambled word it is
else s_new #
}
elseif ($2 == stop) {
if (%s_scramble) {
msg # 🛑 Játék leállítva $nick $+ . 🛑
s_cleanup
}
}
}
}
on *:TEXT:+ &:#: {
if (%s_word) {
if ($2 == %s_word) {
msg # Gratulálunk! Szép munka $nick $+ ! A megfejtés: 🟢 %s_word 🟢
write Scramble.ini Pont $nick $iif($readini(Scramble.ini,points,$nick),$calc($readini(Scramble.ini,points,$nick) + 50),50)
describe # $nick 5️⃣0️⃣ $readini(Scramble.ini,points,$nick) pont.
describe # ⏰ <<< FIGYELEM KÖVETKEZŐ ßetűM!X! >>> ⏰
unset %s_word
.timerscramble 1 5 s_new #
}
elseif ($2 != %s_word) msg # ⛔ Nem ez a helyes megfejtés $nick ⛔, gondolkozz $+ ! [[ $+ $timer(scramble).secs $+ ]] másodperc van hátra.
}
}