Çeşitli yazı şekilleri addonu - IRCForumlari.Net - IRC Sunucu sahipleri ve kullanicilari bulusma noktasi
IRCForumlari.Net - IRC Sunucu sahipleri ve kullanicilari bulusma noktasi
IF Yönetim Kimler Online Bloglar Ana Sayfa

Go Back   IRCForumlari.Net - IRC Sunucu sahipleri ve kullanicilari bulusma noktasi mIRC Scripting Hazır Kodlar

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
Alinan Teşekkür:
IRC Sunucusu:
WEB Sitesi:
İlgi Alanı:
IF Ticaret Yüzdesi:(%)
Standart Ç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
Alinan Teşekkür:
IRC Sunucusu:
WEB Sitesi:
İlgi Alanı:
IF Ticaret Yüzdesi:(%)
Standart

güzel addon fakat bunda yazı tiplerini seçtügümüzde bir mesaj gönderdigimizde 3 satır şeklide görünüyor örnegin;
[22:32:42]<natsuka> sLm NaSıLsNıZ
[22:32:42]<natsuka> sLm NaSıLsNıZ
[22:32:42]<natsuka> sLm NaSıLsNıZ
gibi oluyor normal yapınca tek satır halinde görünüyor neden acap?
  Alıntı ile Cevapla

Alt 28 Kasım 2005, 22:16   #3
Utku
Guest
 
Utku - ait Kullanıcı Resmi (Avatar)
 

Mesajlar: n/a
Alinan Teşekkür:
IRC Sunucusu:
WEB Sitesi:
İlgi Alanı:
IF Ticaret Yüzdesi:(%)
Standart

Addonun en sonunda "#buykuc end" kısmı yoktu, onu ekledim şimdi normal çalışır. Eğer scriptinde başka on input kullanılmış kodlar varsa o yüzden tekrar edebilir.
  Alıntı ile Cevapla

Alt 20 Ekim 2006, 17:07   #4
 
CeNGaWeR - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 05 Aralık 2005
Bulunduğu yer: Ankara
Mesajlar: 114
Alinan Teşekkür: 0
IRC Sunucusu:
WEB Sitesi: www.sohbetevi.com
İlgi Alanı:
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Tepkiler: 0
Aldığı Tepki: 0 (0 Mesajda)
Standart Yanıt: Çeşitli yazı şekilleri addonu

ya bişey sorcam bunu kullandım cok gzelde. ben biraz acemiyim elit yazı tipine : bunun yerine ¦ bunu nasıL eKlicem. Birde SAğ tıklayınca menüye nasıL koycam
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
Bulunduğu yer: Ankara
Mesajlar: 114
Alinan Teşekkür: 0
IRC Sunucusu:
WEB Sitesi: www.sohbetevi.com
İlgi Alanı:
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Tepkiler: 0
Aldığı Tepki: 0 (0 Mesajda)
Standart Yanıt: Çeşitli yazı şekilleri addonu

yok mu yardım :(
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
Bulunduğu yer: istanbul - samsun ..
Mesajlar: 409
Alinan Teşekkür: 92
IRC Sunucusu: irc.mircscripting.net
WEB Sitesi: www.cadde.gen.tr
İlgi Alanı: mIRC Scripting
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Tepkiler: 0
Aldığı Tepki: 0 (0 Mesajda)
Standart Yanıt: Çeşitli yazı şekilleri addonu

%elit = $replace(%elit,:,¦)
Bu şekilde ekleyebilirsin.
__________________
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
Bulunduğu yer: Ankara
Mesajlar: 114
Alinan Teşekkür: 0
IRC Sunucusu:
WEB Sitesi: www.sohbetevi.com
İlgi Alanı:
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Tepkiler: 0
Aldığı Tepki: 0 (0 Mesajda)
Standart Yanıt: Çeşitli yazı şekilleri addonu

en sonuna eklesem filşan sorun olur mu yoksa calışır mı
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
Bulunduğu yer: Ankara
Mesajlar: 480
Alinan Teşekkür: 6
IRC Sunucusu: Bıraktım
WEB Sitesi: Yok
İlgi Alanı: C ++
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Tepkiler: 0
Aldığı Tepki: 0 (0 Mesajda)
Standart Yanıt: Çeşitli yazı şekilleri addonu

CeNGaWeR__ Nickli Üyeden Alıntı
en sonuna eklesem filşan sorun olur mu yoksa calışır mı
Deneyip görmek,olmaması durumunda kendince başka alternatiflere yönelmek,yine olmaması durumunda da tekrar sormak sencede mantıklı olanı değilmidir ?
__________________
Suyun intiharıdır şelale..
Ajan isimli Üye şimdilik offline konumundadır   Alıntı ile Cevapla

Cevapla

Etiketler
addonu, cesitli, çeşitli, mirc, mirc download, mirc indir, sekilleri, yazi, yazı, Ş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