SHOW:
|
|
- or go back to the newest paste.
| 1 | on *:TEXT:!awantura:#:{
| |
| 2 | if (!%awantura) {
| |
| 3 | set %awantura 1 | |
| 4 | set %awantura.join 1 | |
| 5 | set %awantura.join.1 1 | |
| 6 | set %awantura.join.2 1 | |
| 7 | - | set %awantura.join.3 1 |
| 7 | + | |
| 8 | set %awantura.t2.name niebieski | |
| 9 | set %awantura.t1.dop zielonego | |
| 10 | - | set %awantura.t3.name pomarańczowy |
| 10 | + | |
| 11 | set %awantura.t1.dop.lm zielonych | |
| 12 | set %awantura.t2.dop.lm niebieskich | |
| 13 | - | set %awantura.t3.dop pomarańczowego |
| 13 | + | |
| 14 | set %awantura.t2.kto niebiescy | |
| 15 | set %awantura.kanal $chan | |
| 16 | - | set %awantura.t3.dop.lm pomarańczowych |
| 16 | + | |
| 17 | set %awantura.t2.kolor 12 | |
| 18 | set %awantura.t1.kasa 5000 | |
| 19 | - | set %awantura.t3.kto pomarańczowi |
| 19 | + | |
| 20 | set %awantura.liczba.graczy.w.teamie 1 | |
| 21 | set %awantura.plik.z.kategoriami pliki/kategorie.txt | |
| 22 | set %awantura.bazowa.kasa 200 | |
| 23 | - | set %awantura.t3.kolor 7 |
| 23 | + | |
| 24 | msg %awantura.kanal 9,1Dołączenie - !join [1,2] 0,1 $+ $chr(124) 4,1Team 1 - %awantura.t1.name $+ , Team 2 - %awantura.t2.name | |
| 25 | } | |
| 26 | - | set %awantura.t3.kasa 5000 |
| 26 | + | |
| 27 | msg $chan Gra w toku! | |
| 28 | } | |
| 29 | } | |
| 30 | ||
| 31 | - | msg %awantura.kanal 9,1Dołączenie - !join [1,2,3] 0,1 $+ $chr(124) 4,1Team 1 - %awantura.t1.name $+ , Team 2 - %awantura.t2.name $+ , Team 3 - %awantura.t3.name |
| 31 | + | |
| 32 | if ($2) && (%awantura.join == 1) {
| |
| 33 | var %a $2 | |
| 34 | if (%a !isnum 1-2) { halt }
| |
| 35 | if ($istok(%awantura.allteams,$nick,44)) {
| |
| 36 | msg $chan 0,1Nie możesz dołączyć dwa razy! | |
| 37 | halt | |
| 38 | } | |
| 39 | if (%awantura.join. [ $+ [ %a ] ] == 0) { halt }
| |
| 40 | set %awantura.t [ $+ [ %a ] ] [ $+ [ .sklad ] ] $addtok($nick,%awantura.t [ $+ [ %a ] ] [ $+ [ .sklad ] ],44) | |
| 41 | - | if (%a !isnum 1-3) { halt }
|
| 41 | + | set %awantura.allteams %awantura.t1.sklad $+ $chr(44) $+ %awantura.t2.sklad |
| 42 | msg %awantura.kanal 0,1 $+ $nick został zapisany do $+ %awantura.t [ $+ [ %a ] ] [ $+ [ .kolor ] ] $+ ,1 $+ %awantura.t [ $+ [ %a ] ] [ $+ [ .dop ] ] 0,1zespołu. | |
| 43 | if ($numtok(%awantura.t [ $+ %a ] ] [ $+ [ .sklad ] ],44) == %awantura.liczba.graczy.w.teamie) {
| |
| 44 | msg %awantura.kanal 0,1Zgłoszenia do teamu $+ %awantura.t [ $+ [ %a ] ] [ $+ [ .kolor ] ] $+ ,1 $+ %awantura.t [ $+ [ %a ] ] [ $+ [ .dop ] ] 0,1zakończone... | |
| 45 | set %awantura.join. [ $+ [ %a ] ] 0 | |
| 46 | } | |
| 47 | if ($numtok(%awantura.allteams,44) == $calc(%awantura.liczba.graczy.w.teamie * 2)) {
| |
| 48 | - | set %awantura.allteams %awantura.t1.sklad $+ $chr(44) $+ %awantura.t2.sklad $+ $chr(44) $+ %awantura.t3.sklad |
| 48 | + | |
| 49 | msg %awantura.kanal 0,1REJESTRACJA DO ZESPOŁÓW ZAKOŃCZONA | |
| 50 | set %awantura.gra 1 | |
| 51 | .signal gra | |
| 52 | } | |
| 53 | } | |
| 54 | - | if ($numtok(%awantura.allteams,44) == $calc(%awantura.liczba.graczy.w.teamie * 3)) {
|
| 54 | + | |
| 55 | alias aw.k.los {
| |
| 56 | msg %awantura.kanal 0,1Losowanie kategorii... | |
| 57 | var %read $read(%awantura.plik.z.kategoriami) | |
| 58 | set %awantura.kategoria $gettok(%read,2,124) | |
| 59 | set %awantura.kategoria.id $gettok(%read,1,124) | |
| 60 | .timer 1 3 msg %awantura.kanal 0,1Wylosowana kategoria to: %awantura.kategoria | |
| 61 | .timer 1 5 aw.licytacja | |
| 62 | } | |
| 63 | alias aw.p.los {
| |
| 64 | msg %awantura.kanal 0,1Losowanie pytania... | |
| 65 | var %read $read(pliki/pytania. [ $+ [ %awantura.kategoria.id ] ] [ $+ [ .txt ] ]) | |
| 66 | set %awantura.pytanie $gettok(%read,1,124) | |
| 67 | set %awantura.odpowiedz $gettok(%read,2,124) | |
| 68 | .timer 1 3 msg %awantura.kanal 0,1Pytanie wylosowane... | |
| 69 | .timer 1 3 aw.p.gra | |
| 70 | } | |
| 71 | alias aw.p.gra {
| |
| 72 | set %awantura.o 1 | |
| 73 | } | |
| 74 | alias aw.licytacja {
| |
| 75 | msg %awantura.kanal 0,1Biorę po %awantura.bazowa.kasa od każdej drużyny, słucham państwa | |
| 76 | set %awantura.licytacja 1 | |
| 77 | set %awantura.pula $calc(2 * %awantura.bazowa.kasa) | |
| 78 | set %awantura.pula.g %awantura.bazowa.kasa | |
| 79 | set %awantura.t1.kasa $calc(%awantura.t1.kasa - %awantura.bazowa.kasa) | |
| 80 | set %awantura.t2.kasa $calc(%awantura.t2.kasa - %awantura.bazowa.kasa) | |
| 81 | aw.l.pula %awantura.pula %awantura.t1.kasa %awantura.t2.kasa | |
| 82 | } | |
| 83 | ||
| 84 | - | set %awantura.pula $calc(3 * %awantura.bazowa.kasa) |
| 84 | + | |
| 85 | msg %awantura.kanal 0,1Pula: $1 $chr(124) Kasa $+ %awantura.t1.kolor $+ ,1 $+ %awantura.t1.dop.lm $+ 0,1: $2 $chr(124) Kasa $+ %awantura.t2.kolor $+ ,1 $+ %awantura.t2.dop.lm $chr(124) W licytacji prowadzą: $5 | |
| 86 | } | |
| 87 | ||
| 88 | - | set %awantura.t3.kasa $calc(%awantura.t3.kasa - %awantura.bazowa.kasa) |
| 88 | + | |
| 89 | - | aw.l.pula %awantura.pula %awantura.t1.kasa %awantura.t2.kasa %awantura.t3.kasa |
| 89 | + | |
| 90 | aw.p.los | |
| 91 | } | |
| 92 | ||
| 93 | - | msg %awantura.kanal 0,1Pula: $1 $chr(124) Kasa $+ %awantura.t1.kolor $+ ,1 $+ %awantura.t1.dop.lm $+ 0,1: $2 $chr(124) Kasa $+ %awantura.t2.kolor $+ ,1 $+ %awantura.t2.dop.lm $+ 0,1: $3 $chr(124) Kasa $+ %awantura.t3.kolor $+ ,1 $+ %awantura.t3.dop.lm $+ 0,1: $4 $chr(124) W licytacji prowadzą: $5 |
| 93 | + | |
| 94 | msg %awantura.kanal RESET | |
| 95 | unset %awantura.* | |
| 96 | unset %awantura | |
| 97 | } | |
| 98 | ||
| 99 | on *:SIGNAL:gra:{
| |
| 100 | if (%awantura.gra) {
| |
| 101 | aw.k.los | |
| 102 | } | |
| 103 | } | |
| 104 | ||
| 105 | on *:TEXT:!zasady:#:{
| |
| 106 | if ($istok(%awantura.allteams,$nick,44)) {
| |
| 107 | .play -q3n $nick zasady.txt 700 | |
| 108 | } | |
| 109 | } | |
| 110 | on *:TEXT:!o *:#:{
| |
| 111 | if (%awantura.o == 1 && $istok(%awantura.allteams, $nick, 44)) {
| |
| 112 | set %awantura.o 0 | |
| 113 | if ($2- == %awantura.odpowiedz) {
| |
| 114 | msg %awantura.kanal OMG | |
| 115 | } | |
| 116 | else {
| |
| 117 | msg %awantura.kanal OMFG | |
| 118 | } | |
| 119 | } | |
| 120 | } | |
| 121 | ||
| 122 | on *:TEXT:!l *:#:{
| |
| 123 | if (%awantura.licytacja == 1 && $istok(%awantura.allteams, $nick, 44)) {
| |
| 124 | } | |
| 125 | } |