yazı sekline ayar - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

08 Şubat 2010, 23:05

Selam arkadaslar

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


#yaziqarisma end 
#yaziilkbuyuk on
on 1:INPUT:*: { 
  set %purp $replace(%purp,b,B)
  if ( $left($1,1) == / ) { goto son } 
  if ($ctrlenter) { goto son } 
  if ($active == Status Window) { Echo -a %logo2 11,1Statusa Birşey Yazamazsınız. | goto halt } 
  if ($active == @Bot) { goto halt } 
  set %Var3 $1- 
  unset %Var1 %Var2 
  set %Var1 1 | set %Var2 $upper($mid(%Var3,1,1)) 
  if ($mid(%Var3,1,1) == $chr(47)) { goto ServerCommand } 
  if ($len(%Var3) == 1) { set %Var2 $upper(%Var2) | say %Var2 | halt } 
  :Start1 
  inc %Var1 1 
  if ($mid(%Var3,%Var1,1) != $chr(32)) { set %var2 $replace(%Var2,b,ß,l,L) $+ $mid(%Var3,%Var1,1) | if ($len(%Var3) < %Var1) { goto Start1 } } 
  if ($mid(%Var3,%Var1,1) == $chr(32)) { set %var2 %var2 $+ $upper($mid(%Var3,%Var1,2)) | inc %Var1 1 | if ($len(%Var3) < %Var1) { goto Start1 } }
  if ($len(%Var3) != %Var1) { goto Start1 } 
  say %Var2 
  halt 
  :ServerCommand 
  :halt 
  halt 
  :son

bu yazı stili kelimelerin ilk harflerini buyuk yazıor örnek: Selam Nbr..
gibi bu remotede sadece q harfini muaf tutabilirmiyiz yani q yazınca Q oluor sadece bu harfi nsl muaf tutarıs ??

09 Şubat 2010, 04:14

yokmu bilen
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

CesuryureK · 09 Şubat 2010, 05:43

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


on 1:INPUT:*: { 

  set %purp $replace(%purp,b,B)

  if ( $left($1,1) == / ) { goto son } 

  if ($ctrlenter) { goto son } 

  if ($active == Status Window) { Echo -a %logo2 11,1Statusa Birşey Yazamazsınız. | goto halt } 

  if ($active == @Bot) { goto halt } 

  set %Var3 $1- 

  unset %Var1 %Var2 

  set %Var1 1 | set %Var2 $upper($mid(%Var3,1,1)) 

  if ($mid(%Var3,1,1) == $chr(47)) { goto ServerCommand } 

  if ($len(%Var3) == 1) { set %Var2 $upper(%Var2) | say %Var2 | halt } 

  :Start1 

  inc %Var1 1 

  if ($mid(%Var3,%Var1,1) != $chr(32)) { set %var2 $replace(%Var2,b,ß,l,L) $+ $mid(%Var3,%Var1,1) | if ($len(%Var3) < %Var1) { goto Start1 } } 

  if ($mid(%Var3,%Var1,1) == $chr(32)) { set %var2 %var2 $+ $upper($mid(%Var3,%Var1,2)) | inc %Var1 1 | if ($len(%Var3) < %Var1) { goto Start1 } }

  if ($len(%Var3) != %Var1) { goto Start1 } 

  say $replace(%Var2,Q,q)

  halt 

  :ServerCommand 

  :halt 

  halt 

  :son 

}

Al buyur.

muratt_aziz · 10 Şubat 2010, 18:16

kullandım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
.chanset ( ayar ) .Tcl	saywhat	TCL Scriptler	1	06 Şubat 2015 08:30
Düz Yazı Türleri - Düz Yazı Çeşitleri Nelerdir -Yazı Çeşitleri Hakkında Bilgi	PySSyCaT	Türkçe	0	28 Ekim 2014 00:36
Yazı,Tura Nedir? / Yazı,Tura Atmanın Tarihçesi.	Sevda	Merak Ettikleriniz	0	11 Ağustos 2011 22:37
Script Alt +o Ayar'ı	tam1deLi	mIRC Scripting Sorunları	1	25 Haziran 2010 07:06
yazı sekline ilave	TİGeR	mIRC Scripting Sorunları	3	01 Kasım 2009 22:00

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.