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

- mIRC Parça Kodlar (https://www.ircforumlari.net/mirc-parca-kodlar/)

- - !firlat nick - (https://www.ircforumlari.net/mirc-parca-kodlar/725504-firlat-nick.html)

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

!firlat nick seklinde komutu kullanabilirsiniz.

Kod:

alias xyz {

  if ($prop = n) { return $+(-,$1,-) }

  var %r = $token($2-,0,$1), %ra = $token($2-,$rand(1,%r),$1)

  return %ra

}

on *:text:*:#: {

  if $regex($1,/[!.]f(i|ı)rlat/i) { 

    if !$2 { msg # $xyz($nick).n lutfen nick giriniz sonra firlatalim. | return }

    var %firlat = leptop"leptopu geri firlatti" ‡ kalem"saplandi" ‡ masa"yardi" ‡  tekerlek"uzerinden gecti" ‡ canta"carpti" ‡ gözlük"kırıldı" ‡  tas"kırdı" ‡  telefon"kirildi" ‡  bicak"saplandi", cicek"tekrar kaldirdi kokladi", $&

      %firlatilan = $xyz(135,%firlat), %carpma = kafasina ayagina koluna beline, %carpan = $xyz(32,%carpma), %tutma = Manevra  ‡ hizli koşu  ‡ senden once hareket, %kacma = $xyz(135,%tutma), $&

      %denge = $iif($rand(1,10) >= 1,on,off)

    msg # 5 $xyz($nick).n 2 elinde5 $token(%firlatilan,1,34) 2 tutup5 $xyz($2).n 2 nickli arkadasa firlatti.

    if (%denge = on) { $+(.timer,$nick) 1 2 msg # 2 Firlatilan4 $token(%firlatilan,1,34) 2 $xyz($2).n  arkadasin  5 %carpan 2 isabet etti ve5 $token(%firlatilan,2,34)  }

    if (%denge = off) { $+(.timer,$nick) 1 2 msg # 2 Firlatilan $token(%firlatilan,1,34) 2 $xyz($2).n arkadasin  5 %carpan 2 isabet etmedi cunki 4 %kacma 2 yaparak kurtuldu } 

  }

}

Cevap: !firlat nick -

* Geçersiz format: $xyz (Satır 11, script3.mrc)

bu hata kodu nedir tam olarak ?

Cevap: !firlat nick -

Bunu Kendimizi göre nasıl uyarlarız yani ben !fırlat nick Yada Başkası !fırlat nick yaptığında benim nickimle yapılamaz mı?

Cevap: !firlat nick -

On *:text:*:#: {

Yerini

On *:input:#: {

Olarak değiştir istediğin gibi olur

Cevap: !firlat nick -

Alıntı:

Berk Nickli Üyeden Alıntı (Mesaj 1041737346)

* Geçersiz format: $xyz (Satır 11, script3.mrc)

bu hata kodu nedir tam olarak ?

aynısı bende de Oldu :)

Cevap: !firlat nick -

Pc gectigimde bakarim 6.35 version mirc de sorunsuz çalıştı bendede arkadaşta da çalıştı ona yazdım diye paylaştım neyse geldigimde bakarim

Cevap: !firlat nick -

Eski versiyon mirc üzerinde (6.2x ve altı) değişkene değer atarken; var %değişken = değer şeklinde atama yapılır yani eşittir işareti kullanılmalıdır. Özellikle de değişkene tanım vs atarken.

Örnek:
var %x = abc
var %x = abc, %y = def, %z = ghi

Genelde alınan hata bundandır, cepten yazıyorum eksik veya hatalı bölümler olabilir.

Cevap: !firlat nick -

Normalde öyle hata vermemeli ama prefix kullanımında çıkabilir ama değerde hiç karşılaşmadım %denge $iif ile devam eden kısma %denge = $iif kullanımında duzelebilir hata orada gözükür cunki, tam hatırlamıyorum zaten ama 2 return koymak kadar dalginlasmisim mesela :) , bu cod çeşitli şekillerde yazılabilir pc geçince 2 3 şeklini yazarim maksat eğlence :)

Cevap: !firlat nick -

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Beklemedeyiz Hocam @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Bilgilendirme için teşekkür ederiz..

Cevap: !firlat nick -

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Alıntı:

alias xyz {
if ($prop = n) { return $+(-,$1,-) | return }
var %r $token($2-,0,$1), %ra $token($2-,$rand(1,%r),$1)
return %ra
}
on *:text:*:#: {
if $regex($1,/[!.]f(i|ı)rlat/i) {
if !$2 { msg # $xyz($nick).n lutfen nick giriniz sonra firlatalim. | return }
var %firlat leptop"leptopu geri firlatti" ‡ kalem"saplandi" ‡ masa"yardi" ‡ tekerlek"uzerinden gecti" ‡ canta"carpti" ‡ gözlük"kırıldı" ‡ tas"kırdı" ‡ telefon"kirildi" ‡ bicak"saplandi", cicek"tekrar kaldirdi kokladi", $&
%firlatilan $xyz(135,%firlat), %carpma kafasina ayagina koluna beline, %carpan $xyz(32,%carpma), %tutma Manevra ‡ hizli koşu ‡ senden once hareket, %kacma $xyz(135,%tutma), $&
%denge $iif($rand(1,10) >= 1,on,off)
msg # 5 $xyz($nick).n 2 elinde5 $token(%firlatilan,1,34) 2 tutup5 $xyz($2).n 2 nickli arkadasa firlatti.
if (%denge = on) { $+(.timer,$nick) 1 2 msg # 2 Firlatilan4 $token(%firlatilan,1,34) 2 $xyz($2).n arkadasin 5 %carpan 2 isabet etti ve5 $token(%firlatilan,2,34) }
if (%denge = off) { $+(.timer,$nick) 1 2 msg # 2 Firlatilan $token(%firlatilan,1,34) 2 $xyz($2).n arkadasin 5 %carpan 2 isabet etmedi cunki 4 %kacma 2 yaparak kurtuldu }
}
}

Düzenlemesini yapabilirmisiniz sanırım diğer arkadaşlarda çalıştıramamış