ON $*:TEXT:/^[!@.]AChan/Si:#:{ if ($nick isop $chan || $nick ishop $chan || $nick ison $.chan) { if ($readini(Status.ini,$network,$chan) == DChan) { notice $nick $logo All commands activated remini Status.ini $network $chan } else notice $nick I am already achaned } else notice $nick $logo This is a halfop+ command only } PUT THESE IFS IN EVERY SCRIPT if ($readini(Status.ini,$network,$chan) == DChan && $remove($1,$chr(44)) != $me) { halt } if ($left($1,1) == @) && ($readini(Status2.ini,$network,$chan) == Yes) { halt } On $*:TEXT:/^[!@.](.*)/Si:#:{ if ($nick !isop $.chan && $nick !ishop $.chan) { inc -u3 $+(%,Spam.,$network,.,$nick,.,$me) if ($($+(%,Spam.,$network,.,$nick,.,$me),2) >= 5) { .ignore -u300 $address($nick,3) notice $nick $logo Your flooding my commands! I'm am now ignoring you for 5 minutes. Evidence: $qt($left($1,1) $+ $regml(1)) echo -t $iif($+(@,Ignored.,$network),$ifmatch,$chan) $c1(Nick:) $c2($nick) $c1(Address:) $c2($address($nick,-2)) $& $c1(Chan:) $c2($chan) $c1(Evidence:) $c2($left($1,1) $+ $regml(1)) } } } ON $*:TEXT:/^[!@.]Public( )?Off/Si:#:{ if ($nick isop $chan || $nick ishop $chan || $nick ison $.chan) { if ($readini(Status2.ini,$network,$chan) == Yes) notice $nick Commands are already off else { notice $nick $logo Public commands are now offline writeini Status2.ini $network $chan Yes } } else notice $nick $logo This is a halfop+ command only } ON $*:TEXT:/^[!@.]Public( )?On/Si:#:{ if ($nick isop $chan || $nick ishop $chan || $nick ison $.chan ) { if ($readini(Status2.ini,$network,$chan) == Yes) { notice $nick $logo Public commands are now on remini Status2.ini $network $chan } else notice $nick You cant turn on whats already on. } else notice $nick $logo This is a halfop+ command only } ON $*:TEXT:/^[!@.]DChan/Si:#:{ if ($nick isop $chan || $nick ishop $chan || $nick ison $.chan) { if ($readini(Status.ini,$network,$chan) == DChan) notice $nick Commands are already off else { notice $nick $logo All commands halted writeini Status.ini $network $chan DChan } } else notice $nick $logo This is a halfop+ command only } Alias c1 { if ($sockname && $read(Colors.txt, s, $address(%nick. [ $+ [ $sockname ] ],2))) { return $+($chr(3),$gettok($read(Colors.txt, s, $address(%nick. [ $+ [ $sockname ] ],2)),1,32),$1-,$chr(3)) } if ($read(Colors.txt, s, $address($nick,2))) { return $+($chr(3),$gettok($read(Colors.txt, s, $address($nick,2)),1,32),$1-,$chr(3)) } else { return $+($chr(3),10,$1-,$chr(3)) } } Alias c2 { if ($sockname && $read(Colors.txt, s, $address(%nick. [ $+ [ $sockname ] ],2))) { return $+($chr(3),$gettok($read(Colors.txt, s, $address(%nick. [ $+ [ $sockname ] ],2)),2,32),$1-,$chr(3)) } if ($read(Colors.txt, s, $address($nick,2))) { return $+($chr(3),$gettok($read(Colors.txt, s, $address($nick,2)),2,32),$1-,$chr(3)) } else { return $+($chr(3),04,$1-,$chr(3)) } } ON $*:TEXT:/^[!@.]MyColor(s)? /Si:#:{ if ($3) { if ($gettok($2,1,46) isnum 1-15 && $gettok($3,1,46) isnum 1-15) { write -ds $+ $address($nick,2) Colors.txt write Colors.txt $address($nick,2) $iif($len($2) == 1,0 $+ $gettok($2,1,46),$gettok($2,1,46)) $iif($len($3) == 1,0 $+ $gettok($3,1,46),$gettok($3,1,46)) notice $nick $logo $c1(Your colors have been) $c2(changed) } } } alias logo { return 4[10Astra4] }