IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   op deop tşk diyaloğu (https://www.ircforumlari.net/mirc-scripting-sorunlari/504032-op-deop-tsk-diyalogu.html)

Dangerous123 15 Eylül 2012 03:07

op deop tşk diyaloğu
 
slm arkadaslar burda bır arkadas uzun zaman önce paylasmıs calısmayan bır kod ama bakıldıqında cok hoş doruyor içerikli

yardımcı olursanız bunu diyaloğ halınde kullanmayı isterim..

biraz zahmetli ama umarım yardımcı olursunuz

alias optnx { if (!$dialog(optnx)) { dialog -m optnx optnx } | else { dialog -v optnx optnx } } alias -l wo { writeini $+(",$scriptdiroptnx.ini,") optnx $1- } alias -l ro { return $readini($+(",$scriptdiroptnx.ini,"),optnx,$1) } alias -l rn { return $readini($+(",$scriptdiroptnx.ini,"),n,optnx,$1) } dialog optnx { title "Tesekkür Paneli" size -1 -1 240 109 option dbu check "Acik", 1, 9 1 27 10 text "Owner:", 2, 13 17 18 8, autohs edit "", 3, 39 16 80 10, autohs text "Deorner:", 4, 120 17 20 8 edit "", 5, 148 16 80 10, autohs text "Sop:", 6, 12 31 20 8 edit "", 7, 39 30 80 10, autohs text "DeSop:", 8, 120 30 20 8 edit "", 9, 148 30 80 10, autohs text "Aop:", 10, 12 45 20 8 edit "", 11, 39 44 80 10, autohs text "Deop:", 12, 120 44 20 8 edit "", 13, 148 44 80 10, autohs button "Uygula", 14, 77 91 30 12, ok button "Iptal", 15, 112 91 30 12, cancel button "Reset", 16, 147 91 30 12 text "Hop:", 21, 13 57 20 8 edit "", 22, 38 56 80 10, autohs text "Dehop:", 23, 119 57 20 8 edit "", 24, 148 56 80 10, autohs text "Voice:", 25, 13 70 18 8 edit "", 26, 38 69 80 10, autohs text "Devoice:", 27, 119 70 20 8 edit "", 28, 148 69 80 10, autohs box "", 17, 73 86 109 19 box "", 18, 7 10 225 73 } on *:dialog:optnx:*:*:{ if ($devent == init) { if ($ro(optnx) == on) { did -c optnx 1 } else { did -u optnx 1 | did -m optnx 3,5,7,9,11,13,22,24,26,28 } did -a optnx 3 $rn(owner) did -a optnx 5 $rn(deowner) did -a optnx 7 $rn(Sop) did -a optnx 9 $rn(deSop) did -a optnx 11 $rn(Aop) did -a optnx 13 $rn(Deop) did -a optnx 22 $rn(Hop) did -a optnx 24 $rn(Dehop) did -a optnx 26 $rn(voice) did -a optnx 28 $rn(devoice) } if ($devent == sclick) { if ($did == 1) { if ($ro(optnx) == on) { .disable #optnx | wo optnx off | did -u optnx 1 | did -m optnx 3,5,7,9,11,13,22,24,26,28 } else { .enable #optnx | wo optnx on | did -c optnx 1 | did -n optnx 3,5,7,9,11,13,22,24,26,28 } } if ($did == 16) { did -ra optnx 3 Owner için teşekkürler $nick %inceDen did -ra optnx 5 Gitti Kanalın Elimden $nick Geri Ver çabuk %inceDen did -ra optnx 7 Sop için teşekkürler $nick %inceDen did -ra optnx 9 Zaten Hoşuma Gitmemişti :pp $nick %inceDen did -ra optnx 11 (@) için teşekkürler. $nick ;) %inceDen did -ra optnx 13 o_O gitti (@) :( Çabuk geri ver $nick ! %inceDen did -ra optnx 22 Hmm... Bu nedir böyle $nick ? Yarım porsiyon op mu ? ;P %inceDen did -ra optnx 24 Hey! Neden aldın onu $nick ? Geri ver çabuk !! %inceDen did -ra optnx 26 Hehe çok sağol ya $nick . Manyak Karizma oldu... :)) %inceDen did -ra optnx 28 Canın Sağolsun $nick ;) Zaten pek bir işe yaramıyordu... %inceDen } if ($did == 14) { if (!$did(3)) { Owner için teşekkürler $nick %inceDen } else { wo owner $did(3) } if (!$did(5)) { Gitti Kanalın Elimden $nick Geri Ver çabuk %inceDen } else { wo deowner $did(5) } if (!$did(7)) { wo Sop için teşekkürler $nick %inceDen } else { wo Sop $did(7) } if (!$did(9)) { wo Zaten Hoşuma Gitmemişti :pp $nick %inceDen } else { wo desop $did(9) } if (!$did(11)) { wo (@) için teşekkürler. $nick ;) %inceDen } else { wo aop $did(11) } if (!$did(13)) { wo o_O gitti (@) :( Çabuk geri ver $nick ! %inceDen } else { wo deop $did(13) } if (!$did(22)) {wo Hmm... Bu nedir böyle $nick ? Yarım porsiyon op mu ? ;P %inceDen } else { wo Hop $did(22) } if (!$did(24)) { wo Hey! Neden aldın onu $nick ? Geri ver çabuk !! %inceDen } else { wo Dehop $did(24) } if (!$did(26)) { wo voice Hehe çok sağol ya $nick . Manyak Karizma oldu... :)) %inceDen } else { wo voice $did(26) } if (!$did(28)) { wo devoice Canın Sağolsun $nick ;) Zaten pek bir işe yaramıyordu... %inceDen } else { wo devoice $did(28) } } } #optnx on on *:+oq:#:{ if ($hnick == $me) && ($nick != $me) && !$istok(#help #operhelp,$chan,32) { msg # $eval($ro(owner)) } } on *:-oq:#:{ if ($hnick == $me) && ($nick != $me) && !$istok(#help #operhelp,$chan,32) { msg # $eval($ro(deowner)) } } on *:+oa:#:{ if ($hnick == $me) && ($nick != $me) && !$istok(#help #operhelp,$chan,32) { msg # $eval($ro(Sop)) } } on *:-oa:#:{ if ($hnick == $me) && ($nick != $me) && !$istok(#help #operhelp,$chan,32) { msg # $eval($ro(desop)) } } on *:+o:#:{ if ($opnick == $me) && ($nick != $me) && !$istok(#help #operhelp,$chan,32) { msg # $eval($ro(op)) } } on *:-o:#:{ if ($opnick == $me) && ($nick != $me) && !$istok(#help #operhelp,$chan,32) { msg # $eval($ro(deop)) } } on *:+h:#:{ if ($hnick == $me) && ($nick != $me) && !$istok(#help #operhelp,$chan,32) { msg # $eval($ro(hop)) } } on *:-h:#:{ if ($hnick == $me) && ($nick != $me) && !$istok(#help #operhelp,$chan,32) { msg # $eval($ro(dehop)) } } on *:+v:#:{ if ($vnick == $me) && ($nick != $me) && !$istok(#help #operhelp,$chan,32) { msg # $eval($ro(voice)) } } on *:-v:#:{ if ($vnick == $me) && ($nick != $me) && !$istok(#help #operhelp,$chan,32) { msg # $eval($ro(devoice)) } } #optnx end

house 15 Eylül 2012 04:42

Cevap: op deop tşk diyaloğu
 
Bunu kullan bence, gayet iyi.

PHP- Kodu:

alias optes 
  if (%
opvote == off) { dialog -m opvotes opvotes 180 200 280 180 dialog -t opvotes Op-Voice Teşekkür Modu Kapalı. | did -b opvotes 9 did -b opvotes 10 did -b opvotes 11 did -b opvotes 12 }
  if (%
opvote == on) { dialog -m opvotes opvotes 180 200 280 180 dialog -t opvotes Op-Voice Teşekkür Modu Açık. }
}
dialog opvotes {
  
size 180 200 296 186
  box 
""505-5 293 190
  title 
".::[ Op-Voice Teşekkür ]::."
  
button "Kaydet ve Çık",1,20 150 125 25,ok
  button 
"Vazgeç",2,155 150 125 25,cancel
  text 
"Op (+o) Mesajı ->",3,20 47 100 20
  text 
"DeOp (-o) Mesajı ->",4,20 72 100 20
  text 
"Voice (+v) Mesajı ->",5,20 97 100 20
  text 
"Devoice (-v) Mesajı ->",6,20 119 110 20
  box 
"",7,13 135 274 10
  box 
"",8,15 1 265 43,
  
edit %optemsg ,9,125 45 155 20,autohs
  edit 
%deoptemsg ,10,125 69 155 20,autohs
  edit 
%votemsg ,11,125 93 155 20,autohs
  edit 
%devotemsg ,12,125 117 155 20,autohs
  radio 
"Açık",13,125 13 50 25,group
  radio 
"Kapalı",14,190 13 50 25
  text 
"Durum:" 50170 18 35 15
}
on *:dialog:opvotes:sclick:1: { set %optemsg $did(9) | set %deoptemsg $did(10) | set %votemsg $did(11) | set %devotemsg $did(12) }
on *:dialog:opvotes:sclick:13: { set %opvote on dialog -t opvotes Op-Voice Teşekkür Açıldı. | did -e opvotes 9 did -e opvotes 10 did -e opvotes 11 did -e opvotes 12 }
on *:dialog:opvotes:sclick:14 set %opvote off dialog -t opvotes Op-Voice Teşekkür Kapandı. | did -b opvotes 9 did -b opvotes 10 did -b opvotes 11 did -b opvotes 12 }
on *:dialog:opvotes:init:0:{
  if (%
opvote == on) { did -c opvotes 13 }
  if (%
opvote == off) { did -c opvotes 14 }
}
on ^*:OP:#:{ if ($opnick == $me) && (%opvote == on) && ($nick != $me) { msg $chan $nick %optemsg } } 

on ^*:DEOP:#:{ if ($opnick == $me) && (%opvote == on) && ($nick != $me) { msg $chan $nick %deoptemsg } } 

on ^*:VOICE:#:{ if ($vnick == $me) && (%opvote == on) && ($nick != $me) { msg $chan $nick %votemsg } } 

on ^*:DEVOICE:#:{ if ($vnick == $me) && (%opvote == on) && ($nick != $me) { msg $chan $nick %devotemsg } }

menu * {
  
Op Voice Teşekkür :/dialog -m opvotes opvotes



Krieq 15 Eylül 2012 12:56

Cevap: op deop tşk diyaloğu
 
Kodları

Kod:

Kodları buraya yazın.
şeklinde paylaşırsanız yardımcı olmaya çalışalım.Düz yazı şeklinde yazı yazmışsınız.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 14:04.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk