IRCForumlari.Net - IRC Sunucu sahipleri ve kullanıcılarının buluşma noktası
  Hostbuldum

  IRCForumlari.Net - IRC Sunucu sahipleri ve kullanıcılarının buluşma noktası mIRC Scripting Hazır Kodlar

Türkiyenin En Eglenceli Forumu  Şekershell İnternet Hizmetleri

IF Reklam Alanı  Renkli Müzik Festivali

Sohbetcep.com sohbet seni bekliyor! Kelebek.Org forumtutkusu Reklam Alanı Forum Adasi


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


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

Utku - ait Kullanıcı Resmi (Avatar)
 

Mesajlar: n/a
WEB Sitesi:
IRC Sunucusu:
İlgi Alanı:
Alınan 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ı ile Cevapla

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

NaTSuKa - ait Kullanıcı Resmi (Avatar)
 

Mesajlar: n/a
WEB Sitesi:
IRC Sunucusu:
İlgi Alanı:
Alınan 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ı ile Cevapla

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

Utku - ait Kullanıcı Resmi (Avatar)
 

Mesajlar: n/a
WEB Sitesi:
IRC Sunucusu:
İlgi Alanı:
Alınan 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ı ile Cevapla

Alt 20 Ekim 2006, 17:07   #4

CeNGaWeR - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 05 Aralık 2005
Mesajlar: 113
WEB Sitesi: www.sohbetevi.com
IRC Sunucusu:
İlgi Alanı:
Alınan 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!

CeNGaWeR isimli Üye şimdilik offline konumundadır   Alıntı ile Cevapla

Alt 21 Ekim 2006, 23:10   #5

CeNGaWeR - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 05 Aralık 2005
Mesajlar: 113
WEB Sitesi: www.sohbetevi.com
IRC Sunucusu:
İlgi Alanı:
Alınan 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!

CeNGaWeR isimli Üye şimdilik offline konumundadır   Alıntı ile Cevapla

Alt 21 Ekim 2006, 23:28   #6

h4pp3n - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 01 Şubat 2006
Mesajlar: 408
WEB Sitesi: www.cadde.gen.tr
IRC Sunucusu: irc.mircscripting.net
İlgi Alanı: mIRC Scripting
Alınan Beğeni: 102
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 }
h4pp3n isimli Üye şimdilik offline konumundadır   Alıntı ile Cevapla

Alt 21 Ekim 2006, 23:50   #7

CeNGaWeR - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 05 Aralık 2005
Mesajlar: 113
WEB Sitesi: www.sohbetevi.com
IRC Sunucusu:
İlgi Alanı:
Alınan 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!

CeNGaWeR isimli Üye şimdilik offline konumundadır   Alıntı ile Cevapla

Alt 22 Ekim 2006, 00:58   #8

Ajan - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 07 Kasım 2005
Mesajlar: 478
WEB Sitesi: Yok
IRC Sunucusu: Bıraktım
İlgi Alanı: C ++
Alınan 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..
Ajan isimli Üye şimdilik offline konumundadır   Alıntı ile Cevapla

Cevapla

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







porno escort bayan ankara escort ankara escort izmir escort izmir escort eskişehir escort antalya escort ankara escort Escort Bayan ankara escort bayan bursa escort escort bursa izmir escort bayan izmir escort gaziantep escort Escort Bayan Escort Bayan Escort pendik escort şirinevler escort istanbul escort beylikdüzü escort istanbul escort samsun escort türk porno ankara escort porno türk porno izle ankara escort porno samsun escort sex hikayeleri escort samsun antalya escort ensest hikayeler sex hikayeleri porno istanbul escort
LinkBack
LinkBack URL LinkBack URL
About LinkBacks About LinkBacks