 |
  |
|
| Yazar |
Mesaj |
eXtreme
Kayıtlı Üye
Kayıt: 17.09.2006
Üye no: 89
Mesaj: 102
Başlık: 0
Şehir: Türkiye
2 Aşk puanı
|
|
 Sayaç Hakkında Bilgi |
|
|
Dersin yazarı: CipriX (Cem AKÇA) nickine aittir.
Şimdi açılış sayacına bi örnek verelim
on *:start:{
if %sayac == $null {
.set %sayac 1
.echo -a Scriptinizin İlk Açılışı..
}
else {
.inc %sayac
.echo -a Scriptinizi Açma Sayınız: %sayac
}
}
Kodları açıklıyalım
on *:start:{
; Start bildiğimiz gibi Scripti açtığımızdaki event'dir
if %sayac == $null {
; Burda diyoruzki %sayac veriablemiz eğerki Boşsa ( $null )
.set %sayac 1
.echo -a Scriptinizin İlk Açılışı..
; %sayac veriablemizi 1 yapalım ve Scripti açanı bilgilendirelim..
}
else {
; Else 'de Eğer %sayac boş değilse anlamına gelmektedir
.inc %sayac
; %sayac veriablemizi 1 arttıralım diyor
.echo -a Scriptinizi Açma Sayınız: %sayac
; Burdada kaç kere açıldığını belirtelim diyor..
}
}
Mantık Kısaca Budur Bunu Dialogda Belirtelim mesela..
dialog acilis {
title "Kaç Kere Açtın"
size -1 -1 109 24
option dbu
edit "", 1, 5 7 100 10, read
}
; Bu Dialogumuz..
on *:start:{
if %sayac == $null {
.set %sayac 1
.dialog -m acilis acilis
.did -a acilis 1 Scriptinizin İlk Açılışı..
}
else {
.inc %sayac
.dialog -m acilis acilis
.did -a acilis 1 Scriptinizin Açma Sayınız: %sayac
}
}
; Buda Kodumuz Üsttekiyle Tek Farkı
.did -a acilis 1 Scriptinizin Açma Sayınız: %sayac
.did -a acilis 1 Scriptinizin İlk Açılışı..
; Bu 2 kod buda Acilis dialogundaki 1 Nolu Yere Yazdırma Kodudur ( D Studioda )
Çıkan Görüntü:
Scriptin ilk açılmasında:
1050
Sonraki açılımlarda
1051
işinize yarar umarım ...
Guzel Bir Konu... Alıntıdır.....
|
| |
|
 |
08 May 2007 02:39 pm |
|
Mesaj: #1  |
| Yazar |
Mesaj |
KaLpsiZ
Kalbi Olmayan Adam
ÖleN BenDiM giDeNse SenDiN...
Kayıt: 11.09.2006
Üye no: 73
Mesaj: 503
Başlık: 239
Şehir: Karabük
15741 Aşk puanı
|
|
ellerine saglık bu beya bi işe yaradı vardı bende ama bir yerde eksiklik yapmışım tamamladım şimdi iyi oldu tşkler
|
| |
|
 |
08 May 2007 04:01 pm |
|
| Mesaj: #2 |
| Yazar |
Mesaj |
eXtreme
Kayıtlı Üye
Kayıt: 17.09.2006
Üye no: 89
Mesaj: 102
Başlık: 0
Şehir: Türkiye
2 Aşk puanı
|
|
rica ederım...ilgimi ceken konularda yardımcı olmaya calısacagım
|
| |
|
|
08 May 2007 05:47 pm |
|
| Mesaj: #3 |
|
|
|
