order.tcl

#############
# Order Help #
#############

bind pub - !help pub_help
proc pub_help {nick uhost handle chan arg} {
    global botnick
    if {$arg == ""} {
      putserv "NOTICE $nick :!sewa !zodiak !google !ip !dns !gudanglagu !shio !seks !jodoh !iseng !nsinfo !csinfo !bomb !seks <shio> !sifat <shio> !jam !hitung !liputan6 !artis !jokes !bulan <nama bulan> !hari <nama hari> !mutiara !wisata !stat !os"
      return 0
    }
}
bind pub - !sewa pub_sewa
proc pub_sewa {nick uhost handle chan arg} {
    global botnick
    if {$arg == ""} {
      putserv "NOTICE $nick :sewa: bnc/znc 10rb/bln atau 20rb/3bln, bot multifungsi (all in one) 25rb/bln, order?? ketik: !order  "
      return 0
    }
}
bind pub - !sbnc pub_sbnc
proc pub_sbnc {nick uhost handle chan arg} {
    global botnick
    if {$arg == ""} {
      putserv "NOTICE $nick :shroudBNC : -sBNC Service Ver 1.1 Order Rp5000.-/1,5bulan"
      return 0
    }
}
bind pub - !order pub_order
proc pub_order {nick uhost handle chan arg} {
    global botnick
    if {$arg == ""} {
      putserv "NOTICE $nick :order: kirim memo ke nick genin, cth: /msg memoserv send genin aqyu mau sewa bot multifungsi setahun dpt potongan gak... :D \[silahkan tunggu balasan via memo/pm\]"
      return 0
    }
}
bind pub - !admin pub_admin
proc pub_admin {nick uhost handle chan arg} {
    global botnick
    if {$arg == ""} {
      putserv "NOTICE $nick :admin : 12aDJi 08128828090 14| 12g0eZ 085330023052"
      return 0
    }
}
bind pub - !dedicate pub_goez
proc pub_goez {nick uhost handle chan arg} {
    global botnick
    if {$arg == ""} {
      putserv "NOTICE $nick :Sewa : Dedicated Server 1MB RAM + 25 GB HDD Country ID Order Rp450000/bulan. 14For Information Contact ADmin."
      return 0
    }
}

putlog "Order Help Succesfully Loaded"