..wWw.SohbetLim.net... Türkiye'nin 1 numaraLi Chat SoHBeT OdalariNa hoşgeLdiniZ..

Menü

   Ana Sayfa
   Sohbet'e Giriş
  Hazır mesajlar
  sesli şiirler
  Altın Yumruklar
  Aşka Dair
  bedava program indir
  Canakkale Ozel
  Damar SözLer
  Dini Sohbetler
  Diyet Listeleri
  Evlilik
  FiLm izLe
  Foto Galeri
  Güzel sözler
  Güzeller Galerisi
  Hazır Mirc Kodları
  Hikayeler
  KomikLikLer
  Kurtlar Vadisi Pusu
  Magazin Haberleri
  Mircte Sohbet
  Mobilya Dekorasyon
  Muzik video
  Nostalji Klipler
  Rüya TabirLeri
  Sohbet Komutları
  Sohbet odaLarı
  SohbetLim özeL videoLar
  Türk Destanları
  Yabancı Video Klipler
  Yemek tarifleri
  şarkı sözleri
  Şiirler
  İletişim
 

      sitemap

 Yazi Stilleri

Yazi Stilleri Yazi Stilleri hakkında dökümanlar Yazi Stilleri, Yazi Stilleri ircd, Yazi Stilleri irc, ircd, unreal, unrealircd, unreal ircd - - Sohbet ve chat aramaları - için kullanıcılarına hizmet veren - Türkiye'nin en iyi sohbet sitesi - sohbet siteleri - chat odaları - damar sözler - aşk sözleri - güzel sözler - canlı sohbet - islami chat - dini sohbet - islami sohbet - dini chat - hayata dair aşka dair Sohbet arkadaşlıkları kurmak isteyenlere  

Okunma

6918
islami sohbet

Mirce eklenen bütün yazı stilleri buyrun sizlerle.

Bİr ince Bir Kalın yazma :

on *:input:*: { if $left($1,1) != / { var %1 = $1- | var %2 = $regsub(%1, /()/g, $chr(2)1, %1) | say %1 | haltdef } }

İLk Harfi REnkLi Yazmak :

on *:input:*: {

if /* !iswm $1- && !$inpaste && status !isin $active && @* !iswm $active {

msg $active $regsubex($1-,/(?<=^|s)(.)/g,041)

halt

}

}

İLk Harfi İnce Yazmak :

on *:input:*:if $istok(channel chat query,$window($active).type,32) && /* !iswm $1 { say $bold($1-) | halt }

alias bold return $regsubex($1-,/(?<=^| )(.)/g,$+($chr(2),1,$chr(2)))

ÇEştLi Yazı Stilleri :

#yaziturkce off

on 1:INPUT:*:{

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

if ($ctrlenter) { goto son }

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

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

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

:halt

halt

:son

}

#yaziturkce end

#yazikalinince off

on 1:input:*:{

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

if ($ctrlenter) { goto son }

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

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

set %kelime $1-

if ( $left($1,1) == . ) { goto bit }

set %kelime $replace(%kelime,ı,I)

set %kelime $replace(%kelime,ğ,g)

set %kelime $replace(%kelime,l,L)

set %kelime $replace(%kelime,b,ß)

set %kelime $replace(%kelime,Ş,$)

set %kelime $replace(%kelime,j,J)

set %kelime $replace(%kelime,o,ø)

set %kelime $replace(%kelime,t,?)

set %kelime $replace(%kelime,ç,¢)

set %kelime $replace(%kelime,:,¦)

set %kelime $replace(%kelime,Ç,¢)

set %kelime $replace(%kelime,ç,¢)

set %kelime $replace(%kelime,ü,û)

set %kelime $replace(%kelime,Ü,Û)

set %kelime $replace(%kelime,ö,ô)

set %kelime $replace(%kelime,Ö,Ô)

set %kelime $replace(%kelime,?,¿)

set %kelime $replace(%kelime,x,×)

set %kelime $replace(%kelime,slm,SeLam)

set %kelime $replace(%kelime,nbr,naßer¿)

set %kelime $replace(%kelime,s.a,seLamun aLeyKüm.)

set %kelime $replace(%kelime,a.s,aLeyKüm SeLam.)

set %kelime $replace(%kelime,allah,Allah)

set %kelime $replace(%kelime,Yazgulu,YazguLu)

:bit

say %kelime

unset %kelime

:halt

halt

:son

}

#yazikalinince end

#yazielite off

on 1:input:*:{

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

if ($ctrlenter) { goto son }

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

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

set %kelime $1-

if ( $left($1,1) == . ) { goto bit }

set %kelime $replace(%kelime,ı,I)

set %kelime $replace(%kelime,ğ,g)

set %kelime $replace(%kelime,l,L)

set %kelime $replace(%kelime,b,ß)

set %kelime $replace(%kelime,ı,I)

set %kelime $replace(%kelime,ş,$)

set %kelime $replace(%kelime,Ş,$)

set %kelime $replace(%kelime,j,J)

set %kelime $replace(%kelime,ç,¢)

set %kelime $replace(%kelime,ü,û)

set %kelime $replace(%kelime,Ü,Û)

set %kelime $replace(%kelime,ö,ô)

set %kelime $replace(%kelime,Ö,Ô)

set %kelime $replace(%kelime,:,¦)

set %kelime $replace(%kelime,?,¿)

set %kelime $replace(%kelime,slm,SeLam)

set %kelime $replace(%kelime,nbr,naßer¿)

set %kelime $replace(%kelime,s.a,seLamun aLeyKüm.)

set %kelime $replace(%kelime,a.s,aLeyKüm SeLam.)

set %kelime $replace(%kelime,allah,Allah)

set %kelime $replace(%kelime,Yazgulu,YazguLu)

:bit

say %kelime

unset %kelime

:halt

halt

:son

}

#yazielite end

#yaziqarisma off

on 1:input:*:{

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

if ($ctrlenter) { goto son }

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

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

set %kelime $1-

if ( $left($1,1) == . ) { goto bit }

set %kelime $replace(%kelime,o-,º)

set %kelime $replace(%kelime,k,]{)

set %kelime $replace(%kelime,1/4,¼)

set %kelime $replace(%kelime,1/2,½)

set %kelime $replace(%kelime,/,÷)

set %kelime $replace(%kelime,0,ø)

set %kelime $replace(%kelime,1,¹)

set %kelime $replace(%kelime,2,²)

set %kelime $replace(%kelime,3,³)

set %kelime $replace(%kelime,ae,Æ)

set %kelime $replace(%kelime,a,å)

set %kelime $replace(%kelime,b,ß)

set %kelime $replace(%kelime,c,©)

set %kelime $replace(%kelime,e,ë)

set %kelime $replace(%kelime,i,î)

set %kelime $replace(%kelime,l,£)

set %kelime $replace(%kelime,n,ñ)

set %kelime $replace(%kelime,o,ø)

set %kelime $replace(%kelime,r,®)

set %kelime $replace(%kelime,s,§)

set %kelime $replace(%kelime,u,µ)

set %kelime $replace(%kelime,x,×)

set %kelime $replace(%kelime,y,¥)

set %kelime $replace(%kelime,!,¡)

set %kelime $replace(%kelime,?,¿)

set %kelime $replace(%kelime,,»)

set %kelime $replace(%kelime,-,¬)

set %kelime $replace(%kelime,:,¦)

set %kelime $replace(%kelime,slm,SeLam)

set %kelime $replace(%kelime,nbr,naßer¿)

set %kelime $replace(%kelime,s.a,seLamun aLeyKüm.)

set %kelime $replace(%kelime,a.s,aLeyKüm SeLam.)

set %kelime $replace(%kelime,allah,Allah)

set %kelime $replace(%kelime,Yazgulu,YazguLu)

:bit

say %kelime

unset %kelime

:halt

halt

:son

}

#yaziqarisma end

#yaziilkbuyuk on

on 1:INPUT:*: {

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

if ($ctrlenter) { goto son }

if ($active == Status Window) { Echo -a %logo2 11,1Status?a 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 %Var2 $+ $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

}

#yaziilkbuyuk end

#yazirenkli off

on 1:INPUT:*:{

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

if ($ctrlenter) { goto son }

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

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

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

:halt

halt

:son

}

#yazirenkli end

dialog Yazim {

title ?Yazıtipi?

size -1 -1 110 220

radio ?Tûrk¢e?,1,10 10 90 20

radio ?eLite?,2,10 30 90 20

radio ?Ilk Harf Büyük?,3,10 50 90 20

radio ?KaLın-İnce?,7,10 70 90 20

radio ?Qa®i§ma?,5,10 90 90 20

radio ?Rengarenk?,6,10 110 90 20

radio ?Normal?,19,10 130 90 20

box ??,20,5 0 100 155

button ?TAMAM?,21,5 195 100 20,ok

}

on 1:dialog:Yazim:*:*: {

if ( $devent == init ) {

if ($group(#yaziturkce).status == on ) { did -c Yazim 1 }

elseif ($group(#yazielite).status == on ) { did -c Yazim 2 }

elseif ($group(#yaziilkbuyuk).status == on ) { did -c Yazim 3 }

elseif ($group(#yazikalinince).status == on ) { did -c Yazim 7 }

elseif ($group(#yazirenkli).status == on ) { did -c Yazim 6 }

elseif ($group(#yaziqarisma).status == on ) { did -c Yazim 5 }

else { did -c Yazim 19 }

}

if ( $devent == sclick ) {

if ( $did == 1 ) { .disable #yazi* | .enable #yaziturkce | echo %logo2 11Yazı Stili ?4Tûrk¢e11″ Açıldı! }

if ( $did == 2 ) { .disable #yazi* | .enable #yazielite | echo %logo2 11Yazı Stili ?4eLite11″ Açıldı! }

if ( $did == 3 ) { .disable #yazi* | .enable #yaziilkbuyuk | echo %logo2 11Yazı Stili ?4İlk Harf Büyük11″ Açıldı! }

if ( $did == 7 ) { .disable #yazi* | .enable #yazikalinince | echo %logo2 11Yazı Stili ?4KaLın-İnCe11″ Açıldı! }

if ( $did == 5 ) { .disable #yazi* | .enable #yaziqarisma | echo %logo2 11Yazı Stili ?4Qa®i§ma11″ Açıldı! }

if ( $did == 6 ) { .disable #yazi* | .enable #yazirenkli | echo %logo2 11Yazı Stili ?4R8e7n14G0a12r9e6N3k11″ Açıldı! }

if ( $did == 19) { .disable #yazi* }

}

}

alias Yazim { dialog -m Yazim Yazim }

alias acolor { dialog -m acolor acolor }

dialog acolor {

title ?Renkli yazı?

size -1 -1 169 109

box ?Renk?, 1, 6 5 80 69

text ?Renkno:?, 2, 16 27 22 13

edit ??, 3, 51 20 25 22, center multi return

text ?Arka:?, 4, 16 50 29 13

edit ??, 5, 51 43 25 22, center multi return

box ?Diğer?, 6, 84 5 79 69

check ?Kalın?, 7, 94 27 43 13

check ?Çizgili?, 8, 94 49 61 13

button ?Önizleme?, 9, 21 82 55 20

button ?Tamam?, 10, 93 82 55 20, ok

box ??, 11, -1 -6 171 116

}

on *:dialog:acolor:*:*: {

if $devent = init {

did -a $dname 3 %ac.text

did -a $dname 5 %ac.back

if (%ac.bold == on) { did -c $dname 7 }

if (%ac.underline == on) { did -c $dname 8 }

}

if $devent = edit {

if $did = 3 { set %ac.text $did(3).text }

if $did = 5 { set %ac.back $did(5).text }

}

if $devent = sclick {

if $did = 7 {

if ($did(7).state = 1) { set %ac.bold on | set %ac.bold2 }

if ($did(7).state = 0) { set %ac.bold off | set %ac.bold2 }

}

if $did = 8 {

if ($did(8).state = 1) { set %ac.underline on | set %ac.underline2 }

if ($did(8).state = 0) { set %ac.underline off | set %ac.underline2 }

}

if $did = 9 { echo -a  $+ %ac.text $+ , $+ %ac.back $+ %ac.bold2 $+ %ac.underline2 $+ Yazdığınız böyle görünecek.! }

}

}

#acolor off

on *:input:*:if (/* !iswm $1) && (*: !iswm $1) { say  $+ %ac.text $+ , $+ %ac.back $+ %ac.bold2 $+ %ac.underline2 $+ $1- | halt }

#acolor end

 

 



  Yorumlar

 
Grup Furkan - Öncü Nesil Marşı


Metallica Nothing Else Matters izle


Güzin ile Baha - Genclik Basimda Duman


Nilüfer - TNK - Selam Söyle


UğuR IşıLaK - BaŞıMıN BeLaSı


Grup Hepsi - İkilem


Ahmet Şafak - Sarıkamış


SELVA ERDENER - Bülbülüm Altın Kafeste


Transparan Güzeller


HANGİSİ BİRİNCİ


sohbetlim 2018 sohbet
sohbetsila
Mobil Chat Nedir? Nasıl Kullanılır
telefonda sohbet etmek
Neden mi Sohbetlim.net
Teknoloji ve Sohbet
sohbetlim-chat
sohbetlim-sohbet
Kesintisiz Sohbet İçin Doğru Adres
Ücretsiz Sohbetin Kaliteli Yeri

Copyright © 2006 Tüm Hakları Saklıdır SoHBeTLiM.NeT

Desing By NiLdeniZ