Webmaster  Forumu

Geri git   Webmaster Forumu > ıRC FORUM > mIRC Scripting ve Sohbet Programları > Hazır Kodlar

Cevapla
 
Seçenekler Stil
Alt 05-26-2008, 01:00 AM   #1
XcLusive
Webmaster
 
XcLusive - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: May 2008
Mesajlar: 59
Tecrübe Puanı: 10
XcLusive is on a distinguished road
Standart Açılış Efekti (Starting)


Kod:
on *:start:acilis
alias acilis {
  window -aCBdop +deL @Acilis 10 10 400 150
  .timerdegistir 0 0 /degistir
}
alias degistir {
  set %renk $rand(2,12)
  inc %xzy 1
  if (%xzy <= 30) { goto harf1 }
  if (%xzy <= 60) { goto harf2 }
  if (%xzy <= 90) { goto harf3 }
  if (%xzy <= 120) { goto harf4 }
  if (%xzy <= 150) { goto harf5 }
  if (%xzy <= 180) { goto harf6 }
  if (%xzy <= 210) { goto harf7 }
  if (%xzy <= 250) { goto harf8 }
  if (%xzy == 251) { set %renk 1 | goto end }
  :harf1
  clear @Acilis
  drawtext @Acilis %renk Arial 100 5 25 $rand(A,Z)
  halt
  :harf2
  clear @Acilis
  drawtext @Acilis %renk Arial 100 5 25 S
  drawtext @Acilis %renk Arial 100 70 25 $rand(a,z)
  halt
  :harf3
  clear @Acilis
  drawtext @Acilis %renk Arial 100 5 25 S
  drawtext @Acilis %renk Arial 100 70 25 t
  drawtext @Acilis %renk Arial 100 100 25 $rand(a,z)
  halt
  :harf4
  clear @Acilis
  drawtext @Acilis %renk Arial 100 5 25 S
  drawtext @Acilis %renk Arial 100 70 25 t
  drawtext @Acilis %renk Arial 100 100 25 a
  drawtext @Acilis %renk Arial 100 150 25 $rand(a,z)
  halt
  :harf5
  clear @Acilis
  drawtext @Acilis %renk Arial 100 5 25 S
  drawtext @Acilis %renk Arial 100 70 25 t
  drawtext @Acilis %renk Arial 100 100 25 a
  drawtext @Acilis %renk Arial 100 150 25 r
  drawtext @Acilis %renk Arial 100 190 25 $rand(a,z)
  halt
  :harf6
  clear @Acilis
  drawtext @Acilis %renk Arial 100 5 25 S
  drawtext @Acilis %renk Arial 100 70 25 t
  drawtext @Acilis %renk Arial 100 100 25 a
  drawtext @Acilis %renk Arial 100 150 25 r
  drawtext @Acilis %renk Arial 100 190 25 t
  drawtext @Acilis %renk Arial 100 220 25 $rand(a,z)
  halt
  :harf7
  clear @Acilis
  drawtext @Acilis %renk Arial 100 5 25 S
  drawtext @Acilis %renk Arial 100 70 25 t
  drawtext @Acilis %renk Arial 100 100 25 a
  drawtext @Acilis %renk Arial 100 150 25 r
  drawtext @Acilis %renk Arial 100 190 25 t
  drawtext @Acilis %renk Arial 100 220 25 i
  drawtext @Acilis %renk Arial 100 235 25 $rand(a,z)
  halt
  :harf8
  clear @Acilis
  drawtext @Acilis %renk Arial 100 5 25 S
  drawtext @Acilis %renk Arial 100 70 25 t
  drawtext @Acilis %renk Arial 100 100 25 a
  drawtext @Acilis %renk Arial 100 150 25 r
  drawtext @Acilis %renk Arial 100 190 25 t
  drawtext @Acilis %renk Arial 100 220 25 i
  drawtext @Acilis %renk Arial 100 235 25 n
  drawtext @Acilis %renk Arial 100 285 25 $rand(a,z)
  halt
  :end
  clear @Acilis
  drawtext @Acilis %renk Arial 100 5 25 S
  drawtext @Acilis %renk Arial 100 70 25 t
  drawtext @Acilis %renk Arial 100 100 25 a
  drawtext @Acilis %renk Arial 100 150 25 r
  drawtext @Acilis %renk Arial 100 190 25 t
  drawtext @Acilis %renk Arial 100 220 25 i
  drawtext @Acilis %renk Arial 100 235 25 n
  drawtext @Acilis %renk Arial 100 285 25 g
  unset %xzy
  .timerdegistir off
  .timer 1 1 window -c @Acilis
}
__________________
Cahillik Eğitilebilir ama Aptallık Asla!
XcLusive isimli Üye şimdilik offline konumundadır   Alıntı ile Cevapla
Alt 05-26-2008, 01:55 PM   #2
Mihrac
Webmaster
 
Mihrac - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: May 2008
Mesajlar: 13
Tecrübe Puanı: 0
Mihrac is on a distinguished road
Standart


Mükemmel bişey bu eline saglık Halil abi
__________________
Iĉìmdèkì sûŁтànìn yûzûnû gôrmèk ìsтèr gôzŁèrìm..
Mihrac isimli Üye şimdilik offline konumundadır   Alıntı ile Cevapla
Cevapla


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
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ı

Hizli Erisim


WEZ Format +3. Şuan Saat: 11:28 AM.


Powered by vBulletin® Version 3.8.4
Copyright ©2000 - 2012, Jelsoft Enterprises Ltd.
webmaster