Tekil Mesaj gösterimi
Alt 19 Haziran 2019, 04:38   #1
Çevrimdışı
Alper
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Kelime Tamamlama Addon




Merhabalar,


Geçenlerde bir kelime tamamlama addonu gördüm ve bu şekilde basit bir addon yapma kararı aldım umarım işinize yarar. Input eventi benim kendi kullandığım kod önceden beri var kimin bilmiyorum onun üzerinden düzenleme yaptım.



Not: Dikkat etmeniz gereken konu kullandığınız farklı yazı yazma stil kodu varsa onu devre dışı bırakmanız gerekiyor yoksa çakışma olabilir.


Ek olarak sorunla karşılaşırsanız bu konu başlığı altında bildirebilirsiniz.


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
menu status,channel,menubar { - Kelime Tamamlama: ktamamla - } alias ktamamla { if ($dialog(ktamamla)) { dialog -c ktamamla } | dialog -ma ktamamla ktamamla } dialog ktamamla { title "Kelime Tamamlama" size -1 -1 215 134 option dbu edit "", 1, 7 9 50 10, autohs text " yazdığında", 2, 58 10 30 8 button "Sil", 3, 51 117 74 12 edit "", 4, 89 9 80 10, autohs text " olarak yazacak", 5, 169 10 38 8 button "Ekle", 6, 7 23 201 12, default box "Kelime Tamamlama", 7, 3 1 209 38 list 8, 3 41 209 71, size vsbar radio "Açık", 9, 149 118 24 10, group left radio "Kapalı", 10, 182 118 27 10 box "", 11, 143 114 69 15 button "Tamam", 12, 4 117 28 12, ok } on *:dialog:ktamamla:*:*: { if ($devent == init) { if ($group(#ktamamla) == on) { did -c ktamamla 9 } | else { did -c ktamamla 10 } ktamamla.init } if ($devent == sclick) { if ($did == 6) { if (($did(1) && $did(4)) != $null) { if !$read(tamamlama.txt,w,$did(1) $+ $chr(186) $+ *) { .write tamamlama.txt $did(1) $+ $chr(186) $+ $did(4) | ktamamla.init | did -r ktamamla 1,4 } else { echo 4 -at [ $did(1) ] Kelime tamamlama listesinde ekli } } else { echo 4 -at Lütfen 2 kutucuğu doldurun } } if ($did == 3) { if $read(tamamlama.txt,w,$token($did(8).seltext,1,47) $+ $chr(186) $+ *) { if ($did(8).seltext != $null) { .write $+(-dl,$readn) tamamlama.txt | ktamamla.init } } } if ($did(9).state == 1) { .enable #ktamamla } if ($did(10).state == 1) { .disable #ktamamla } } } alias ktamamla.init { did -r ktamamla 8 var %ul 1 while %ul <= $lines(tamamlama.txt) { did -a ktamamla 8 $replace($read(tamamlama.txt,%ul),$chr(186),$chr(47)) inc %ul } } #ktamamla off on *:input:*:{ if !$regex($1,/^(\.|!|\/|[0-9])/i) || ($ctrlenter) { var %^ = 1, %' while %^ <= $0 { %' = %' $iif($read(tamamlama.txt,w,$gettok($1-,%^,32) $+ $chr(186) $+ *),$token($read(tamamlama.txt,$readn),2,186),$gettok($1-,%^,32)) inc %^ } say %' halt } } #ktamamla end



Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.




Normalde menulerde çıkar ama komut ile açmak isteyen için.


/ktamamla

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet bizimmekan