19 Ağustos 2010 Perşembe

mIRC Secilen Nicklere Mesaj Gonder (Oto Dialoglu)

PHP-Kodu: * Do?um: join: #: ( if $ nick == $ me ( $+(., Zamanlay?c?, SNM) 0 0 / unl.snick.kontrol ) ) alias unl.snick.kontrol ( ($ Numtok ($ kesik ($ aktif), 44) = 1) () s.kapat e?er ($ Numtok ($ kesik ($ aktif), e?er 44)> 1) ( % SecilenNickler kesik ($ aktif) $ set $+(., Zamanlay?c?, SSX) 1 0 / snick.dialog ) ) alias snick.dialog ( ($ Dialog if (SecilenNickler)) () else (dialog-m SecilenNickler SecilenNickler) ) SecilenNickler (ileti?im boyutu -1 -1 280 160 Ba?l?k Air Video Gönderici kutu \ \ "Seçilen Nickler listesi: \ \", 1, 5 5 120 148 liste 3, 15 20 100 140 kutu \ \ "Gönderilecek Air Video: \ \", 8, 129 5 145 148 dü?mesine \ \ "GÖNDER / BA? LAT \ \", 9, 139 100 122 40, ok \ \ De?i?tir "\ \", 31, 140 20 120 70, multi, autovs, vsbar ) * Do?um: dialog: SecilenNickler: init: *: ( var% a = 1 ($ Gettok (% SecilenNickler,% s?ras?nda, 44)) ( did-a SecilenNickler 3 $ gettok (% SecilenNickler,% a, 44) inc% a ) ) * Do?um: dialog: SecilenNickler: close: *: ( ($ Dialog if (SecilenNickler)) ( $+(., Zamanlay?c?, SNMx1) 1 0 / s.kapat $+(., Zamanlay?c?, SNMx2) 1 1 / s.kapat ) $+(., Zamanlay?c?, SNM) kapal? $+(., Zamanlay?c?, SNMX) 1 20 $+(., zamanlay?c?, SNM) 0 0 / unl.snick.kontrol ) 1: dialog: SecilenNickler :*:*: ( == Sclick ($ devent) (if ($ Did == 9) (if var% Z 1 ise% Z <= $ ($ dname, 31,% Z) (did e?er $ ($ dname, 31,% Z) == $ did null (goto son) % SecilenNickler.Mesaj, $ + (% SecilenNickler.Mesaj set $ ($ dname, 31,% Z)) yapt? inc% Z ) : Son inc% Z 10 $+(., Zamanlay?c?, SNM) kapal? $+(., Zamanlay?c?, SNMX) 1% Z $+(., zamanlay?c?, SNM) 0 0 / unl.snick.kontrol SecilenNickler.Gonder ) ) == Rclick ($ devent) (halt) if == Dclick ($ devent) (halt) if ) alias-l s.kapat ( ($ Dialog if (SecilenNickler)) ( dialog-x SecilenNickler ) ) SecilenNickler.Gonder (alias % Mucux 1 set $+(., Zamanlay?c?, SNMMS) 0 1 / SecilenNickler.Gonder.Devam ) alias SecilenNickler.Gonder.Devam ( e?er $ gettok (% SecilenNickler, 1,44) == $ null ( $+(., Zamanlay?c?, SNMMS) kapal? goto o?lu ) e?er $ gettok (% SecilenNickler, 1,44)! = $ null ( e?er $ gettok (% SecilenNickler,% mucux, 44)! = $ null ( . Gettok (% SecilenNickler,% mucux, 44)% SecilenNickler.Mesaj $ msg inc% mucux 1 goto o?lu ) e?er $ gettok (% SecilenNickler,% mucux, 44) == $ null ( $+(., Zamanlay?c?, SNMMS) kapal? unset% mucux echo-a *** Seçilen Nicklere Air Video Gönderimi ba? ar? yla tamamland?. goto o?lu ) ) : Son ) __________________ mirc indir

Hiç yorum yok:

Yorum Gönder