Çevrimdışı

Geçenlerde bi alman sitesinde bulduğum bi kodu düzenledim .bu altta vereceğim haliyle kendi botuma ekledim sorunsuz çalışıyor şimdilik paylaşmak istedim belki hoşunuza gider.

Sayısal loto , şans topu , on numara ve süper loto oynayacaklara gelişi güzel sayıları veriyor komutla :


on 1:TEXT:!sayısal:#: {

:startLoto

.set %Zahl1 $rand(1,49)
.set %Zahl2 $rand(1,49)
.set %Zahl3 $rand(1,49)
.set %Zahl4 $rand(1,49)
.set %Zahl5 $rand(1,49)
.set %Zahl6 $rand(1,49)

if (%Zahl1 == %Zahl2) { goto startLoto }
if (%Zahl1 == %Zahl3) { goto startLoto }
if (%Zahl1 == %Zahl4) { goto startLoto }
if (%Zahl1 == %Zahl5) { goto startLoto }
if (%Zahl1 == %Zahl6) { goto startLoto }
if (%Zahl2 == %Zahl3) { goto startLoto }
if (%Zahl2 == %Zahl4) { goto startLoto }
if (%Zahl2 == %Zahl5) { goto startLoto }
if (%Zahl2 == %Zahl6) { goto startLoto }
if (%Zahl3 == %Zahl4) { goto startLoto }
if (%Zahl3 == %Zahl5) { goto startLoto }
if (%Zahl3 == %Zahl6) { goto startLoto }
if (%Zahl4 == %Zahl5) { goto startLoto }
if (%Zahl4 == %Zahl6) { goto startLoto }
if (%Zahl5 == %Zahl6) { goto startLoto }

msg $chan 12SayısaL Loto'daki ŞansLı NumaraLarınız: 3 %Zahl1 9 - 3 %Zahl2  9- 3 %Zahl3  9- 3 %Zahl4 9 - 3 %Zahl5  9-3 %Zahl6  12oLmaLı.
}

on 1:TEXT:!onnumara:#: {

:startnumara

.set %Zahl1 $rand(1,80)
.set %Zahl2 $rand(1,80)
.set %Zahl3 $rand(1,80)
.set %Zahl4 $rand(1,80)
.set %Zahl5 $rand(1,80)
.set %Zahl6 $rand(1,80)
.set %Zahl7 $rand(1,80)
.set %Zahl8 $rand(1,80)
.set %Zahl9 $rand(1,80)
.set %Zah20 $rand(1,80)

if (%Zahl1 == %Zahl2) { goto startnumara }
if (%Zahl1 == %Zahl3) { goto startnumara }
if (%Zahl1 == %Zahl4) { goto startnumara }
if (%Zahl1 == %Zahl5) { goto startnumara }
if (%Zahl1 == %Zahl6) { goto startnumara }
if (%Zahl1 == %Zahl7) { goto startnumara }
if (%Zahl1 == %Zahl8) { goto startnumara }
if (%Zahl1 == %Zahl9) { goto startnumara }
if (%Zahl1 == %Zah20) { goto startnumara }
if (%Zahl2 == %Zahl3) { goto startnumara }
if (%Zahl2 == %Zahl4) { goto startnumara }
if (%Zahl2 == %Zahl5) { goto startnumara }
if (%Zahl2 == %Zahl6) { goto startnumara }
if (%Zahl2 == %Zahl7) { goto startnumara }
if (%Zahl2 == %Zahl8) { goto startnumara }
if (%Zahl2 == %Zahl9) { goto startnumara }
if (%Zahl2 == %Zah20) { goto startnumara }
if (%Zahl3 == %Zahl4) { goto startnumara }
if (%Zahl3 == %Zahl5) { goto startnumara }
if (%Zahl3 == %Zahl6) { goto startnumara }
if (%Zahl3 == %Zahl7) { goto startnumara }
if (%Zahl3 == %Zahl8) { goto startnumara }
if (%Zahl3 == %Zahl9) { goto startnumara }
if (%Zahl3 == %Zah20) { goto startnumara }
if (%Zahl4 == %Zahl5) { goto startnumara }
if (%Zahl4 == %Zahl6) { goto startnumara }
if (%Zahl4 == %Zahl7) { goto startnumara }
if (%Zahl4 == %Zahl8) { goto startnumara }
if (%Zahl4 == %Zahl9) { goto startnumara }
if (%Zahl4 == %Zah20) { goto startnumara }
if (%Zahl5 == %Zahl6) { goto startnumara }
if (%Zahl5 == %Zahl7) { goto startnumara }
if (%Zahl5 == %Zahl8) { goto startnumara }
if (%Zahl5 == %Zahl9) { goto startnumara }
if (%Zahl5 == %Zah20) { goto startnumara }
if (%Zahl6 == %Zahl7) { goto startnumara }
if (%Zahl6 == %Zahl8) { goto startnumara }
if (%Zahl6 == %Zahl9) { goto startnumara }
if (%Zahl6 == %Zah20) { goto startnumara }
if (%Zahl7 == %Zahl8) { goto startnumara }
if (%Zahl7 == %Zahl9) { goto startnumara }
if (%Zahl7 == %Zah20) { goto startnumara }
if (%Zahl8 == %Zahl9) { goto startnumara }
if (%Zahl8 == %Zah20) { goto startnumara }
if (%Zahl9 == %Zah20) { goto startnumara }

msg $chan 120n Numara'daki ŞansLı NumaraLarınız: 3 %Zahl1 9 - 3 %Zahl2  9- 3 %Zahl3  9- 3 %Zahl4 9 - 3 %Zahl5  9-3 %Zahl6 9 - 3 %Zahl7 9 - 3 %Zahl8  9- 3 %Zahl9  9- 3 %Zah20  12oLmaLı.
}

on 1:TEXT:!süperloto:#: {

:startsuper

.set %Zahl1 $rand(1,54)
.set %Zahl2 $rand(1,54)
.set %Zahl3 $rand(1,54)
.set %Zahl4 $rand(1,54)
.set %Zahl5 $rand(1,54)
.set %Zahl6 $rand(1,54)

if (%Zahl1 == %Zahl2) { goto startsuper }
if (%Zahl1 == %Zahl3) { goto startsuper }
if (%Zahl1 == %Zahl4) { goto startsuper }
if (%Zahl1 == %Zahl5) { goto startsuper }
if (%Zahl1 == %Zahl6) { goto startsuper }
if (%Zahl2 == %Zahl3) { goto startsuper }
if (%Zahl2 == %Zahl4) { goto startsuper }
if (%Zahl2 == %Zahl5) { goto startsuper }
if (%Zahl2 == %Zahl6) { goto startsuper }
if (%Zahl3 == %Zahl4) { goto startsuper }
if (%Zahl3 == %Zahl5) { goto startsuper }
if (%Zahl3 == %Zahl6) { goto startsuper }
if (%Zahl4 == %Zahl5) { goto startsuper }
if (%Zahl4 == %Zahl6) { goto startsuper }
if (%Zahl5 == %Zahl6) { goto startsuper }

msg $chan 12Süper Loto'daki ŞansLı NumaraLarınız: 3 %Zahl1 9 - 3 %Zahl2  9- 3 %Zahl3  9- 3 %Zahl4 9 - 3 %Zahl5  9-3 %Zahl6  12oLmaLı.
}

on 1:TEXT:!şanstopu:#: {

:startsans

.set %Zahl1 $rand(1,34)
.set %Zahl2 $rand(1,34)
.set %Zahl3 $rand(1,34)
.set %Zahl4 $rand(1,34)
.set %Zahl5 $rand(1,34)
.set %Zahl6 $rand(1,14)

if (%Zahl1 == %Zahl2) { goto startsans }
if (%Zahl1 == %Zahl3) { goto startsans }
if (%Zahl1 == %Zahl4) { goto startsans }
if (%Zahl1 == %Zahl5) { goto startsans }
if (%Zahl2 == %Zahl3) { goto startsans }
if (%Zahl2 == %Zahl4) { goto startsans }
if (%Zahl2 == %Zahl5) { goto startsans }
if (%Zahl3 == %Zahl4) { goto startsans }
if (%Zahl3 == %Zahl5) { goto startsans }
if (%Zahl4 == %Zahl5) { goto startsans }

msg $chan 12Şans Topu'ndaki ŞansLı NumaraLarınız: 3 %Zahl1 9 - 3 %Zahl2  9- 3 %Zahl3  9- 3 %Zahl4 9 - 3 %Zahl5  10+ 3 %Zahl6  12oLmaLı.
}


Örnek :

16:00:25: <Chief>!sayısal
16:00:26: <k_1>SayısaL Loto'daki ŞansLı NumaraLarınız: 32 - 40 - 49 -33 - 31 - 18 oLmaLı.
16:00:31: <Chief>!şanstopu
16:00:32: <k_1>Şans Topu'ndaki ŞansLı NumaraLarınız: 1 - 10 - 4 -14 - 13 + 3 oLmaLı.
16:00:36: <Chief>!onnumara
16:00:37: <k_1>0n Numara'daki ŞansLı NumaraLarınız: 4 - 12 - 2 -16 - 79 - 35 - 50 - 53 - 65 -32 oLmaLı.
16:00:42: <Chief>!süperloto
16:00:43: <k_1>Süper Loto'daki ŞansLı NumaraLarınız: 20 - 38 - 46 -7 - 17 - 29 oLmaLı.