Çevrimdışı

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
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
%inceDen did -ra optnx 13 o_O gitti (@)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Ç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...
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) %inceDen did -ra optnx 28 Canın Sağolsun $nick
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
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
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
%inceDen } else { wo aop $did(11) } if (!$did(13)) { wo o_O gitti (@)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Ç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...
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) %inceDen } else { wo voice $did(26) } if (!$did(28)) { wo devoice Canın Sağolsun $nick
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
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

 

Çevrimdışı

Bunu kullan bence, gayet iyi.

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!

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, 1 -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:" 501, 70 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
} 

 

Çevrimdışı

Kodları


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