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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Açılış Efekti (Starting) (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/53774-acilis-efekti-starting.html)

XcLusive 07 Ekim 2008 16:37

Cevap: Açılış Efekti (Starting)
 
değiştirirsin ama yazacağın harflerin x ve y boyutlarını ayarlaman gerekecek.

insane 07 Ekim 2008 16:58

Cevap: Açılış Efekti (Starting)
 
Peki NasıL YazarIz ?

Editor 07 Ekim 2008 17:35

Cevap: 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
}

KırmızıyLa gösterdiğim yerlere bakarsan anlıyacaksın Kolay Gelsin.

XcLusive 07 Ekim 2008 18:23

Cevap: Açılış Efekti (Starting)
 
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


mavi : soldan sağa ilerleme durumu
kırmızı : yukarıdan aşağı ilerleme durumu
turuncu : harfler


x ve y koordinatlarından bahsederken bu ilerleme durumlarını kastedmiştim harfleri belirli bir izaya sokup düzgün gösterim yapmak için soldan sağa doğru itmelisin aynı izada olmaları içinde yukarıdan aşağıya doğru iteceksin yani kısacası kordinat gireceksin.

Cyberjust 10 Ekim 2008 19:51

Cevap: Açılış Efekti (Starting)
 
Bu kodun script açılışta çalışmasını yapabilirmiyiz yani mirc açılır açılmaz bu kod devreye girsin ?

XcLusive 11 Ekim 2008 00:20

Cevap: Açılış Efekti (Starting)
 
Kod:

on *:start:acilis
satırını
Kod:

on *:start:inc %xc 1 | if %xc == 1 { acilis }
yaparsan 1 kere açılır.

bøCek 11 Ekim 2008 05:19

Cevap: Açılış Efekti (Starting)
 
haLiL yapa yapa bunumu yaptin :D :D ben sana guzel bir proje buLurdum :D:D

XcLusive 11 Ekim 2008 17:39

Cevap: Açılış Efekti (Starting)
 
yapim tarihine bak ne zaman yapmışım bunu :D

bøCek 12 Ekim 2008 04:42

Cevap: Açılış Efekti (Starting)
 
Onami baktım :D bende yeni yaptin sandım :D:D ben sana proje buLdum :D:D mSn'de veririm :D

EnableExclude 14 Ekim 2008 00:51

Cevap: Açılış Efekti (Starting)
 
Amacı nedır arkdaşım bunun emegıne saglık denedım gusel bişe ama amacı nedır ?


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 01:49.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk