|
Lütfen acil yardım !!!!!! arkadaşlar benim kendi scpritime yazı tipleri addonunu remotesini buluyorum siliyorum nette buldugum yazı tipi addonunu kendi scpritime yüklüyorum ama eski yazı tipiaddonu halan kalkmamıs oluyor bunu surdan anlıyorum her yazdıgım iki kere cıkıyor bana elinde şekilli yazı tipi addonu olan bide bu eski yazı tipini nasıl kaldıracagım onu söyleyebilecke bi arkadaş varmı lütfen yardım edin kaç gündür ugraşıyorum canım cıktı |
Cevap: Lütfen acil yardım !!!!!! Yeni eklediğin addondaki /say komutlarının sonunda, bracketi kapatmadan önce /halt komutunu eklersen iki defa gitme sorunu ortadan kalkar. Yapamazsan, kodları buraya kopyalarsın; ben düzenlerim. |
Cevap: Lütfen acil yardım !!!!!! on 1:load: { if ( $version < 5.6 ) { unload -rs yazitipi.mrc | echo 4 -a Bu add-on mIRC 5.6 ve üzeri için hazırlanmıştır. En son mIRC için [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] adresine bakınız. } else { echo 4 -a 12,4|| BQRA || tarafından yapılan 12YAZITİPLERİ add-onu yüklendi. } } #yazirenkli off on 1:INPUT:*:{ unset %ahenk* if ( $chr(47) == $mid($1-,1,1) ) { $1- | unset %ahenk* | halt } :ilk inc %ahenks if ( %ahenks > $len($1-) ) { say %ahenkt | unset %ahenk* | halt } %ahenkh = $mid($1-,%ahenks,1) %ahenkh = $replace(%ahenkh,$chr(32),$chr(0160)) %ahenkt = %ahenkt $+ $+ $rand(3,13) $+ %ahenkh goto ilk } #yazirenkli end #yaziters off on 1:INPUT:*:{ unset %ters* if ( $chr(47) == $mid($1-,1,1) ) { $1- | unset %ters* | halt } :ilk inc %terss if ( %terss > $len($1-) ) { say %terst | unset %terst* | halt } set %tersh $mid($1-,%terss,1) %terst = %tersh $+ %terst goto ilk } #yaziters end #yaziturkce off on 1:INPUT:*:{ unset %turkce set %turkce $1- if ( $chr(47) == $mid(%turkce,1,1) ) { %turkce | unset %turkce* | halt } %turkce = $replacecs(%turkce,ı,I,İ,Î,ş,$,Ş,$,ç,¢,Ç,¢,ğ,g,Ğ,Ğ ,ü,û,Ü,Û,ö,ô,Ö,Ô) say %turkce unset %turkce halt } #yaziturkce end #yazielit off on 1:INPUT:*:{ unset %elit set %elit $1- if ( $chr(47) == $mid(%elit,1,1) ) { %elit | unset %elit* | halt } %elit = $replacecs(%elit,a,å,b,ß,c,©,d,D,e,ë,f,F,h,]-[,i,î,k,|{,l,£,m,M,n,ñ,o,ø,p,P,q,¶,r,®,s,§,t,±,u,µ, v,V,w,\\',x,×,y,¥,z,Z,ı,I,İ,Î,ş,$,Ş,$,ç,¢,Ç,¢,ğ,g, Ğ,Ğ,ü,û,Ü,Û,ö,ô,Ö,Ô,!,¡,?,¿,<,«,>,»,-,¬,:,¦,',`,`,') say %elit unset %elit halt } #yazielit end #yaziseskuc off on 1:INPUT:*:{ unset %seskuc set %seskuc $1- if ( $chr(47) == $mid(%seskuc,1,1) ) { %seskuc | unset %seskuc | halt } %seskuc = $replacecs(%seskuc,q,Q,w,W,E,e,r,R,t,T,y,Y,U,u,I,ı ,O,o,p,P,ğ,Ğ,Ü,ü,A,a,s,S,d,D,f,F,g,G,h,H,j,J,k,K,l ,L,ş,Ş,İ,i,z,Z,x,X,c,C,v,V,b,B,n,N,m,M,Ö,ö,ç,Ç) say %seskuc unset %seskuc halt } #yaziseskuc end #yazibuykuc off on 1:INPUT:*:{ unset %buy* set %buyk $1- if ( $chr(47) == $mid(%buyk,1,1) ) { %buyk | unset %buy* | halt } set %buys 1 set %buyu $len(%buyk) :ilk if ( %buys > %buyu ) goto son set %buyh $mid(%buyk,%buys,1) if ( %buyh == $chr(32) ) { %buyh = $replace(%buyh,$chr(32),$chr(0160)) } %buyh = $replacecs(%buyh,q,Q,w,W,e,E,r,R,t,T,y,Y,u,U,ı,I,o ,O,p,P,ğ,Ğ,ü,Ü,a,A,s,S,d,D,f,F,g,G,h,H,j,J,k,K,l,L ,ş,Ş,i,İ,z,Z,x,X,c,C,v,V,b,B,n,N,m,M,ö,Ö,ç,Ç,!,¡,? ,¿) set %buyb %buyb $+ %buyh inc %buys if ( %buys > %buyu ) goto son set %buyh $mid(%buyk,%buys,1) if ( %buyh == $chr(32) ) { %buyh = $replace(%buyh,$chr(32),$chr(0160)) } %buyh = $replacecs(%buyh,Q,q,W,w,E,e,R,r,T,t,Y,y,U,u,I,ı,O ,o,P,p,Ğ,ğ,Ü,ü,A,a,S,s,D,d,F,f,G,g,H,h,J,j,K,k,L,l ,Ş,ş,İ,i,Z,z,X,x,C,c,V,v,B,b,N,n,M,m,Ö,ö,Ç,ç,¡,!,¿ ,?) inc %buys set %buyb %buyb $+ %buyh goto ilk :son say %buyb unset %buy* halt } #yazibuykuc end dialog yazitip { title "Yazıtipi" size -1 -1 110 190 radio "Tûrk¢e",1,10 10 90 20 radio "ë£î±",2,10 30 90 20 radio "sreT",3,10 50 90 20 radio "BüYüK-kÜçÜk",4,10 70 90 20 radio "SeSSiZ BüYüK",5,10 90 90 20 radio "Renkli",6,10 110 90 20 radio "Normal",19,10 130 90 20 box "",20,5 0 100 155 button "TAMAM",21,5 165 100 20,ok } on 1:dialog:yazitip:*:*: { if ( $devent == init ) { if ($group(#yaziturkce).status == on ) { did -c yazitip 1 } elseif ($group(#yazielit).status == on ) { did -c yazitip 2 } elseif ($group(#yaziters).status == on ) { did -c yazitip 3 } elseif ($group(#yazibuykuc).status == on ) { did -c yazitip 4 } elseif ($group(#yaziseskuc).status == on ) { did -c yazitip 5 } elseif ($group(#yazirenkli).status == on ) { did -c yazitip 6 } else { did -c yazitip 19 } } if ( $devent == sclick ) { if ( $did == 1 ) { .disable #yazi* | .enable #yaziturkce } if ( $did == 2 ) { .disable #yazi* | .enable #yazielit } if ( $did == 3 ) { .disable #yazi* | .enable #yaziters } if ( $did == 4 ) { .disable #yazi* | .enable #yazibuykuc } if ( $did == 5 ) { .disable #yazi* | .enable #yaziseskuc } if ( $did == 6 ) { .disable #yazi* | .enable #yazirenkli } if ( $did == 19) { .disable #yazi* } } } alias yazitip { dialog -m yazitip yazitip } menu query,channel { Yazıtipi...:/yazitip } Arkadasım bu scpiritin kendi yazı remotesi ve ben şimdi vrecegim kodu remoteme ekliyorum yazdıgım iki kere çıkıyor |
Cevap: Lütfen acil yardım !!!!!! menu status,menubar,channel { .- .» Şekilli Yazı ..Açık:.enable #Yazi | .echo -a 4*** 1Şekilli yazı açıldı ..Kapalı:.disable #Yazi | .echo -a 4*** 1Şekilli yazı kapatıldı .- } #Yazi off on *:input:*:{ if $istok(channel chat query,$window($active).type,32) && /* !iswm $1 && !$istok(#Arkadas xXx,$active,32) { say $replacecs($1-,a,å,b,ß,c,¢,ç,¢,e,ë,i,î,n,ñ,o,ø,s,§,u,µ,y,¥,ş,$,? ,¿,<,«,>,»,:,¦) | halt } } #Yazi end bu kodu ekledigim zaman remote kısmına iki kere çıkıyor iki kere çıkmaması için bana bi ayarlarmısın bu kod urica etsem lütfen |
Cevap: Lütfen acil yardım !!!!!! bak diğer input eventlerinin gruplarını kapatmalısın eğer script içersinde 2 tane input eventi açık olursa çakışacak ve 2 kere yazacaksın diğer bir sorun ise input eventinde değiştirilecek kelime geçmişse ve sonuna halt komutu koyulmamışsa 2 kere yazacaksın örnek son verdiğin kodun grup eventi #yazi kapatmak için /disable #yazi komutunu kullanabilirsin. |
Cevap: Lütfen acil yardım !!!!!! arkadaşım ben bu dediginizden bişey anlamadım ama siz bana olacak bi şekilde ayarlayamazmısınız ben o ayarladıgınız kodları remotelerime eklesem acaba |
Cevap: Lütfen acil yardım !!!!!! birde forumumuzda gezer iken on *:input:*: { if $left($1,1) != / { var %1 = $1- | var %2 = $regsub(%1, /()/g, $chr(2)\1, %1) | say %1 | haltdef } } kalınlı inceli yazma die bi kod buldum bunu cok sevdim ama ....bakın şimdi arkadaşlar ben yazı tipi die bi penrece actıgımda ordan kalınlı inceli secenegi sonra bu normal yazı şekilleri gibi şekilli bi yazı tipi addonum olsun istiyorum.hepsini kullanırım sırası geldiginde hangisini seversem seciyim yazdıgım bi kere gitsin lütfen bana ayarlayın gözünüzü seviyim deli edecek bu beni :(:(:( |
Cevap: Lütfen acil yardım !!!!!! hepsini bir araya toplaaymazmıyız mesela bu kalınlı inceli yazma secenegi sonra bas harfi büyük yazma L harflerini büyük yazma secenegi gibi addonlar ekleyemezmiyiz..biraz emek harcarsanız coder arkadaşlar suna eminim bi çok arakdasın işine yarayacagından eminim. |
Cevap: Lütfen acil yardım !!!!!! yokmu bna yardım edecke kimse arkadaşlarrrrrrrr |
Cevap: Lütfen acil yardım !!!!!! Kod: #yazirenkli offİyi paylaşımlar. |
| Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 10:44. |
Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net