İddaa Sonuçlarını gösteren Addon
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 |
alias -l txt $iif($1 == -o,drawtext -or @tahmin $2 Tahoma 11 $3 $4 $5-,drawtext -r @tahmin $1 Tahoma 11 $2 $3 $4-) alias -l rect $iif($1 == -f,drawrect -rf @tahmin $2 1 $3 $4 $5 $6,drawrect -r @tahmin $1 1 $2 $3 $4 $5) alias -l mlist { inc %mly 23 | txt -o $rgb(255,255,255) 30 %mly $1- } alias -l create->table { if ($window(@tahmin)) { set %ly 26 rect -f $rgb(0,130,65) 6 6 770 22 rect $rgb(0,0,0) 6 6 770 22 rect -f $rgb(69,101,8) 6 27 770 25 rect $rgb(0,0,0) 6 27 770 25 rect $rgb(0,0,0) 60 27 1 25 rect $rgb(0,0,0) 120 27 1 25 ;rect $rgb(0,0,0) 320 27 1 25 rect $rgb(0,0,0) 530 27 1 25 rect $rgb(0,0,0) 590 27 1 25 rect $rgb(0,0,0) 660 27 1 25 txt -o $rgb(255,204,0) 20 33 Saat txt -o $rgb(255,204,0) 80 33 Kod txt -o $rgb(255,204,0) 300 33 KARŞILAŞMA ;txt -o $rgb(255,204,0) 470 33 Misafir Takım txt -o $rgb(255,204,0) 550 33 MBS txt -o $rgb(255,204,0) 610 33 Sonuç txt -o $rgb(255,204,0) 680 33 Banko/Süpriz } } alias -l create->col { if ($window(@tahmin)) { rect -f $rgb(52,113,52) 0 50 2000 2000 var %tsay = 1 while (%tsay <= $lines(maclar.txt)) { inc %ly 24 tokenize 191 $read(maclar.txt,%tsay) rect -f $rgb(0,92,0) 6 %ly 770 25 rect $rgb(0,0,0) 6 %ly 770 25 rect $rgb(0,0,0) 60 %ly 1 25 rect $rgb(0,0,0) 120 %ly 1 25 ;rect $rgb(0,0,0) 320 %ly 1 25 rect $rgb(0,0,0) 530 %ly 1 25 rect $rgb(0,0,0) 590 %ly 1 25 rect $rgb(0,0,0) 660 %ly 1 25 $iif($1 != $null,txt $rgb(255,255,255) 17 $calc(%ly + 5) $1) $iif($2 != $null,txt $rgb(255,255,0) 77 $calc(%ly + 5) $2) $iif($3 != $null,txt $rgb(255,255,0) 180 $calc(%ly + 5) $3) $iif($4 != $null,txt $rgb(255,255,255) 555 $calc(%ly + 5) $4) $iif($5 != $null,txt $rgb(255,255,255) 620 $calc(%ly + 5) $5) $iif($6 != $null,txt $rgb(255,255,255) 700 $calc(%ly + 5) $6) $iif(%tsay == $lines(maclar.txt),guncel->button) inc %tsay } } } alias tahmin { window -pxk[1] @Tahmin rect -f $rgb(52,113,52) 0 0 2000 2000 create->table drawtext -or @tahmin $rgb(255,255,0) Tahoma 25 50 150 Bekleyin... } alias -l guncel->button { txt -o $rgb(255,255,255) 280 10 %tarih rect -f $rgb(0,128,64) 700 $calc(%ly + 30) 70 20 rect $rgb(0,0,0) 700 $calc(%ly + 30) 70 20 txt -o $rgb(255,255,0) 709 $calc(%ly + 33) Gün. Bilgi } alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ) | return %x } } alias iddaa { tahmin | sockclose tiddaa* | write -c maclar.txt | sockopen $+(tiddaa,$r(1,999)) www.betstudy.com 80 } on *:SockOpen:tiddaa*:{ sockwrite -n $sockname GET /turkce/iddaa/iddaa-tahminleri.htm/ HTTP/1.1 sockwrite -n $sockname host: www.betstudy.com sockwrite -n $sockname $crlf } on *:load:sockclose update | unset %yap | sockopen update www.geocities.com 80 | echo -a Addon Başarıyla Yüklenmiştir | echo -a Iddaa Tahminleri By SCouNDReL & SeRDaR406 on *:SockRead:tiddaa*:{ var %a sockread %a if (<strong> isin %a) && (iddaa tahminleri isin %a) { set %tarih $htmlfree(%a) } if (%yas) && (Oyna !isin %a) && (</div> isin %a) { set %serdarjan $addtok(%serdarjan,$htmlfree($replace(%a,ı,i,ş,s,,$crlf,ğ,g,ö,o,",",ü,u,İ,I,ç,c,Ç,C,Ş,S,&e,e,Ğ,G,’,',…,...,â,a,î,i,’,',”,",“,",YORUM İÇİN TIKLA,-)),191) } if (#00CC33 isin %a) { set %yas temem } if (/tr isin %a) && (%yas) { unset %yas | write maclar.txt %serdarjan | unset %serdarjan } } alias -l update.basla { sockclose updatestart | unset %yap | sockopen updatestart www.geocities.com 80 } on *:SockOpen:update:{ sockwrite -n $sockname GET /serjan.team/iddaa.txt HTTP/1.1 sockwrite -n $sockname host: www.geocities.com sockwrite -n $sockname $crlf } on *:SockOpen:updatestart:{ sockwrite -n $sockname GET $+(/serjan.team/,%guncel) HTTP/1.1 sockwrite -n $sockname host: www.geocities.com sockwrite -n $sockname $crlf } on *:SockRead:update:{ var %a sockread %a if ($sockerr) { return } if ($gettok($script,-1,$asc(\)) != %a) && (.txt isin %a) { set %guncel $gettok(%a,-1,$asc(/)) } } menu @tahmin { uclick: { $iif($inrect($mouse.x,$mouse.y,700,$calc(%ly + 30),70,20),dialog -m guncel guncel) } Yenile:.iddaa - Kapat:close -@ @Tahmin } on *:SockRead:updatestart:{ var %a sockread %a if (%yap) { write %guncel %a } if (¿ isin %a) { set %yap Ok! } } on *:SockClose:update:$iif(%guncel,update.basla,echo -a Iddaa Tahminleri Gösterici Güncellendi) on *:SockClose:updatestart:{ $iif($exists($shortfn($+($scriptdir,%guncel))),.load -rs $shortfn($+($scriptdir,%guncel)),halt) unset %guncel unset %yap .remove $script .unload -rs $shortfn($script) echo -a Iddaa Tahminleri Gösterici Güncellendi } dialog guncel { title "Güncelleştirme Bilgileri" size -1 -1 150 93 option dbu edit "Yükleniyor...", 1, 3 15 155 60, read multi hsbar vsbar text "Güncelleştirme Bilgileri", 2, 33 3 54 8 button "Tamam", 3, 55 78 37 12,ok } on *:sockclose:tiddaa*: create->col on *:dialog:guncel:init:0:guncel.bilgi alias -l guncel.bilgi { sockclose guncel.bilgi | sockopen guncel.bilgi www.geocities.com 80 } on *:SockOpen:guncel.bilgi:{ sockwrite -n $sockname GET /serjan.team/iddaaguncel.txt HTTP/1.1 sockwrite -n $sockname host: www.geocities.com sockwrite -n $sockname $crlf } on *:SockRead:guncel.bilgi:{ var %a sockread %a if ($sockerr) { $iif($dialog(guncel),did -ra guncel 1 Bağlantı Hatası!) } if (%yap == Ok!) && ($dialog(guncel)) { did -a guncel 1 %a $crlf } if (¿ isin %a) { set %yap Ok! | $iif($dialog(guncel),did -r guncel 1) } } on *:start: { sockclose update | sockopen update www.geocities.com 80 } on *:SockClose:guncel.bilgi:unset %yap |