17 April 2012

WelkamBing Script

on *:JOIN:#: {
  if $nick = $me goto 1
  if $asctime(HH:nn:ss) >= 05:00:00 && $asctime(HH:nn:ss) <= 11:59:59 goto 2
  if $asctime(HH:nn:ss) >= 12:00:00 && $asctime(HH:nn:ss) <= 16:59:59 goto 3 
  if $asctime(HH:nn:ss) >= 17:00:00 && $asctime(HH:nn:ss) <= 23:59:59 goto 4
  if $asctime(HH:nn:ss) >= 00:00:00 && $asctime(HH:nn:ss) <= 04:59:59 goto 5
  halt
  :1
  halt
  :2
  notice $nick Selamat Datang ke $chan - Sekarang Jam $asctime(HH:nnTT)
  notice $nick Selamat Pagi $nick - Wekekeke...ENjoy2 Le Yer
  halt
  :3
  notice $nick Selamat Datang ke $chan - Dah Pukul  $asctime(HH:nnTT)
  notice $nick Selamat Tengah Hari $nick - Releks N Enjoy Ya
  halt
  :4
  notice $nick Selamat Datang ke $chan - Sekarang Jam $asctime(HH:nnTT)
  notice $nick Selamat Petang $nick - Enjoy2 Ye
  halt
  :5
  notice $nick Selamat Datang ke $chan - La Ni Pukul $asctime(HH:nnTT)
  notice $nick Good night $nick - Hepi Mengechat La ye...
  halt
}

16 April 2012

Anti Inviter

;[-GT`crewz-]
;Tawau-Sabah-Malaysia
;V.0.1 Inviterz
;
on 1:INVITE:#:{
  if $level($maddress($address($nick,5))) == 10 { goto end }
  set %comchan 1
  :check
  if %comchan > $comchan($nick,0) { goto end }
  if $me isop $comchan($nick,%comchan) { goto invkick }
  ; if $me isop $comchan($nick,%comchan) && $nick !isop $comchan($nick,%comchan) { goto invkick }
  inc %comchan 1
  goto check
  :invkick
  /ban $comchan($nick,%comchan) $nick 2
  kick $comchan($nick,%comchan) $nick 0,12No Mass Inviter in here or ur will be go to black list !!!
  inc %comchan 1
  goto check
  :end
  unset %comchan
}
;
;GT`crewz on ur bot !
;makasih!