Loto Çekilişleri..
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ı. |