31 Mart 2011, 16:36 | #1 | |
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0) | yazı,çeşitleri #yaziturkce 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 } 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,Voodo,Voodo) :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,Voodo,Voodo) :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,:,¦) 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,Voodo,Voodo) :bit say %kelime unset %kelime :halt halt :son } #yaziqarisma end #yaziilkbuyuk 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 %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 Arkadaşlar elimde bu kod var kod /yazim diğe yazınca çalışıyor bunu menü olarak çevirebilirmiyiz sağtıkladımda görünmesi için | |
|
31 Mart 2011, 18:48 | #2 |
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0) | Cevap: yazı,çeşitleri Kod: Kodu kopyalamak için üzerine çift tıklayın!
remote ekliyorsun.
__________________ Şimdi Saat Sensizliğin Ertesi.. Konu Difuzyon tarafından (31 Mart 2011 Saat 21:11 ) değiştirilmiştir. |
|
15 Eylül 2011, 01:20 | #4 |
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0) | Cevap: yazı,çeşitleri arkadaslar ben bu yazı tıpını normalden baska sectıgımde cıft yazıyo bır turlu duzetemedım yardımcı olursanız sevınırım Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. |
|
Etiketler |
çeşitleri |
Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
| |
Benzer Konular | ||||
Konu | Konuyu Başlatan | Forum | Cevaplar | Son Mesaj |
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 |
Kök Çeşitleri - Bitkilerde Kök Çeşitleri | PySSyCaT | Biyoloji | 0 | 19 Ekim 2014 11:24 |
Kas Çeşitleri - Vücudumuzdaki Kas Çeşitleri Nelerdir | Liaaa | Ödev ve Tezler | 0 | 13 Mart 2012 15:13 |
Yazı,Tura Nedir? / Yazı,Tura Atmanın Tarihçesi. | Sevda | Merak Ettikleriniz | 0 | 11 Ağustos 2011 22:37 |