menu status,menubar,channel { - } dialog glist { title "Ban Listesi" size -1 -1 423 162 option dbu list 1, 2 10 82 126, size text "Gline Listesi", 4, 4 2 45 8 button "« « KAPAT » »", 5, 170 116 82 20, flat ok list 2, 86 10 82 126, size list 3, 254 10 82 126, size text "Shun Listesi", 6, 86 2 71 8 text "Zline Listesi", 7, 254 2 54 8 text "Kaldirmak istediginiz Banin ip numarasinin Uzerine Cift tiklayinca Ban Kalkacak.", 8, 72 140 266 8 list 9, 170 10 82 103, size text "G-Zline Listesi", 10, 170 2 65 8 list 11, 338 10 82 126, size text "Kline Listesi", 12, 338 2 60 8 edit "", 13, 116 150 147 10, read } on *:dialog:glist:*:*:{ if $devent == init { mdx MarkDialog $dname mdx SetDialog $dname bgcolor $rgb(240,240,240) mdx SetFont $dname 1,2,3,4,5,6,7,8,9,10,11,12,13 +b Turkish 13 950 Tahoma mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13 textbg $rgb(240,240,240) mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13 background $rgb(240,240,240) mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13 text $rgb(0,0,0) mdx SetColor $dname 8 text $rgb(199,92,2) mdx SetColor $dname 13 text $rgb(255,0,0) if !$regex($usermode,/o/) { did -a $dname 13 Bu islemi Yapmaniz icin Admin olmalisiniz.. | return } set %gkontrol on | .enable #bangizle | .stats g | .stats s | .stats k | .stats Z .timer 1 1 .disable #bangizle if $devent == dclick { if $did == 1 { gline $+(-*@, $did(1).seltext) did -d $dname 1 $did(1).sel } if $did == 2 { shun $+(-*@, $did(2).seltext) did -d $dname 2 $did(2).sel } if $did == 3 { zline $+(-*@, $did(3).seltext) did -d $dname 3 $did(3).sel } if $did == 9 { gzline $+(-*@, $did(9).seltext) did -d $dname 9 $did(9).sel } if $did == 11 { kline $+(-*@, $did(11).seltext) did -d $dname 11 $did(11).sel } } if $devent == close { write -c gline.txt write -c zline.txt write -c shun.txt write -c gzline.txt write -c kline.txt } } raw 223:*: { if ($2 isincs G) && (%gkontrol == on) && ($dialog(glist)) { did -a glist 1 $gettok($3,2,64) | write gline.txt $gettok($3,2,64) .timer 1 3 unset %gkontrol } if ($2 isincs z) && (%gkontrol == on) && ($dialog(glist)) { did -a glist 3 $gettok($3,2,64) | write zline.txt $gettok($3,2,64) } if ($2 isincs s) && (%gkontrol == on) && ($dialog(glist)) { did -a glist 2 $gettok($3,2,64) | write shun.txt $gettok($3,2,64) } if ($2 isincs Z) && (%gkontrol == on) && ($dialog(glist)) { did -a glist 9 $gettok($3,2,64) | write gzline.txt $gettok($3,2,64) } if ($2 isincs K) && (%gkontrol == on) && ($dialog(glist)) { did -a glist 11 $gettok($3,2,64) | write kline.txt $gettok($3,2,64) } /halt } alias glist { dialog -m glist glist } #bangizle off raw 223:*: { /halt } raw 249:*: { /halt } raw 219:*: { /halt } raw 216:*: { /halt } #bangizle end
