mIRC Home    About    Download    Register    News    Help

Print Thread
#256500 21/01/16 06:00 PM
Joined: Jan 2016
Posts: 14
J
Pikka bird
OP Offline
Pikka bird
J
Joined: Jan 2016
Posts: 14
Hello!
I need help I dont know how i have to go on!
I need a variable for my bet System!
The variable has to be a number!
That variable has to be global!
So
if ($1 == !win) {
They have to write after !win the number they want to bet.
so like !win 100 I only need to know how I can create the variable. Thank u smile

Joined: Dec 2008
Posts: 1,515
Hoopy frood
Offline
Hoopy frood
Joined: Dec 2008
Posts: 1,515
If you want to create a new global variable you must look up the /set command.

/help /set


Need Online mIRC help or an mIRC Scripting Freelancer? -> https://irc.chathub.org <-
Joined: Jan 2016
Posts: 14
J
Pikka bird
OP Offline
Pikka bird
J
Joined: Jan 2016
Posts: 14
No my problem is ive got a betting script. They have to write !win 10 so they betting 10 coins on win and the IRC Bot has to save it that everyone get his coints. Now it is so that everyone get the coins of the last one who bet (the amount of him) If you want I could sent you it.

Joined: Dec 2008
Posts: 1,515
Hoopy frood
Offline
Hoopy frood
Joined: Dec 2008
Posts: 1,515
First of all paste the code and then describe better at which line-possition you want to add and what, because i did not full understand it. (give examples, pictures)


Need Online mIRC help or an mIRC Scripting Freelancer? -> https://irc.chathub.org <-
Joined: Jan 2016
Posts: 14
J
Pikka bird
OP Offline
Pikka bird
J
Joined: Jan 2016
Posts: 14


ON !*:TEXT:*:#: {
tokenize 32 $strip($1-,burci)
if ($1 == !bet) {
if (!$check_mod($nick,$chan)) { .msg $chan $+ $nick $+ Du darfst das nicht machen! | return }
if (!$2) { .msg $chan Fehler! $nick Da ist wohl was schief gelaufen nutze den Befehl !bethelp| return }
if ($2 == open) || ($2 == start) || ($2 == on) {
unset %bet_win %bet_lose %bet %bet_pause
if (%bet) && ($gettok(%bet,2,32) !== $chan) { return }
if (%bet) { .msg $chan  Fehler! $nick Es ist gerade schon eine Wette am laufen! Versuche es später nochmal oder nutze den Befehl !bet stop um die Wette zu unterbrechen! | return }
set -e %bet $nick $chan
.msg $chan Die Wette wurde von $nick gestartet. Um mitzumachen schreibt entweder !win oder !lose in den Chat der Bot wird euch in die Listen eintragen! Du verliest 25 Coins oder gewinnst 30 Coins
write -c wettenwin.txt
write -c wettenlose.txt
}
if ($2 == stop) || ($2 == end) || ($2 == off) {
if (%bet) && ($gettok(%bet,2,32) !== $chan) { return }
if (!%bet) { .msg $chan ( $+ $nick $+ ): Fehler! Es ist doch garkeine Wette am laufen $nick. Versuche es gleich nochmal oder nutze den Befehl !bet start um eine Wette neue zu starten! | return }
unset %bet_win %bet_lose %bet %bet_pause
msg # $+ $nick $+  Die Wette wurde gestoppt.
}
if ($2 == resume) {
if (%bet) && ($gettok(%bet,2,32) !== $chan) { return }
if (!%bet) { .msg $chan ( $+ $nick $+ ): Fehler! Es ist doch garkeine Wette am laufen $nick. Versuche es gleich nochmal oder nutze den Befehl !bet start um eine Wette neue zu starten! | return }
if (!%bet_pause) { .msg $chan ( $+ $nick $+ ): Fehler! Es ist garkeine Wette pausiert $nick. Versuche es gleich nochmal oder nutze den Befehl !bet start um eine Wette neue zu starten! | return }
unset %bet_pause
.msg $chan ( $+ $nick $+ ): Die Wette wurde pausiert.
}
if ($2 == pause) {
if (%bet) && ($gettok(%bet,2,32) !== $chan) { return }
if (!%bet) { .msg $chan ( $+ $nick $+ ): Fehler! Es ist doch garkeine Wette am laufen $nick. Versuche es gleich nochmal oder nutze den Befehl !bet start um eine Wette neue zu starten! | return }
if (%bet_pause) { .msg $chan ( $+ $nick $+ ): Fehler! Die Wette ist doch schon pausiert! Nutze den Befehl !bet weiter | return }
set -e %bet_pause $nick
.msg $chan ( $+ $nick $+ ): Die Wette wurde pausiert.
}
if ($2 == result) || ($2 == results) {
if (%bet) && ($gettok(%bet,2,32) !== $chan) { return }
if (!%bet) { .msg $chan ( $+ $nick $+ ): Fehler! Es ist doch garkeine Wette am laufen $nick. Versuche es gleich nochmal oder nutze den Befehl !bet start um eine Wette neue zu starten! | return }
if (!$3) { .msg $chan ( $+ $nick $+ ): Fehler! Versuche es nochmal und gebe das Ergebnis ein. | return }
if ($3 == win) || ($3 == won) {
if (%bet) && ($gettok(%bet,2,32) !== $chan) { return }
.msg $chan ( $+ $nick $+ ) Die Wette wurde gestoppt um Herauszufinden wer gewonnen hat, bitte warte einen Moment...
if (!%bet_win) { .msg $chan ( $+ $nick $+ ): Hier ist kein Gewinner niemand hat gedacht, dass Joshy gewinnt. }
elseif (%bet_win) { .msg $chan ( $+ $nick $+ ): Die Gewinner sind %bet_win - (Anzahl an Gewinnern: $numtok(%bet_win,44) $+ ) }
if (%bet_lose) { bet_delpoints $chan %bet_lose }
if (%bet_win) { bet_addpoints $chan %bet_win }
unset %bet_win %bet_lose %bet %bet_pause
}
if ($3 == lose) || ($3 == lost) {
if (%bet) && ($gettok(%bet,2,32) !== $chan) { return }
.msg $chan Die Wette wurde von $nick gestoppt um Herauszufinden wer gewonnen hat, bitte warte einen Moment...
if (!%bet_lose) { .msg $chan ( $+ $nick $+ ): Hier ist kein Gewinner niemand hat gedacht, dass Joshy verliert. }
elseif (%bet_lose) { .msg $chan ( $+ $nick $+ ): Die Gewinner sind %bet_lose - (Anzahl an Gewinnern: $numtok(%bet_lose,44) $+ ) }
if (%bet_lose) { bet_addpoints $chan %bet_lose }
if (%bet_win) { bet_delpoints $chan %bet_win }
unset %bet_win %bet_lose %bet %bet_pause
}
}
}
if ($1 == !win) {
if (!$check_done_bronze($nick,$chan)) {
msg # /me $nick du musst erst Bronze sein bevor du Wetten darfst! Sammle erst 50 Punkte bzw. kaufe dir Bronze mit "!bronze"!
}
else {
if (($2 isalpha) || ($2 < 0)) { .msg $chan $nick Du musst mindestens ein Coin setzen um teilzunehmen! | return }
var %topic $+($chan,.,$nick)
var %points $calc($readini(Points.ini,%topic,Points) + $1)
write -n wettenwin.txt %topic Points $2
if (%bet) ($gettok(%bet,2,32) !== $chan) { return }
if (!%bet) { .msg $chan ( $+ $nick $+ ): Fehler! Es ist doch garkeine Wette am laufen $nick. Versuche es gleich nochmal oder nutze den Befehl !bet start um eine Wette neue zu starten! | return }
if (%bet_pause) { return }
var %fix = $chan $+ . $+ $nick
var %p = $readini(Points.ini,n,%fix,Points)
if (!%p) { .msg $chan ( $+ $nick $+ ): Fehler! Die Wette konnte nicht Platziert werden! Du hast nicht genügend Coins. | return }
if (%p < 25) { .msg $chan ( $+ $nick $+ ): Fehler! Du hast %p Coins aber für die Wette brauchst du mindestens 25 Coins! | return }
if ($istok(%bet_win,$nick,44)) { .msg $chan ( $+ $nick $+ ): Fehler! Du hast bereits gewettet, dass Joshy gewinnt! | return }
if ($istok(%bet_lose,$nick,44)) { set -e %bet_lose $remtok(%bet_lose,$nick,1,44) | var %ch = 1 }
set -e %bet_win $addtok(%bet_win,$nick,44)
.msg $chan /me $iif(%ch,have change your,) Die Wette von " $+ $nick $+ " wurde platziert! - viel Glück!
}
}
if ($1 == !lose) || ($1 == !lost) {
if (!$check_done_bronze($nick,$chan)) {
msg # /me $nick du musst erst Bronze sein bevor du Wetten darfst! Sammle erst 50 Punkte bzw. kaufe dir Bronze mit "!bronze"!
}
else {
if (($2 isalpha) && ($2 isnum <= 10)) { .msg $chan $nick Du musst mindestens ein Coin setzen um teilzunehmen! | return }
var %topic $+($chan,.,$nick)
var %points $calc($readini(Points.ini,%topic,Points) + $1)
write -n wettenlose.txt %topic Points %points
if (%bet) && ($gettok(%bet,2,32) !== $chan) { return }
if (!%bet) { .msg $chan ( $+ $nick $+ ): Fehler! Es ist doch garkeine Wette am laufen $nick. Versuche es gleich nochmal oder nutze den Befehl !bet start um eine Wette neue zu starten! | return }
if (%bet_pause) { return }
var %fix = $chan $+ . $+ $nick
var %p = $readini(Points.ini,n,%fix,Points)
if (!%p) { .msg $chan ( $+ $nick $+ ): Fehler! Die Wette konnte nicht Platziert werden! Du hast nicht genügend Coins. | return }
if (%p < 25) { .msg $chan ( $+ $nick $+ ): Fehler! Du hast %p Coins aber für die Wette brauchst du mindestens 25 Coins! | return }
if ($istok(%bet_lose,$nick,44)) { .msg $chan ( $+ $nick $+ ): Fehler! Du hast bereits gewettet, dass Joshy verliert! | return }
if ($istok(%bet_win,$nick,44)) { set -e %bet_win $remtok(%bet_win,$nick,1,44) | var %ch = 1 }
set -e %bet_lose $addtok(%bet_lose,$nick,44)
.msg $chan $iif(%ch,have change your,) Die Wette von " $+ $nick $+ " wurde platziert! - viel Glück!
}
}






if ($1 == !remove) {
if (!$check_done_bronze($nick,$chan)) {
msg # /me $nick du musst erst Bronze sein bevor du Wetten darfst! Sammle erst 50 Punkte bzw. kaufe dir Bronze mit "!bronze"!
}
else {
if (%bet) && ($gettok(%bet,2,32) !== $chan) { return }
if (!%bet) { .msg $chan ( $+ $nick $+ ): Fehler! Es ist doch garkeine Wette am laufen $nick. Versuche es gleich nochmal oder nutze den Befehl !bet start um eine Wette neue zu starten! | return }
if (%bet_pause) { return }
if ($istok(%bet_lose,$nick,44)) { set -e %bet_lose $remtok(%bet_lose,$nick,1,44) | .msg $chan ( $+ $nick $+ ): Deine Wette wurde entfernt! Du Wettest nicht mehr darauf, dass Joshy verliert! }
elseif ($istok(%bet_win,$nick,44)) { set -e %bet_win $remtok(%bet_win,$nick,1,44) | .msg $chan ( $+ $nick $+ ): Deine Wette wurde entfernt! Du Wettest nicht mehr darauf, dass Joshy gewinnt! }
else { .msg $chan ( $+ $nick $+ ): Fehler! Du hast noch nicht gewettet! }
}
}
if ($1 == !results) || ($1 == !stats) {
if (!$check_mod($nick,$chan)) { .msg $chan ( $+ $nick $+ ): Fehler! Du darfst das nicht machen! | return }
if (%bet) && ($gettok(%bet,2,32) !== $chan) { return }
if (!%bet) { .msg $chan ( $+ $nick $+ ): Fehler! Es ist doch garkeine Wette am laufen $nick. Versuche es gleich nochmal oder nutze den Befehl !bet start um eine Wette neue zu starten! | return }
if (%bet_pause) { return }
.msg $chan ( $+ $nick $+ ): Bet(s) at win: $iif(%bet_win,$numtok(%bet_win,44),0)
.msg $chan ( $+ $nick $+ ): Bet(s) at lose: $iif(%bet_lose,$numtok(%bet_lose,44),0)
.msg $chan ( $+ $nick $+ ): Alle Wetten die Platziert wurden: $calc($iif(%bet_win,$numtok(%bet_win,44),0) + $iif(%bet_lose,$numtok(%bet_lose,44),0))
}
if ($1 == !mybet) {
if (!$check_done_bronze($nick,$chan)) {
msg # /me $nick du musst erst Bronze sein bevor du Wetten darfst! Sammle erst 50 Punkte bzw. kaufe dir Bronze mit "!bronze"!
}
else {
if (%bet) && ($gettok(%bet,2,32) !== $chan) { return }
if (!%bet) { .msg $chan ( $+ $nick $+ ): Fehler! Es ist doch garkeine Wette am laufen $nick. Versuche es gleich nochmal oder nutze den Befehl !bet start um eine Wette neue zu starten! | return }
if (%bet_pause) { return }
if ($istok(%bet_lose,$nick,44)) { .msg $chan ( $+ $nick $+ ): Du hast darauf gewetten, dass Joshy verliert! }
elseif ($istok(%bet_win,$nick,44)) { .msg $chan ( $+ $nick $+ ): Du hast darauf gewetten, dass Joshy gewinnt! }
else { .msg $chan ( $+ $nick $+ ): Fehler! Du hast noch nicht gewettet! }
}
if ($1 == !bethelp) { .msg $chan ( $+ $nick $+ ): Alle Befehle für das Bet System sind: !bet open - !bet stop - !bet pause - !bet resume - !bet result win/lose - !win - !lose - !remove - !results - !mybet }
}
}
alias check_mod {
if (!$1) { return }
if (!$2) { return }
if ($me !ison $2) { return 0 }
if ($1 !ison $2) { return 0 }
var %f = mods.txt
if (!$isfile(%f)) { return 0 }
if (!$lines(%f)) { return 0 }
var %r = $read(%f,nw,$1)
if (%r) { return 1 }
elseif (!%r) { return 0 }
}

alias bet_addpoints {
if (!$1) { return }
if (!%bet) { return }
var %GIVE_POINTS = $read(wettenwin.txt,$+(#,.,$nick),Points)
var %c = $1
var %l = $2
var %t = $numtok(%l,44)
var %i = 1
while (%i <= %t) {
var %n = $gettok(%l,%i,44)
var %fix = %c $+ . $+ %n
var %p = $calc($readini(Points.ini,%fix,Points) + %give_points * 1,05)
if (%n) { writeini -n $qt(Points.ini) %fix Points %p }
inc %i
}
}

alias bet_delpoints {
if (!$1) { return }
if (!%bet) { return }
var %TAKE_POINTS = $read(wettenlose.txt,$+(#,.,$nick),Points)
var %c = $1
var %l = $2
var %t = $numtok(%l,44)
var %i = 1
while (%i <= %t) {
var %n = $gettok(%l,%i,44)
var %fix = %c $+ . $+ %n
var %p = $calc($readini(Points.ini,%fix,Points) - %take_points)
if (%n) { writeini -n $qt(Points.ini) %fix Points %p }
inc %i
}
}

Last edited by Joshymanman; 24/01/16 05:00 PM.
Joined: Jan 2016
Posts: 14
J
Pikka bird
OP Offline
Pikka bird
J
Joined: Jan 2016
Posts: 14
Thats your coding i think shocked


Link Copied to Clipboard