[MerakLıuSer]

selam tekrar.

ben söyle bisi rica edicektim son olaraktan.
!konuyaz komunutunu uygulayip ardinda;
kanala;
SESSİZ GEMİ
Artık demir almak günü gelmişse zamandan,
Meçhule giden bir gemi kalkar bu limandan.

Hiç yolcusu yokmuş gibi sessizce alır yol;
Sallanmaz o kalkışta ne mendil ne de bir kol.
...
!konukapat dedigimde kayit islemi bitsin

!konuyazdir sessiz-gemi
siiri kanala yazsin istiyorum kendi agzından.

birden fazla bu şekilde klasör içine şiirler eklemek istiyorum

[MerakLıuSer]

konu güncel...

[CipriX]

uzun ve belki sana gerekli ama yazım açısından çok gereksiz bir istek ek olarak lütfen yaz ben remoteme ekleyeyim isteği bu, biraz çabalarmısın? Biz devamını getiririz şuraya o *:text yazdım devamı gelmedi yazsan bile yardım ederiz.

[MerakLıuSer]

aslında haklısınız. benim takıldıgım nokta surasi misal.

on *:TEXT:*:#kanal:{
if $1 == !konuyaz { log $2 }
if $1 == !konudur { log off }
if $1 == !konuyazdir { komutu } }

kirmizi noktalarda tam olarak ne yapicagimi anlamadim. :S insallah saçmalamamişimdir. :S

[CipriX]

kodunu düzenleyelim;

şöyle çalışsın !konuyaz KONU

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#:{
if !konuyaz* iswm $1- && $2 {
.set %konuyaz ok!
.set %konukanal #
.set %konunick $nick
}
if $chan == %konukanal && $2 && %konuyaz && $nick == %konunick {
.write $replace($2,$chr(32),-) $+ .txt $1-
}
if !konudur isin $1- {
.unset %konu*
}
if !konusoyle* iswm $1- && $2 && $read($replace($2,$chr(32),-) $+ .txt) {
play # $replace($2,$chr(32),-) $+ .txt 1000
}
}

Denemedim ama çalışmalı kodları incele neler yapman gerektiğini anlarsın komutlar;

!konuyaz KONU
!konudur
!konusoyle KONU