All pastes #952689 Raw Edit

Stuff

public text v1 · immutable
#952689 ·published 2008-03-22 13:25 UTC
rendered paste body
;<< BOLLE, WIL JE HIER HET ACCESS GEDEELTE D'R BIJ ZETTEN EN KIJK OF HET GOED IS? (OVER HET HELE SCRIPT)
on *:text:*:#:{
  if ($2 == $me) { notice $nick You can't kick or ban me! | halt }
  if ($2 == $null) { notice $nick please add a nick | halt }
  ; kick
  if ($$1 == %cmdchar $+ $readini(edit.ini,kicks,$right($$1,$calc($len($$1) - 1))) { kick $chan $2 ( $+ $nick $+ ) Reason: $3-  }
  ; ban
  if ($$1 == %cmdchar $+ $readini(edit.ini,Bans-add,$right($$1,$calc($len($$1) - 1))) { 
    mode $chan +b-ov $address($$2,2) $2 $2
    kick # $2 ( $+ $nick $+ ) Reason: $3 ( $+ $2 $+ $chr(124) Perma)
    writeini -n banlist.ini $address($2,2) $nick never $asctime(dddd dd-mm-yyyy hh:nn:ss tt) - $3-
    notice $nick $2 is perma banned from $chan
  }
  if ($$1 == %cmdchar $+ $readini(edit.ini,Bans-fun,$right($$1,$calc($len($$1) - 1))) { 
    mode $chan +b-ov $address($$2,2) $2 $2
    writeini -n banlist.ini $address($2,2) $nick never $asctime(dddd dd-mm-yyyy hh:nn:ss tt) - $3-
    notice $nick Banned user $2 in $chan
  }
  if ($$1 == %cmdchar $+ $readini(edit.ini,Bans-del,$right($$1,$calc($len($$1) - 1))) { 
    writeini -dl $address($$2,2)
    mode $chan -b $address($$2,2)
  }
}

on *:text:*:#:{
  ; adding stuff
  if ($$1 == %cmdchar $+ add) && ($2 == kicks) { writeini -n edit.ini,kicks, $right($$1,$calc($len($$1) - 1)) $2
  notice $nick done, $2 is aan de lijst toe gevoegd  }
  if ($$1 == %cmdchar $+ del) && ($2 == kicks) { writeini -dl edit.ini,kicks, $right($$1,$calc($len($$1) - 1))  }

  if ($$1 == %cmdchar $+ add) && ($2 == bans-add) { writeini -n edit.ini,bans-add, $right($$1,$calc($len($$1) - 1)) $2  }
  if ($$1 == %cmdchar $+ del) && ($2 == bans-add) { writeini -dl edit.ini,bans-add, $right($$1,$calc($len($$1) - 1))  }

  if ($$1 == %cmdchar $+ add) && ($2 == bans-fun) { writeini -n edit.ini,bans-fun, $right($$1,$calc($len($$1) - 1)) $2  }
  if ($$1 == %cmdchar $+ del) && ($2 == bans-fun) { writeini -dl edit.ini,bans-fun, $right($$1,$calc($len($$1) - 1))  }

  if ($$1 == %cmdchar $+ add) && ($2 == bans-del) { writeini -n edit.ini,bans-del, $right($$1,$calc($len($$1) - 1)) $2  }
  if ($$1 == %cmdchar $+ del) && ($2 == bans-del) { writeini -dl edit.ini,bans-del, $right($$1,$calc($len($$1) - 1))  }

  if ($$1 == %cmdchar $+ $cmdchar $+ register) { writeini -n ajoin,ajoin, $right($$1,$calc($len($$1) - 2)) $2  
    join $2 
  msg <TEAM CHAN> ( $+  $2  $+ ) is registerd by <authnaam> <welke team access>  }

  if ($$1 == %cmdchar $+ unregister) && ($me ison $2) { <ACCESS MOET 500 ZIJN (CHANEIGENAAR) OF TEAM>
    set %unregister $rand(1,9) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(a,z)
    .timer 1 300 unset %unregister
    notice $nick please type  %cmdchar $+ unregister $2 %unregister  
  }
  <nog een klein stukje>

}

; access gedeelte
on *:text:*:#:{
  if ($2 == $me) { notice $nick You can't deop me! | halt }
  if ($1 == %cmdchar $+ down) { mode $chan -ov $nick $nick 
  notice $nick done. }
  ;<<BOLLE YOU PLEKJE :)>> ( %cmdchar $+ up)
  ; en de %cmdchar $+ op, deop, voice, adduser, deluser, alles hier van access graag.
}

on *:text:*:#:{
  if ($chan ison $readini(edit.ini,triggers.dont,$chan)) { halt }
  if ($1 == %cmdchar $+ knuffel) { describe $chan $iif($2 == $null,knuffeld $nick omdat het niemand doet, knuffeld $2- van $nick)  }
  <er komen nog meer trigger hier tussen >
}