Paylaşımın Ve Sohbetin Tek Adresine HoşGeldin, Ziyaretçi!

Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak tamamen ücretsizdir.

!hediye Yolla Addonu

Katılım
9 Ağu 2019
Mesajlar
332
Tepkime puanı
170
Puanları
43
Yaş
36
Konum
turkiye
Cinsiyet
Erkek

İtibar Puanı:

Kod:
on *:text:*:#: {
  if $regex($1,/^([!.]hed[iİı]ye)/Si) {
    var %hediyelist kalem silgi at ayı
    var %kalem 10
    var %at 15
    var %ayı 20
    if $2 == bilgi {  msg $chan Hediye kullanımı. " !hediye gönder nick Hediye " | msg $chan Hediye listesi: kalem, silgi, at, ayı | return }
    if $regex($2,/^(g[öÖo]nder)$/Si) {
      var %puans $gettok($read(puan.txt,$nick $+ *),2,32)
      if $3 !ison $chan { msg $chan " $3 " nicki kanalda bulunmuyor. | return }
      if !$read(puan.txt,w,$nick $+ *) { msg $chan " $nick " henüz puanınız bulunmamaktadır.  | return }
      var %s $gettok($read(puan.txt,w,$nick $+ *),2,32)
      if (%s < 10) { msg $chan " $nick " Hediye göndermek için puanınız çok düşük. | return }
      if $4 == at  {
        if ($gettok($read(puan.txt,,w,$nick $+ *),2,32) < %at) { msg $chan " $nick " at göndermek için yeterli puanınız yok. }
        else { msg $chan " $nick " , " $3 " nickine 4at gönderdi. | var %puansil $calc($gettok($read(puan.txt,w,$nick $+ *),2,32) - %at) | write -l $+ $read(puan.txt,$nick $+ *) puan.txt $nick %puansil }
      }
      if $4 == kalem  {
        if ($gettok($read(puan.txt,w,$nick $+ *),2,32) < %kalem) { msg $chan " $nick " kalem göndermek için yeterli puanınız yok. }
        else { msg $chan " $nick " , " $3 " nickine 4kalem gönderdi. | var %puansil $calc($gettok($read(puan.txt,w,$nick $+ *),2,32) - %kalem) | write -l $+ $read(puan.txt,$nick $+ *) puan.txt $nick %puansil }
      }
      if $4 == ayı  {
        if ($gettok($read(puan.txt,w,$nick $+ *),2,32) < %ayı) { msg $chan " $nick " ayı göndermek için yeterli puanınız yok. }
        else { msg $chan " $nick " , " $3 " nickine 4ayı gönderdi. | var %puansil $calc($gettok($read(puan.txt,w,$nick $+ *),2,32) - %ayı) | write -l $+ $read(puan.txt,$nick $+ *) puan.txt $nick %puansil }
      }
    }
  }
}
 

Absnthe

www.Mevsim.Org
uye
Katılım
4 Ocak 2017
Mesajlar
1,891
Tepkime puanı
3,454
Puanları
113
Web sitesi
www.mevsim.org
Cinsiyet
Erkek

İtibar Puanı:

Ellerinize Saglik Teşekkür ederiz :)
 
Tüm sayfalar yüklendi.

Konuyu Görüntüleyen Kullanıcılar (Toplam:0)