IRCForumlari.Net - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  RenkFM En Renkli Radyo

  IRCForumlari.Net - IRC ve mIRC Kullanıcılarının Buluşma Noktası mIRC Scripting Hazır Kodlar

 


Forum tutkunlarının tek adresi  Doping Hosting

Hadi hemen sohbete başla, geyik.net  kral sohbetci

Şekershell İnternet Hizmetleri  chat.gen.tr


Hazır Kodlar Bakıp inceleyebileceğiniz veya scriptlerinizde kullanabileceğiniz hazır addonlar.


Yeni Konu   Cevap Yaz

 
LinkBack Seçenekler Stil
Alt 28 Kasım 2005, 18:19   #1
Utku
Guest

Utku - ait Kullanıcı Resmi (Avatar)
 

Mesajlar: n/a
Konuları: 41404
WEB Sitesi:
IRC Sunucusu:
Facebook:
Twitter:
İlgi Alanı:
Aldığı Beğeni:
Verdiği Beğeni:
IF Ticaret Yüzdesi:(%)
Çeşitli yazı şekilleri addonu


-- Sponsor Baglantı --

Kod: 
alias yati { if $dialog(yazitip) = $null { dialog -m yazitip yazitip } else { halt } } dialog yazitip { title "Yazıtipi" size 250 150 110 170 radio "Elit",1,10 10 90 20 radio "Full Ascii",2,10 30 90 20 radio "Ters",3,10 50 90 20 radio "Büyük-Küçük",4,10 70 90 20 radio "Renkli",5,10 90 90 20 radio "Normal",19,10 110 90 20 box "",20,5 0 100 135 button "Tamam",21,5 145 100 20,ok } on 1:dialog:yazitip:sclick:1:{ .disable #ters | .disable #elit | .enable #turkce | .disable #buykuc | .disable #renkli } on 1:dialog:yazitip:sclick:2:{ .disable #ters | .enable #elit | .disable #turkce | .disable #buykuc | .disable #renkli } on 1:dialog:yazitip:sclick:3:{ .enable #ters | .disable #elit | .disable #turkce | .disable #buykuc | .disable #renkli } on 1:dialog:yazitip:sclick:4:{ .disable #ters | .disable #elit | .disable #turkce | .enable #buykuc | .disable #renkli } on 1:dialog:yazitip:sclick:5:{ .enable #renkli | .disable #ters | .disable #elit | .disable #turkce | .disable #buykuc } on 1:dialog:yazitip:sclick:19:{ .disable #renkli | .disable #ters | .disable #elit | .disable #turkce | .disable #buykuc } on 1:dialog:yazitip:init:0:{ if ($group(#turkce).status == on ) { did -c yazitip 1 } if ($group(#elit).status == on ) { did -c yazitip 2 } if ($group(#ters).status == on ) { did -c yazitip 3 } if ($group(#buykuc).status == on ) { did -c yazitip 4 } if ($group(#renkli).status == on ) { did -c yazitip 5 } if ($group(#turkce).status == off ) && ($group(#elit).status == off ) && ($group(#ters).status == off ) && ($group(#buykuc).status == off ) && ($group(#renkli).status == off ) { did -c yazitip 19 } } #renkli off on 1:INPUT:*:{ unset %ahenk* set %ahenkk $1- if ( $chr(47) == $mid(%ahenkk,1,1) ) { %ahenkk | halt } set %ahenku $len(%ahenkk) set %ahenks 1 :ilk if ( %ahenks > %ahenku ) goto son set %ahenkh $mid(%ahenkk,%ahenks,1) if ( %ahenkh == $chr(32) ) { %ahenkh = $replace(%ahenkh,$chr(32),$chr(0160)) } %ahenkt = %ahenkt $+  $+ $rand(3,13) $+ %ahenkh inc %ahenks goto ilk :son say %ahenkt unset %ahenk* halt } #renkli end #turkce off on 1:INPUT:*:{ unset %turkce set %turkce $1- if ( $chr(47) == $mid(%turkce,1,1) ) { %turkce | halt } %turkce = $replace(%turkce,ı,I) %turkce = $replace(%turkce,İ,I) %turkce = $replace(%turkce,ş,$) %turkce = $replace(%turkce,Ş,$) %turkce = $replace(%turkce,ç,c) %turkce = $replace(%turkce,Ç,c) %turkce = $replace(%turkce,ğ,G) %turkce = $replace(%turkce,Ğ,G) %turkce = $replace(%turkce,ü,u) %turkce = $replace(%turkce,Ü,U) %turkce = $replace(%turkce,b,ß) %turkce = $replace(%turkce,B,ß) %turkce = $replace(%turkce,<,«) %turkce = $replace(%turkce,>,») say %turkce unset %turkce halt } #turkce end #elit off on 1:INPUT:*:{ unset %elit set %elit $1- if ( $chr(47) == $mid(%elit,1,1) ) { %elit | halt } %elit = $replace(%elit,a,å) %elit = $replace(%elit,b,ß) %elit = $replace(%elit,c,©) %elit = $replace(%elit,d,D) %elit = $replace(%elit,e,ë) %elit = $replace(%elit,f,F) %elit = $replace(%elit,h,]-[) %elit = $replace(%elit,i,î) %elit = $replace(%elit,k,|{) %elit = $replace(%elit,l,£) %elit = $replace(%elit,m,M) %elit = $replace(%elit,n,ñ) %elit = $replace(%elit,o,ø) %elit = $replace(%elit,p,P) %elit = $replace(%elit,q,¶) %elit = $replace(%elit,r,®) %elit = $replace(%elit,s,§) %elit = $replace(%elit,t,±) %elit = $replace(%elit,u,µ) %elit = $replace(%elit,v,V) %elit = $replace(%elit,w,\\') %elit = $replace(%elit,x,×) %elit = $replace(%elit,y,¥) %elit = $replace(%elit,z,Z) %elit = $replace(%elit,ı,I) %elit = $replace(%elit,İ,Î) %elit = $replace(%elit,ş,$) %elit = $replace(%elit,Ş,$) %elit = $replace(%elit,ç,¢) %elit = $replace(%elit,Ç,¢) %elit = $replace(%elit,ğ,g) %elit = $replace(%elit,Ğ,Ğ) %elit = $replace(%elit,ü,û) %elit = $replace(%elit,Ü,Û) %elit = $replace(%elit,ö,ô) %elit = $replace(%elit,Ö,Ô) %elit = $replace(%elit,!,¡) %elit = $replace(%elit,?,¿) %elit = $replace(%elit,<,[) %elit = $replace(%elit,>,») %elit = $replace(%elit,-,¬) %elit = $replace(%elit,:,¦) %elit = $replace(%elit,',`) %elit = $replace(%elit,`,') say %elit unset %elit halt } #elit end #ters off on 1:INPUT:*:{ unset %ters* set %tersd $1- if ( $chr(47) == $mid(%tersd,1,1) ) { %tersd | halt } set %tersu $len(%tersd) set %terss 1 :ilk if ( %tersu == 0 ) goto son if ( $mid(%tersd,%tersu,1) == $chr(32) ) { %tersd = $replace(%tersd,$mid(%tersd,%tersu,1),$chr(0160)) } %terst = $instok(%terst,$mid(%tersd,%tersu,1),%terss,0) dec %tersu inc %terss goto ilk :son say %terst unset %ters* halt } #ters end #buykuc off on 1:INPUT:*:{ unset %buy* set %buyk $1- if ( $chr(47) == $mid(%buyk,1,1) ) { %buyk | 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 } #buykuc end

/yati yazıp çalıştırabilirsiniz.

Addonun yazarını bilmiyorum, ama büyük ihtimal Abc olması lazım.


Konu Utku tarafından (28 Kasım 2005 Saat 22:14 ) değiştirilmiştir.
      Alıntı

IRCForumlari.NET Reklamlar
Alt 28 Kasım 2005, 22:06   #2
NaTSuKa
Guest

NaTSuKa - ait Kullanıcı Resmi (Avatar)
 

Mesajlar: n/a
Konuları: 41404
WEB Sitesi:
IRC Sunucusu:
Facebook:
Twitter:
İlgi Alanı:
Aldığı Beğeni:
Verdiği Beğeni:
IF Ticaret Yüzdesi:(%)




Kullanıcılara ait mesajları görebilmeniz için üye olmalısınız. Üye olmak için lütfen tıklayın!


      Alıntı

Alt 28 Kasım 2005, 22:16   #3
Utku
Guest

Utku - ait Kullanıcı Resmi (Avatar)
 

Mesajlar: n/a
Konuları: 41404
WEB Sitesi:
IRC Sunucusu:
Facebook:
Twitter:
İlgi Alanı:
Aldığı Beğeni:
Verdiği Beğeni:
IF Ticaret Yüzdesi:(%)




Kullanıcılara ait mesajları görebilmeniz için üye olmalısınız. Üye olmak için lütfen tıklayın!


      Alıntı

Alt 20 Ekim 2006, 17:07   #4

CeNGaWeR - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 05 Aralık 2005
Mesajlar: 110
Konuları: 23
WEB Sitesi: www.sohbetevi.com
IRC Sunucusu:
Facebook:
Twitter:
İlgi Alanı:
Aldığı Beğeni: 0
Verdiği Beğeni: 0
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
IF Puanı: 0
Yanıt: Çeşitli yazı şekilleri addonu





Kullanıcılara ait mesajları görebilmeniz için üye olmalısınız. Üye olmak için lütfen tıklayın!


Çevrimdışı
   
  Alıntı

Alt 21 Ekim 2006, 23:10   #5

CeNGaWeR - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 05 Aralık 2005
Mesajlar: 110
Konuları: 23
WEB Sitesi: www.sohbetevi.com
IRC Sunucusu:
Facebook:
Twitter:
İlgi Alanı:
Aldığı Beğeni: 0
Verdiği Beğeni: 0
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
IF Puanı: 0
Yanıt: Çeşitli yazı şekilleri addonu





Kullanıcılara ait mesajları görebilmeniz için üye olmalısınız. Üye olmak için lütfen tıklayın!


Çevrimdışı
   
  Alıntı

Alt 21 Ekim 2006, 23:28   #6

h4pp3n - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 01 Şubat 2006
Nerden: İstanbul
Mesajlar: 409
Konuları: 13
WEB Sitesi: www.cadde.gen.tr
IRC Sunucusu: irc.mircscripting.net
Facebook: facebook.com/h4pp3n
Twitter: twitter.com/h4pp3n
İlgi Alanı: mIRC Scripting
Aldığı Beğeni: 102
Verdiği Beğeni: 110
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
IF Puanı: 1582
Yanıt: Çeşitli yazı şekilleri addonu





Kullanıcılara ait mesajları görebilmeniz için üye olmalısınız. Üye olmak için lütfen tıklayın!

__________________
if (insansayisi <= hayvansayisi) { hayvan sayisi artmakta } else { hayvan sayisi coksa insan arama }

Çevrimdışı
   
  Alıntı

Alt 21 Ekim 2006, 23:50   #7

CeNGaWeR - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 05 Aralık 2005
Mesajlar: 110
Konuları: 23
WEB Sitesi: www.sohbetevi.com
IRC Sunucusu:
Facebook:
Twitter:
İlgi Alanı:
Aldığı Beğeni: 0
Verdiği Beğeni: 0
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
IF Puanı: 0
Yanıt: Çeşitli yazı şekilleri addonu





Kullanıcılara ait mesajları görebilmeniz için üye olmalısınız. Üye olmak için lütfen tıklayın!


Çevrimdışı
   
  Alıntı

Alt 22 Ekim 2006, 00:58   #8

Ajan - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 07 Kasım 2005
Mesajlar: 478
Konuları: 8
WEB Sitesi: Yok
IRC Sunucusu: Bıraktım
Facebook:
Twitter:
İlgi Alanı: C ++
Aldığı Beğeni: 7
Verdiği Beğeni: 7
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
IF Puanı: 147
Yanıt: Çeşitli yazı şekilleri addonu





Kullanıcılara ait mesajları görebilmeniz için üye olmalısınız. Üye olmak için lütfen tıklayın!

__________________
Suyun intiharıdır şelale..

Çevrimdışı
   
  Alıntı


Yeni Konu   Cevap Yaz

Etiketler
cesitli, Çeşitli, mirc download, mirc indir, sekilleri, yazi, şekilleri

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 Açık
Pingbacks are Açık
Refbacks are Açık





LinkBack
LinkBack URL LinkBack URL
About LinkBacks About LinkBacks