|
|
16 Kasım 2021, 07:34
| #1 |
    |  While Konu Anlatımı Konu : While(-Iken) ____________________________________ Adimlar: 1. Event, alias, vb. islem olusturmak, 2. Variable meydana getirmek, 3. While dongusu sayisini belirlemek, 4. While islem kalibini olusturmak. ____________________________________ Soru-Cevap Not: Soru-Cevap kisimlarini remote(Alt+r) bolumune entegre edip deneyin. ____________________________________ ;Soru: " /okey " komutunu uyguladigimda #A kanalindaki kullanicilari yukardan assagi siralanacak sekilde, #B kanalina yansitacak While dongusu nedir? ;Cevap: ;Remote bolumunde kullanilmak uzere " okey " aliasini meydana getiriyorum islem ayiracini acip. alias okey { ;" %! " adinda bir degisken meydana getirdim bu degiskeni 1 sayisina esitledim. var %! 1 ;While dongumuzu identifierimiz yardimi ile kanaldaki kullanici sayisina esitledim ve while islem ayiracini actim. while (%! <= $nick(#A,0)) { ;While islem kalibini meydana getirdim %! degiskeni ile her adimda yapmasi gereken islemi bildirdim. ;Islem: Her adimda, #B kanalina %! degerine rast gelen #A kanalindaki useri yaz! msg #B $nick(#A,%!) ;While islemi sirasinda her dongude %! degiskenini bir artacak sekilde ayarladim. inc %! ;While islem ayiracimi kapattim. } ;Alias islemi sonunda bildirim almam icin echo komutunu kullandim. .echo -at 4Islem: tamamlandi! ;Alias islem ayiracimi kapattim. } ____________________________________ ;Soru: " Ozel " komutunu uyguladigimda aktif pencereye ozelimdeki nickleri, yukaridan assagi yazdirmak saglayacak While dongusu nedir? ;Cevap: ;Remote bolumunde kullanilmak uzere " ozel " aliasini meydana getirdim ve alias islem ayiracini actim. alias ozel { ;" %' " adinda bir degisken meydana getirdim bu degiskeni 1 sayisina esitledim. var %' 1 ;While dongumuzu $ifmatch degeri bize her adimda degisen verileri vermesi icin ayarladim. while $query(%') { ;Islem: Her adimda, degisen $ifmatch degerini aktif pencereye yaz! echo -at $ifmatch ;While islemi sirasinda her dongude %' degiskenini bir artacak sekilde ayarladim. inc %' ;While islem ayiracimi kapattim. } ;Alias islemi sonunda bildirim almam icin echo komutunu kullandim. .echo -at 4Islem: tamamlandi! ;Alias islem ayiracimi kapattim. } ____________________________________ ;Soru: " Bansil sayi " komutunu uyguladigimda, aktif penceredeki kanalda eger @p isem, belirttigim sayi kadar ban maskini banlist siralamasinda assagidan yukari dogru silmek istiyorum, bunu saglayacak While dongusu nedir? ;Cevap: ;Input event'inde on *:input:#: { ;Eger " !bansil " 1 kelime ise yazdigimiz cumlemizde, if $1 == !Bansil { ;Eger 2 kelime sadece sayisal bir deger ise, if $2 isnum { ;Eger 2 kelime ban listteki mask sayisindan fazla ise, if $2 > $ibl(#,0) { ;Uyari mesajini bildirsin. echo -at 4Hata: $2 mask sayisindan fazla! } else { ;Eger 2 kelime ban listteki mask sayisindan fazla degil ise, if $3 { ;Eger 3 kelime var ise, mesaji bildir ve islemin devam etmemesi icin halt'la. echo -a 4Hata: Komut kullanimi yalnis! halt } ;Eger 2 kelime banlist'teki mask sayisindan fazla degil ve 3 kelime yok ise. ;%avdet isminde degiskeni meydana getirdim ve bu degiskeni banlist'teki mask sayisina esitledim. var %avdet $ibl(#,0) ;Dongumu banlist'teki mask sayisindan belirttigimiz sayisal deger kadar azina esitledim. ;Bu yol ile variables dec komutu sayesinde banlistte atilan banlar arasindan son siralardaki masklari secebilecegim. while %avdet > $calc($ibl(#,0) - $2) { ;Islem: Her adimda banlistten uyan maski kaldir. mode # -b $ibl(#,%avdet) ;Her adimda degiskeni bir azalt. dec %avdet } } } else { ;Eger 2 kelime sadece sayisal bir deger degil ise, uyarida bulun. echo -at 4Hata: $2 sayisal bir deger degil! } } } ____________________________________
________________ ƈҽʅʅαԃıɳα αşıƙ Ⴆιɾ ιԃαɱ ɱαԋƙυɱυ |
| |
|
16 Kasım 2021, 07:38
| #2 |
  |  Bunu ilk duydum. Öğrenmiş oldum artık. Emeğine sağlık.
________________ Bir oyuna başladımsa asla bırakmam. |
| |
|
16 Kasım 2021, 08:02
| #3 |
| | Birşeyler öğrenmene Vesile olduysam Ne Mutlu
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
________________ ƈҽʅʅαԃıɳα αşıƙ Ⴆιɾ ιԃαɱ ɱαԋƙυɱυ |
| |
| Kilitli |
| Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
| Seçenekler | |
| Stil | |
| |
Normal
