![]() |
![]() |
![]() | #1 | |
Çevrimdışı ![]() | kelime tamamlama hakkında yardim Arkadaslar aşağidaki addon bilinen bir kelime tamamlamadır. Cok kişi kullanmaktadır lakin çalışmıyor. Kulanan kişilerede baktım çalışmıyor. dll ve kelimelerin listesi için txt olayida tamam ama kisa kelimeyi uzuna çevirmiyor. Lütfen yardim edebilirmisiniz. dialog kelime_tamamla { title Kelime tamamlama size -1 -1 212 94 option dbu list 1, 3 2 100 88, size box "", 2, 105 18 74 57 button "Kapalı", 3, 104 2 76 12,flat text "Kısaltılmış:", 4, 109 26 28 8 edit "", 5, 108 37 67 10, autohs text "Tam:", 6, 109 50 25 8 edit "", 7, 108 60 67 10, autohs button "Ekle", 8, 107 78 31 12,flat button "Kaldır", 9, 145 78 31 12,flat button "Tamam" 10, 180 21 30 69 , ok,flat } on *:dialog:Kelime_tamamla:init:0:{ dll $mdx SetMircVersion $version | dll $mdx MarkDialog $dname | dll $mdx SetBorderStyle 3,8,9,10 staticedge | dll $mdx SetFont 4,6,3 12 700 Tahoma | dll $mdx SetFont 8,9,5,7 12 400 Tahoma | dll $mdx SetControlMDX 1 ListView grid single rowselect showsel report > $scriptdirviews.mdx | did -i $dname 1 1 headerdims 87:1 87:2 | did -i $dname 1 1 headertext Kısaltılmış: $+ $chr(9) $+ Tam: | if (%Kelime_tamamla == evet) did -a $dname 3 Açık | else did -a $dname 3 Kapalı | kelimeyükle } on *:dialog:Kelime_tamamla:sclick:1:{ did -ra $dname 5 $gettok($read($scriptdirkelimeler.txt,$calc($did(1 ).sel - 1)),1,9) | did -ra $dname 7 $gettok($read($scriptdirkelimeler.txt,$calc($did(1 ).sel - 1)),2,9) | if ($gettok($did($dname,$did,1),1,32) == rclick) { Kelimenü } } on *:dialog:Kelime_tamamla:sclick:3:{ if (%Kelime_tamamla == evet) { set %Kelime_tamamla hayır | did -a Kelime_tamamla 3 Kapalı | set %kelimetamamla OFF } | else { set %Kelime_tamamla evet | set %kelimetamamla ON | did -a Kelime_tamamla 3 Açık } } on *:dialog:Kelime_tamamla:sclick:8:{ kelime.ekle } on *:dialog:Kelime_tamamla:sclick:9:{ kelime.çıkart } alias kelime { dialog -m Kelime_tamamla Kelime_tamamla } alias -l mdx { return $shortfn($scriptdirmdx.dll) } alias -l kelimeyükle { did -r kelime_tamamla 1,5,7 | loadbuf -o kelime_tamamla 1 $scriptdirkelimeler.txt } alias -l kelime.ekle { if ((!$did(5)) || (!$did(4))) { return } | if ((* isin $did(5)) || ($read($scriptdirkelimeler.txt, w, * $+ $did(5) $+ *) == $null)) { .write $scriptdirkelimeler.txt $did(5) $+ $chr(9) $+ $did(7) } | else { .write -l $+ $readn $scriptdirkelimeler.txt $did(5) $+ $chr(9) $+ $did(7) } | kelimeyükle } alias -l kelime.çıkart { if ($did(kelime_tamamla,1).sel) { .write -dl $+ $calc($did(kelime_tamamla,1).sel - 1) $scriptdirkelimeler.txt } | kelimeyükle } alias -l oirc { if (%Kelime_Tamamla == hayır) { return $1- } | else { var %i 1 | set %text $1- | :init | if ($read($scriptdirkelimeler.txt,%i) == $null) { goto end } | set %heroturk $gettok($read($scriptdirkelimeler.txt,%i),1,9) | set %her0turk $gettok($read($scriptdirkelimeler.txt,%i),2,9) | set %text $replace(%text,%heroturk,%her0turk) | inc %i | goto init | :end } | var %a %text | unset %text | unset %heroturk | unset %her0turk | return %a } alias -l Kelimenü { if ($did(Kelime_Tamamla,1).sel) { dll $popups New replace 16 16 | dll $popups SetStyle replace bordericon | dll $popups LoadImg replace icon small $scriptdiricon\off.ico | dll $popups AddItem replace end 1 1 çıkart $cr kelime.çıkart | Popupz replace $mouse.dx $mouse.dy } } alias -l popupz { tokenize 32 $dll($shortfn($scriptdirpopups.dll),Popup,$1-) | if ($isid) { return $1- } | elseif ($4- != did not select a menu item) { $4- } } alias -l popups { return $shortfn($scriptdirpopups.dll) } on *:INPUT:?: { if (%kelimetamamla == ON) && (%yazitipacikmi == OFF) && (($1 != $null) && ($left($1,1) != /) && (Status Window != $active)) { haltdef | var %t $oirc($1-) | .msg $active %t | .echo -a $timestamp $+ $+ $colour(Own Text) 4< $+ $me $+ 4> %f %t } } Arkadaslar aşağidaki addon bilinen bir kelime tamamlamadır. Cok kişi kullanmaktadır lakin çalışmıyor. Kulanan kişilerede baktım çalışmıyor. dll ve kelimelerin listesi için txt olayida tamam ama kisa kelimeyi uzuna çevirmiyor. Lütfen yardim edebilirmisiniz. dialog kelime_tamamla { title Kelime tamamlama size -1 -1 212 94 option dbu list 1, 3 2 100 88, size box "", 2, 105 18 74 57 button "Kapalı", 3, 104 2 76 12,flat text "Kısaltılmış:", 4, 109 26 28 8 edit "", 5, 108 37 67 10, autohs text "Tam:", 6, 109 50 25 8 edit "", 7, 108 60 67 10, autohs button "Ekle", 8, 107 78 31 12,flat button "Kaldır", 9, 145 78 31 12,flat button "Tamam" 10, 180 21 30 69 , ok,flat } on *:dialog:Kelime_tamamla:init:0:{ dll $mdx SetMircVersion $version | dll $mdx MarkDialog $dname | dll $mdx SetBorderStyle 3,8,9,10 staticedge | dll $mdx SetFont 4,6,3 12 700 Tahoma | dll $mdx SetFont 8,9,5,7 12 400 Tahoma | dll $mdx SetControlMDX 1 ListView grid single rowselect showsel report > $scriptdirviews.mdx | did -i $dname 1 1 headerdims 87:1 87:2 | did -i $dname 1 1 headertext Kısaltılmış: $+ $chr(9) $+ Tam: | if (%Kelime_tamamla == evet) did -a $dname 3 Açık | else did -a $dname 3 Kapalı | kelimeyükle } on *:dialog:Kelime_tamamla:sclick:1:{ did -ra $dname 5 $gettok($read($scriptdirkelimeler.txt,$calc($did(1 ).sel - 1)),1,9) | did -ra $dname 7 $gettok($read($scriptdirkelimeler.txt,$calc($did(1 ).sel - 1)),2,9) | if ($gettok($did($dname,$did,1),1,32) == rclick) { Kelimenü } } on *:dialog:Kelime_tamamla:sclick:3:{ if (%Kelime_tamamla == evet) { set %Kelime_tamamla hayır | did -a Kelime_tamamla 3 Kapalı | set %kelimetamamla OFF } | else { set %Kelime_tamamla evet | set %kelimetamamla ON | did -a Kelime_tamamla 3 Açık } } on *:dialog:Kelime_tamamla:sclick:8:{ kelime.ekle } on *:dialog:Kelime_tamamla:sclick:9:{ kelime.çıkart } alias kelime { dialog -m Kelime_tamamla Kelime_tamamla } alias -l mdx { return $shortfn($scriptdirmdx.dll) } alias -l kelimeyükle { did -r kelime_tamamla 1,5,7 | loadbuf -o kelime_tamamla 1 $scriptdirkelimeler.txt } alias -l kelime.ekle { if ((!$did(5)) || (!$did(4))) { return } | if ((* isin $did(5)) || ($read($scriptdirkelimeler.txt, w, * $+ $did(5) $+ *) == $null)) { .write $scriptdirkelimeler.txt $did(5) $+ $chr(9) $+ $did(7) } | else { .write -l $+ $readn $scriptdirkelimeler.txt $did(5) $+ $chr(9) $+ $did(7) } | kelimeyükle } alias -l kelime.çıkart { if ($did(kelime_tamamla,1).sel) { .write -dl $+ $calc($did(kelime_tamamla,1).sel - 1) $scriptdirkelimeler.txt } | kelimeyükle } alias -l oirc { if (%Kelime_Tamamla == hayır) { return $1- } | else { var %i 1 | set %text $1- | :init | if ($read($scriptdirkelimeler.txt,%i) == $null) { goto end } | set %heroturk $gettok($read($scriptdirkelimeler.txt,%i),1,9) | set %her0turk $gettok($read($scriptdirkelimeler.txt,%i),2,9) | set %text $replace(%text,%heroturk,%her0turk) | inc %i | goto init | :end } | var %a %text | unset %text | unset %heroturk | unset %her0turk | return %a } alias -l Kelimenü { if ($did(Kelime_Tamamla,1).sel) { dll $popups New replace 16 16 | dll $popups SetStyle replace bordericon | dll $popups LoadImg replace icon small $scriptdiricon\off.ico | dll $popups AddItem replace end 1 1 çıkart $cr kelime.çıkart | Popupz replace $mouse.dx $mouse.dy } } alias -l popupz { tokenize 32 $dll($shortfn($scriptdirpopups.dll),Popup,$1-) | if ($isid) { return $1- } | elseif ($4- != did not select a menu item) { $4- } } alias -l popups { return $shortfn($scriptdirpopups.dll) } on *:INPUT:?: { if (%kelimetamamla == ON) && (%yazitipacikmi == OFF) && (($1 != $null) && ($left($1,1) != /) && (Status Window != $active)) { haltdef | var %t $oirc($1-) | .msg $active %t | .echo -a $timestamp $+ $+ $colour(Own Text) 4< $+ $me $+ 4> %f %t } } | |
| ![]() |
![]() | #2 |
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
| ben yaptım bi tane kelime tamamlama veya kelime / nick renklendirme addonu evde adsl gitti senin için yarın cdye çekip cafeden atayım.. |
| ![]() |
![]() | #3 |
Çevrimdışı ![]() | ciprix ilgin için teşekür ederim. Ama ben bunu çaliştiramadim bu benim hoşuma gitti. Bir yerde bir hatasi var o konuda yardim istedim. |
| ![]() |
![]() | #4 |
Çevrimdışı ![]() | Yardim etcek kimse yokmu arkadaslar. |
| ![]() |
![]() | #5 |
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
| baydo bu kod çalışmaz arkadaşım sorunu çözemedim çünkü hata vermiyor verse neyse ama vermiyor Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. sadece çalışmıyor |
| ![]() |
![]() | #6 |
Çevrimdışı ![]() | Evet bende ona uyuz oldum. Kelimeleri yüklüyo siraliyo. Ama kisayi uzun a cevirmiyo. Hatada göstermiyo bir yerinde ufak bir sorun var ama ne ? Bilen asrakadaslarda ilgilenirse cok makbule geccek. |
| ![]() |
![]() | #7 |
Çevrimdışı ![]() | Yaf sunu yapacak kimse yokmu cok lazım bana . |
| ![]() |
![]() | #8 |
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
| Kardeş bende denedim. Hata vermiyo anlamadim ama çalıştırmıyo. Güzel bir şeye benziyor. Ne deyim anlayan biri yapar inş. Sorunu;oki |
| ![]() |
![]() |
Etiketler |
hakkinda, hakkında, kelime, mirc, mirc download, mirc indir, tamamlama, yardim |
Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
Seçenekler | |
Stil | |
| |
![]() | ||||
Konu | Konuyu Başlatan | Forum | Cevaplar | Son Mesaj |
kufur.txt kelime tamamlama | fav | mIRC Scripting Sorunları | 3 | 03 Şubat 2013 12:52 |
kelime tamamlama hatası | angry1 | mIRC Scripting Sorunları | 4 | 12 Haziran 2012 21:50 |
kelime tamamlama (özellerde) | fener1907 | mIRC Scripting Sorunları | 2 | 24 Haziran 2010 23:04 |
Kelime Tamamlama addon | Visionic | mIRC Scripting Sorunları | 13 | 20 Nisan 2008 18:35 |