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

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 29 Kasım 2008, 15:34   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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ı

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 29 Kasım 2008, 16:19   #2
Regex
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
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.

 
Alıntı ile Cevapla

Alt 29 Kasım 2008, 17:11   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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

 
Alıntı ile Cevapla

Alt 29 Kasım 2008, 17:13   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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

 
Alıntı ile Cevapla

Alt 29 Kasım 2008, 17:22   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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.

 
Alıntı ile Cevapla

Alt 29 Kasım 2008, 17:31   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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

 
Alıntı ile Cevapla

Alt 29 Kasım 2008, 17:33   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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
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.

 
Alıntı ile Cevapla

Alt 29 Kasım 2008, 17:35   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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.

 
Alıntı ile Cevapla

Alt 29 Kasım 2008, 18:23   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Lütfen acil yardım !!!!!!




yokmu bna yardım edecke kimse arkadaşlarrrrrrrr

 
Alıntı ile Cevapla

Alt 29 Kasım 2008, 19:23   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Lütfen acil yardım !!!!!!




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#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 #yaziozel 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 } } #yaziozel end #yazikalin off on *:input:*: { if $left($1,1) != / { var %1 = $1- | var %2 = $regsub(%1, /()/g, $chr(2)\1, %1) | say %1 | haltdef } } #yazikalin end dialog yazitip { title "Yazıtipi" size -1 -1 110 215 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 "İnce-Kalın",7,10 130 90 20 radio "Özël",8,10 150 90 20 radio "Normal",19,10 170 90 20 box "",20,5 0 100 190 button "TAMAM",21,5 195 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 } elseif ($group(#yazikalin).status == on ) { did -c yazitip 7 } elseif ($group(#yaziozel).status == on ) { did -c yazitip 8 } 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 == 7 ) { .disable #yazi* | .enable #yazikalin } if ( $did == 8 ) { .disable #yazi* | .enable #yaziozel } if ( $did == 19) { .disable #yazi* } } } alias yazitip { dialog -m yazitip yazitip } menu query,channel { Yazıtipi...:/yazitip }

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

İyi paylaşımlar.

 
Alıntı ile Cevapla

Cevapla

Etiketler
acil, lÜtfen, mirc download, mirc indir, yardım


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Acil Yardım Lütfen... DostuSohbet Unreal IRCd 6 20 Temmuz 2011 09:32
acil yardım lütfen nWp26 Unreal IRCd 2 04 Ocak 2009 14:34
Acil Yardım lütfen HeLLF1Re Unreal IRCd 2 03 Ekim 2008 19:45
aciL Yardım Lütfen bayrogues Servisler 2 25 Nisan 2008 20:07
çok Acil Yardım Lütfen :( seal Unreal IRCd 3 24 Nisan 2008 19:29