Kanala Siir Yazma... (Yardim Lazim) - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

MouSTaPHa83 · 25 Mayıs 2008, 20:15

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

on 1:text:!siir:#:{
  if ($me isop #) && (%siirciyim == 1) { /msg $nick Şu Anda Zaten Bir Şiir Yazıyorum... Lütfen  %yaziyorum Saniye Sonra Tekrar Deneyiniz... }
  if ($me isop #) && (%siirciyim == 0) { /set %siirciyim 1 | /play # $mircdirsiir $+ \ $+ $rand(1,100) $+ .txt 500 | /timer 1 15 /set %siirciyim 0 | /set %yaziyorum 15 | /timer 15 1 /aaamayaaa }
}
on 1:text:!siir &:#:{
  if ($me isop #) && (%siirciyim == 1) { /msg $nick Şu Anda Zaten Bir Şiir Yazıyorum... Lütfen %yaziyorum Saniye Sonra Tekrar Deneyiniz... }
  if ($me isop #) && (%siirciyim == 0) && ($2 ison #) { /set %siirciyim 1 | /msg # 4,1 $+ $nick $+  Nickli Kisi 4,1 $+ $2 $+  Nickli Kisiye Bir siir Gonderiyor... | /play # $mircdirsiir $+ \ $+ $rand(1,100) $+ .txt 500 | /timer 1 15 /set %siirciyim 0 | /set %yaziyorum 15 | /timer 15 1 /aaamayaaa }
  else  { /msg # 4,1 $+ $nick $+  Dalga Mi Geciyorsun? Kanalda 4,1 $+ $2 $+  Nickli Birisi Yok Ki... }
}

Böyle bir kod oluşturdum. Siir adli klasorde 100 tane siir var. Ve birisi istediginde random olarak siirlerden birini yaziyor. Ve birisi !siir ya da !siir nick yazdiginda 1 dakika boyunca kimsenin siir istegini kabul etmiyor. Fakat benim istedigim sey bunun 1 dakika olmasi degil de siir bittikten sonra olmasi. /Play komudu ile siiri okuyacak siir bittiginde /set %siirciyim 0 yapacak.

Benim becerimi aştığı için buraya gelip sormayı uygun gördüm. /play komudu ile ilgili yaklaşık 50 başlık okudum ama benzer birşey bulamadım.

rX · 25 Mayıs 2008, 21:51

ßunu NasıL YapıLcaqı Hakkında ßiLgi Verirmisin ßende Yapmak Istiomda
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Siir.txt mi oLusturuosun YokSa NasıL

MouSTaPHa83 · 25 Mayıs 2008, 22:24

AtacK Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

ßunu NasıL YapıLcaqı Hakkında ßiLgi Verirmisin ßende Yapmak Istiomda
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Siir.txt mi oLusturuosun YokSa NasıL

Yukarıdaki kodu aynen alirsan mirc klasorunun icinde siir diye klasor acman gerekiyor. ardindan 1 den 100'e kadar 1.txt 2.txt 3.txt ...... 100.txt seklinde siirler koyuyorsun icine. o kadar.

!siir diyince siir yazar.
!siir nick diyince siiri nicke armagan eder. kod bu haliyle calisiyor kullanabilirsin. fakat beniim istedigim gibi degil. eger bir arkadas ilk mesajda belirttigim konuya yardim ederse kodu duzenleyebilirim tekrar
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

rX · 25 Mayıs 2008, 23:28

£yw. SaoLasın denicem

MouSTaPHa83 · 26 Mayıs 2008, 11:26

Tamam yardıma gerek yok help dosyasında başka birşeyi ararken on playend'i buldum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

rX · 26 Mayıs 2008, 20:54

ßu konuyu ßana anLatırmısın ? !siir Yazıncada ßişi Yapmıyo...

[20:51] <reLax> .
[20:51] <AtacK> !siir reLax
[20:51] <G-Net[Siir]> AtacK Dalga Mi Geciyorsun? Kanalda reLax Nickli Birisi Yok Ki...

MouSTaPHa83 · 26 Mayıs 2008, 21:30

AtacK Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

ßu konuyu ßana anLatırmısın ? !siir Yazıncada ßişi Yapmıyo...

[20:51] <reLax> .
[20:51] <AtacK> !siir reLax
[20:51] <G-Net[Siir]> AtacK Dalga Mi Geciyorsun? Kanalda reLax Nickli Birisi Yok Ki...

G-Net[Siir] nickinin kanalda op olmasi gerekiyor.

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

on 1:text:!siir:#:{
  if (%siirciyim == 1) { /msg $nick Şu Anda Zaten Bir Şiir Yazıyorum... Lütfen  %yaziyorum Saniye Sonra Tekrar Deneyiniz... }
  if (%siirciyim == 0) { /set %siirciyim 1 | /play # $mircdirsiir $+ \ $+ $rand(1,100) $+ .txt 500 | /timer 1 15 /set %siirciyim 0 | /set %yaziyorum 15 | /timer 15 1 /aaamayaaa }
}
on 1:text:!siir &:#:{
  if (%siirciyim == 1) { /msg $nick Şu Anda Zaten Bir Şiir Yazıyorum... Ulham Perilerim %yaziyorum Saniye Sonra Anca Gelir. Bir De O Zaman Deneyiniz... }
  if (%siirciyim == 0) && ($2 ison #) { /set %siirciyim 1 | /msg # 4,1 $+ $nick $+  Nickli Kisi 4,1 $+ $2 $+  Nickli Kisiye Bir siir Gonderiyor... | /play # $mircdirsiir $+ \ $+ $rand(1,100) $+ .txt 500 | /timer 1 15 /set %siirciyim 0 | /set %yaziyorum 15 | /timer 15 1 /aaamayaaa }
  else  { /msg # 4,1 $+ $nick $+  Uzgunum 4,1 $+ $nick $+  Su Anda Siir Yazacak Havada Degilim... }
}
alias aaamayaaa /set %yaziyorum $calc(%yaziyorum - 1)

kodu değiştirdim. bu kodu yazdığında G-Net[Siir] nickinin kanalda op olmasina gerek yok. Ayrıca !siir komutundan sonra birisi tekrar !siir yazdiginda tekrar siir yazabilmesi icin kalan zamani da kisiye soyluyor.

rX · 29 Mayıs 2008, 04:37

MouSTaPHa83 Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

G-Net[Siir] nickinin kanalda op olmasi gerekiyor.

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

on 1:text:!siir:#:{
  if (%siirciyim == 1) { /msg $nick Şu Anda Zaten Bir Şiir Yazıyorum... Lütfen  %yaziyorum Saniye Sonra Tekrar Deneyiniz... }
  if (%siirciyim == 0) { /set %siirciyim 1 | /play # $mircdirsiir $+ \ $+ $rand(1,100) $+ .txt 500 | /timer 1 15 /set %siirciyim 0 | /set %yaziyorum 15 | /timer 15 1 /aaamayaaa }
}
on 1:text:!siir &:#:{
  if (%siirciyim == 1) { /msg $nick Şu Anda Zaten Bir Şiir Yazıyorum... Ulham Perilerim %yaziyorum Saniye Sonra Anca Gelir. Bir De O Zaman Deneyiniz... }
  if (%siirciyim == 0) && ($2 ison #) { /set %siirciyim 1 | /msg # 4,1 $+ $nick $+  Nickli Kisi 4,1 $+ $2 $+  Nickli Kisiye Bir siir Gonderiyor... | /play # $mircdirsiir $+ \ $+ $rand(1,100) $+ .txt 500 | /timer 1 15 /set %siirciyim 0 | /set %yaziyorum 15 | /timer 15 1 /aaamayaaa }
  else  { /msg # 4,1 $+ $nick $+  Uzgunum 4,1 $+ $nick $+  Su Anda Siir Yazacak Havada Degilim... }
}
alias aaamayaaa /set %yaziyorum $calc(%yaziyorum - 1)

kodu değiştirdim. bu kodu yazdığında G-Net[Siir] nickinin kanalda op olmasina gerek yok. Ayrıca !siir komutundan sonra birisi tekrar !siir yazdiginda tekrar siir yazabilmesi icin kalan zamani da kisiye soyluyor.

Senin Werdiqin Kodda SAdece ßöyLe diyor = deS|taN Uzgunum deS|taN Su Anda Siir Yazacak Havada Degilim...
yanLıs yani

MouSTaPHa83 · 29 Mayıs 2008, 13:12

AtacK Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Senin Werdiqin Kodda SAdece ßöyLe diyor = deS|taN Uzgunum deS|taN Su Anda Siir Yazacak Havada Degilim...
yanLıs yani

haklısın. öncelikle %siirciyim in 0 yapılması gerekiyor. ben bunu el ile yapmıştım o yuzden kodda yazmayı unutmuşum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
kodu şu şekilde değiştirdiğinde çalışır.

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

on 1:text:!siir:#:{
  if (%siirciyim != 0) { /msg $nick Şu Anda Zaten Bir Şiir Yazıyorum... Lütfen  %yaziyorum Saniye Sonra Tekrar Deneyiniz... }
  if (%siirciyim == 0) { /set %siirciyim 1 | /play # $mircdirsiir $+ \ $+ $rand(1,100) $+ .txt 500 | /timer 1 15 /set %siirciyim 0 | /set %yaziyorum 15 | /timer 15 1 /aaamayaaa }
}
on 1:text:!siir &:#:{
  if (%siirciyim != 0) { /msg $nick Şu Anda Zaten Bir Şiir Yazıyorum... Ilham Perilerim %yaziyorum Saniye Sonra Anca Gelir. Bir De O Zaman Deneyiniz... }
  if (%siirciyim == 0) && ($2 ison #) { /set %siirciyim 1 | /msg # 4,1 $+ $nick $+  Nickli Kisi 4,1 $+ $2 $+  Nickli Kisiye Bir siir Gonderiyor... | /play # $mircdirsiir $+ \ $+ $rand(1,100) $+ .txt 500 | /timer 1 15 /set %siirciyim 0 | /set %yaziyorum 15 | /timer 15 1 /aaamayaaa }
  else  { /msg # 4,1 $+ $nick $+  Uzgunum 4,1 $+ $nick $+  Su Anda Siir Yazacak Havada Degilim... }
}
alias aaamayaaa /set %yaziyorum $calc(%yaziyorum - 1)

Cybersoft · 29 Mayıs 2008, 21:34

bu konuda biraz daha acıklama yapılabilirmi ben denedim ama calişmadi bir siir klasör ü açtım ve içerisinde 1.txt 2.txt seklinde txt dosyaları actım ve icerisine ise siirleri ekledim fakat siir kanalında !siir yazdıgımda bot özelimde [21:30] <Koruma> Şu Anda Zaten Bir Şiir Yazıyorum... Lütfen Saniye Sonra Tekrar Deneyiniz... bunu diyor ve siir i yazmiyor su sekilde yaptıgımda ise !siir nick seklinde [21:31] <@Koruma> Deneme Uzgunum Deneme Su Anda Siir Yazacak Havada Degilim...

Diyor ve siir felan yazmıyor sorun nerde acaba?

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Unreal 3.2.9 bir kac eklenti konusunda yardim lazim.	thanksforhelp	IRCServices	1	30 Nisan 2013 12:05
Tüm userleri kanala yazma	swrty	mIRC Scripting Sorunları	4	30 Ekim 2012 19:50
DB okuma yazma hatasi (yardim)	nomak	ASP/ASP.NET	1	09 Mayıs 2007 13:53

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.