Latest version 2.0 from July 1998.
This commit is contained in:
parent
a294513539
commit
3c5b8c1b6b
60
Plugins/AntiHop.spi
Normal file
60
Plugins/AntiHop.spi
Normal file
@ -0,0 +1,60 @@
|
||||
; AntiHop v1.1 (05-27-1998)
|
||||
; Plugin for S|-|ADO\\'
|
||||
; developed by RoboCop of nOOb <Robo.Cop@gmx.net>
|
||||
;
|
||||
; Annoys anybody who joins and quickly parts.
|
||||
;-=-= BEGIN SHADOW PLUGIN DEFINITION =-=-
|
||||
;name: AntiHop 1.0
|
||||
;auth: RoboCop of nOOb
|
||||
;loadonexit: ahpurge
|
||||
;loadonstart: ahstartup
|
||||
;
|
||||
;-=-= END SHADOW PLUGIN DEFINITION =-=-
|
||||
|
||||
menu status {
|
||||
SPI: AntiHop
|
||||
.Change definition: {
|
||||
set %njd $$?="Enter new value in seconds:"
|
||||
if ( %njd != $null && %njd > 0 && %njd < 60 ) {
|
||||
set %jumpdef %njd
|
||||
unset %njd
|
||||
echo -s 1,8 S|-|ADO\\'s 1,7 AntiHop Definition set to %jumpdef seconds
|
||||
}
|
||||
else { unset %njd | echo -s 1,8 S|-|ADO\\'s 1,7 AntiHop 4 WARNING! New value illegal!! }
|
||||
}
|
||||
}
|
||||
|
||||
alias ahpurge {
|
||||
unset %jumpdef
|
||||
unset %lastnick
|
||||
unset %nicktime
|
||||
}
|
||||
|
||||
alias ahstartup {
|
||||
set %jumpdef 5
|
||||
echo -s 7 - Definition of a hop: less than %jumpdef seconds in a channel
|
||||
}
|
||||
|
||||
on 1:join:#:{
|
||||
set %lastnick $nick
|
||||
if ( %lastnick != $me ) {
|
||||
set %nicktime $ctime
|
||||
echo -s 1,8 S|-|ADO\\'s 1,7 AntiHop Keeping an eye on %lastnick ...
|
||||
}
|
||||
}
|
||||
|
||||
on 1:part:#:{
|
||||
if ( $nick == %lastnick && $nick != $me ) {
|
||||
echo -s 1,8 S|-|ADO\\'s 1,7 AntiHop Looking at %lastnick ...
|
||||
set %ontime $calc( $ctime - %nicktime )
|
||||
unset %nicktime
|
||||
if ( %ontime <= %jumpdef ) {
|
||||
echo -s 1,8 S|-|ADO\\'s 1,7 AntiHop %lastnick is a jumper.
|
||||
if ( %ontime == 1 ) { set %timepart der einen Sekunde } | else { set %timepart den %ontime Sekunden }
|
||||
msg %lastnick 1,8 S|-|ADO\\'s 1,7 AntiHop Macht Dir das Jumpen Spaß?? In %timepart kannst Du doch garnix von $chan mitkriegen...
|
||||
unset %timepart
|
||||
}
|
||||
unset %lastnick
|
||||
unset %ontime
|
||||
}
|
||||
}
|
57
Plugins/admin.spi
Normal file
57
Plugins/admin.spi
Normal file
@ -0,0 +1,57 @@
|
||||
; Administrator Plugin for S|-|ADO\\' v1.0 (07-03-1998)
|
||||
; Plugin for S|-|ADO\\'
|
||||
; developed by RoboCop (irc.germany.net)
|
||||
;
|
||||
;-=-= BEGIN SHADOW PLUGIN DEFINITION =-=-
|
||||
;name: Administrator Plugin 1.0
|
||||
;auth: RoboCop of nOOb
|
||||
;
|
||||
;-=-= END SHADOW PLUGIN DEFINITION =-=-
|
||||
|
||||
menu channel {
|
||||
SPI: Admin
|
||||
.Show users using S|=|aÐo\\'
|
||||
..CTCP Method: showShadows
|
||||
..TEXT Method: msg $chan 1,8 S|-|AÐO\\' - Script by RoboCop and Speedy
|
||||
}
|
||||
|
||||
menu status {
|
||||
SPI: Admin
|
||||
.SupervisoR mode
|
||||
..ON: if ( %sr == $null ) { set %sr Variable for SHADOWs SupervisoR mode | echo -s 1,8 S|-|ADO\\'s 1,9 Admin SupervisoR mode is now 9enabled. } | else { echo -s 1,8 S|-|ADO\\'s 1,9 Admin SupervisoR mode is already 9enabled. }
|
||||
..OFF: if ( %sr != $null ) { unset %sr | echo -s 1,8 S|-|ADO\\'s 1,9 Admin SupervisoR mode is now 4disabled. } | else { echo -s 1,8 S|-|ADO\\'s 1,9 Admin SupervisoR mode is already 4disabled. }
|
||||
..-
|
||||
..STATUS: if ( %sr == $null ) { echo -s 1,8 S|-|ADO\\'s 1,9 Admin SupervisoR mode is currently 4disabled. } | else { echo -s 1,8 S|-|ADO\\'s 1,9 Admin SupervisoR mode is currently 9enabled. }
|
||||
}
|
||||
|
||||
menu nicklist {
|
||||
SPI: Admin
|
||||
.CTCP stuff
|
||||
..Message to programmers - Priority:
|
||||
...DANGER: LM 0 $$?="Enter action (Nick will be in front of MSG):"
|
||||
...WARNING: LM 1 $$?="Enter action (Nick will be in front of MSG):"
|
||||
...ATTENTION: LM 2 $$?="Enter action (Nick will be in front of MSG):"
|
||||
...-
|
||||
...Normal: LM 3 $$?="Enter action (Nick will be in front of MSG):"
|
||||
..CTCP message: .ctcp $$1 SDWComm $$?="Enter your message:"
|
||||
..-
|
||||
..Take control
|
||||
...Turn his fileserver warning off: .ctcp $$1 IFS
|
||||
...Set you in his auto-op list: .ctcp $$1 INS
|
||||
...Start his KillNickServ-Procedure: .ctcp $$1 KillNickServNow YES $me
|
||||
...End his mIRC: .ctcp $$1 SDWExitMirc
|
||||
...Remote Control: .ctcp $$1 RC $$?="What commands should (s)he do?"
|
||||
}
|
||||
|
||||
alias -l ShowShadows {
|
||||
%tempvar = $nick(# , 0)
|
||||
%countvar = 1
|
||||
:SSLabel
|
||||
if $nick(# , %countvar ) != $me { .echo -a Sending ¢ƒŠ request to " $+ $nick(#, %countvar ) $+ " ... | .CTCP $nick(# , %countvar ) CFS }
|
||||
%countvar = %countvar + 1
|
||||
if %countvar > %tempvar {
|
||||
unset %tempvar
|
||||
unset %countvar
|
||||
}
|
||||
else goto SSLabel
|
||||
}
|
16
Plugins/codecrak.pos
Normal file
16
Plugins/codecrak.pos
Normal file
@ -0,0 +1,16 @@
|
||||
Code Cracker: Possible characters File
|
||||
|
||||
Code Cracker original Script by RoboCop and Speedy
|
||||
|
||||
This file defines all the characters that could occur in a password
|
||||
of someone. Feel free to remove those, of whom you think they are not
|
||||
used. But be careful with the char-codes 32, 0 and 61 - they cause
|
||||
errors.
|
||||
|
||||
Only the chars after "PosChars" are used - you can rename "PosChars" to
|
||||
e.g. "PosChars_old" and make a new "PosChars"-list ... so you have a
|
||||
backup of the original one.
|
||||
|
||||
PosChars_short 0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz
|
||||
|
||||
PosChars !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~<7E><>、<EFBFBD>ウЖ<E382A6><D096>⑭<EFBFBD>渦慨偽係杭纂従神疎団兎波品北洋椀冫嘖孛忤掣桀毳烙痰邃繙艾蜉謖邇關髓齡<E9AB93><E9BDA1>巐鄕<E5B790><E98495>
|
76
Plugins/codecrak.spi
Normal file
76
Plugins/codecrak.spi
Normal file
@ -0,0 +1,76 @@
|
||||
; Code Cracker v1.0 (07-06-1998)
|
||||
; Plugin for S|-|ADO\\'
|
||||
; developed by Speedy <101.33864@germany.net>
|
||||
; ground structure and improved by RoboCop of nOOb <Robo.Cop@gmx.net>
|
||||
;
|
||||
; Tries all possible passwords within a command
|
||||
;-=-= BEGIN SHADOW PLUGIN DEFINITION =-=-
|
||||
;name: Code Cracker 1.0
|
||||
;auth: Speedy
|
||||
;loadonexit: ccpurge
|
||||
;loadonstart: ccstartup
|
||||
;
|
||||
;-=-= END SHADOW PLUGIN DEFINITION =-=-
|
||||
; Placeholder for PWD: <=>
|
||||
; Variables:
|
||||
; %CCcmd - command string with placeholder
|
||||
; %CCdel - delay between tries
|
||||
; %CCcurcode - current code to try
|
||||
; %CCcodemin - minimum length of code
|
||||
; %CCcodemax - maximum length of code
|
||||
; set %finalcomm $replace( %CCcmd , <=> , %CCcurcode )
|
||||
|
||||
|
||||
alias ccstartup {
|
||||
|
||||
}
|
||||
|
||||
alias ccpurge {
|
||||
unset %CCcmd
|
||||
unset %CCdel
|
||||
unset %CCcurcode
|
||||
unset %CCcodemin
|
||||
unset %CCcodemax
|
||||
}
|
||||
|
||||
menu Status {
|
||||
SPI: Code Cracker
|
||||
.Change command: ChangeCMD
|
||||
.Change code params
|
||||
..Change minimum/maximum length: ChangeMIMA
|
||||
..Change delay between tries: ChangeDEL
|
||||
..Change possible characters: ChangeCHR
|
||||
|
||||
}
|
||||
|
||||
alias -l ChangeMIMA {
|
||||
|
||||
}
|
||||
|
||||
alias -l ChangeDEL {
|
||||
|
||||
}
|
||||
|
||||
alias -l ChangeCHR {
|
||||
echo -s 1,8 S|-|ADO\\'s 4 Code Cracker Running Texteditor ...
|
||||
.run notepad.exe $scriptdir $+ codecrak.pos
|
||||
}
|
||||
|
||||
alias -l ChangeCMD {
|
||||
if ( %CCcmd != $null ) { echo -s 1,8 S|-|ADO\\'s 4 Code Cracker Old command string: %CCcmd }
|
||||
else { echo -s 1,8 S|-|ADO\\'s 4 Code Cracker 7No old command string assigned! }
|
||||
:CodeEntry
|
||||
echo -s Enter new code or leave blank to use the old one.
|
||||
echo -s 7 Use <=> as placeholder for the password.
|
||||
set %CCncmd $?="Enter new command (<=> for PWD):"
|
||||
if ( $count( %CCncmd , <=> ) == 0 && %CCncmd != $null ) {
|
||||
echo -s 15-----
|
||||
echo -s 0,4 WARNING! 4 You did not use the placeholder (<=>) for the password-location. Command string invalid!
|
||||
echo -s Please re-enter!
|
||||
goto CodeEntry
|
||||
}
|
||||
if ( %CCncmd != $null ) { set %CCcmd %CCncmd | unset %CCncmd | echo -s New command string: %CCcmd }
|
||||
else { echo -s No new command assigned. Using old one! }
|
||||
if (
|
||||
echo -s 15-----
|
||||
}
|
118
Plugins/commkick.spi
Normal file
118
Plugins/commkick.spi
Normal file
@ -0,0 +1,118 @@
|
||||
; COMMAND KICKer v2.5 (08-01-1997)
|
||||
; Plugin for S|-|ADO\\'
|
||||
; developed by RoboCop (irc.germany.net)
|
||||
; This script only works if you got the OP (@) status!
|
||||
;-=-= BEGIN SHADOW PLUGIN DEFINITION =-=-
|
||||
;name: COMMAND KICKer 2.5
|
||||
;auth: RoboCop of nOOb
|
||||
;loadonexit: ckpurgevars
|
||||
;
|
||||
;-=-= END SHADOW PLUGIN DEFINITION =-=-
|
||||
|
||||
menu channel {
|
||||
SPI: Command Kicker (@!)
|
||||
.Reset: ckpurgevars
|
||||
.Info MSGs
|
||||
..Start / Change interval: {
|
||||
if ( $me isop $chan ) {
|
||||
set %tmp $$?="Enter delay between MSGs in seconds:"
|
||||
if ( %tmp == $null || %tmp <= 0 ) { echo -s 1,8 S|-|ADO\\'s 1,11 Command Kicker Illegal delay value. Aborting! }
|
||||
else {
|
||||
.timercommkick 100 %tmp amsg 1,8 S|-|ADO\\'s 1,11 Command Kicker is still online. Type !kick <nick> to kick <nick>. Type !kickme to kick yourself.
|
||||
set %tmp2 %tmp / 60
|
||||
if ( %tmp2 == $int( %tmp2 ) ) { echo -s 1,8 S|-|ADO\\'s 1,11 Command Kicker MSG-Timer started / updated. MSG will be sent every %tmp2 minutes. }
|
||||
else { echo -s 1,8 S|-|ADO\\'s 1,11 Command Kicker MSG-Timer started / updated. MSG will be sent every %tmp seconds. }
|
||||
}
|
||||
unset %tmp
|
||||
unset %tmp2
|
||||
} | else { echo -s 1,8 S|-|ADO\\'s 1,11 Command Kicker 4WARNING! You're no operator. Command Kicker will not work. }
|
||||
}
|
||||
..Stop: .timercommkick off | echo -s 1,8 S|-|ADO\\'s 1,11 Command Kicker MSG-Timer halted.
|
||||
}
|
||||
|
||||
alias ckpurgevars {
|
||||
unset %con
|
||||
unset %kick
|
||||
unset %kick1
|
||||
unset %kick2
|
||||
unset %y
|
||||
unset %vip
|
||||
if ( %kickchan != $null ) { msg %kickchan 1,8 S|-|ADO\\'s 1,11 Command Kicker is reset. Kick aborted due to master request!! | unset %kickchan }
|
||||
}
|
||||
|
||||
alias -l alrv {
|
||||
msg $$1 1,8 S|-|ADO\\'s 1,11 Command Kicker Be fair, $$2 ( %vip ). You had your voice already!
|
||||
unset %vip
|
||||
halt
|
||||
}
|
||||
|
||||
on @1:text:!kick *:#:{
|
||||
%kick = $2
|
||||
%kickchan = $chan
|
||||
%y = 0
|
||||
if %kick == $me {
|
||||
msg $chan 1,8 S|-|ADO\\'s 1,11 Command Kicker $nick requests a kick for $me. Kick aborted.
|
||||
goto Dontkick
|
||||
}
|
||||
if %kick isprotect {
|
||||
msg $chan 1,8 S|-|ADO\\'s 1,11 Command Kicker $nick requests a kick for %kick $+ . Kick aborted because %kick is in $me's protect list.
|
||||
goto Dontkick
|
||||
}
|
||||
if %kick == RoboCop {
|
||||
msg $chan 1,8 S|-|ADO\\'s 1,11 Command Kicker $nick requested a kick for %kick $+ . Kick aborted because %kick is a protected name.
|
||||
goto Dontkick
|
||||
}
|
||||
if %kick ison $chan {
|
||||
msg $chan 1,8 S|-|ADO\\'s 1,11 Command Kicker $nick requests a kick for %kick - 3 of you have to agree, just write YES
|
||||
halt
|
||||
}
|
||||
msg $chan 1,8 S|-|ADO\\'s 1,11 Command Kicker $nick requested a kick for a user not existing in this room. Kick aborted.
|
||||
:Dontkick
|
||||
unset %kick
|
||||
unset %y
|
||||
}
|
||||
|
||||
on @1:text:YES:#:{
|
||||
%vip = $address($nick,2)
|
||||
if (($nick != %kick) && (%kick != $null)) {
|
||||
if ((%kick1 != $null) && (%kick1 == %vip)) alrv $chan $nick
|
||||
elseif (%kick1 == $null) { set %kick1 %vip | goto conthere }
|
||||
|
||||
if ((%kick2 != $null) && (%kick2 == %vip)) alrv $chan $nick
|
||||
elseif (%kick2 == $null) { set %kick2 %vip | goto conthere }
|
||||
|
||||
:conthere
|
||||
%y = %y + 1
|
||||
msg $chan 1,8 S|-|ADO\\'s 1,11 Command Kicker Agreement No. %y by $nick ...
|
||||
if %y == 3 {
|
||||
msg $chan 1,8 S|-|ADO\\'s 1,11 Command Kicker Kick agreed by 3 different users. Kicking %kick ... _.·´¯)
|
||||
.kick $chan %kick Kicked by the 1,11 Command Kicker plugin for 1,8 S|-|ADO\\'
|
||||
unset %kick
|
||||
unset %kick1
|
||||
unset %kick2
|
||||
unset %kick3
|
||||
unset %kick4
|
||||
unset %y
|
||||
unset %vip
|
||||
unset %kickchan
|
||||
}
|
||||
}
|
||||
elseif (%kick == $nick) msg $chan 1,8 S|-|ADO\\'s 1,11 Command Kicker Sorry, $nick, but it wouldn't be fair to let you vote.
|
||||
}
|
||||
|
||||
on @1:text:NO:#:{
|
||||
if ((%kick != $null) && (%kick != $nick)) {
|
||||
unset %y
|
||||
unset %kick
|
||||
unset %kick1
|
||||
unset %kick2
|
||||
unset %kickchan
|
||||
msg $chan 1,8 S|-|ADO\\'s 1,11 Command Kicker Kick cancelled by $nick
|
||||
}
|
||||
elseif (%kick == $nick) msg $chan 1,8 S|-|ADO\\'s 1,11 Command Kicker Sorry, $nick, but I cannot allow you to stop your death command. Life is unjust, eh?
|
||||
}
|
||||
|
||||
on @1:text:!kickme*:#:{
|
||||
msg $chan 1,8 S|-|ADO\\'s 1,11 Command Kicker Kicking $nick due to stupidity ...
|
||||
.kick $chan $nick Kicked by the 1,11 Command Kicker plugin for 1,8 S|-|ADO\\'
|
||||
}
|
5
Plugins/eXoCrypt.exo
Normal file
5
Plugins/eXoCrypt.exo
Normal file
@ -0,0 +1,5 @@
|
||||
Name eXocrypt
|
||||
Recipients all
|
||||
Signature !X!
|
||||
Coded ¡¶»`¥£«ôç¤í¢¬æ©®åº³“²±µ½¦·ëßäøÑÞãóú¼¾41
|
||||
Plain !?.zyxwvutsrqponmlkjihgfedcba0987654321
|
121
Plugins/eXoCrypt.spi
Normal file
121
Plugins/eXoCrypt.spi
Normal file
@ -0,0 +1,121 @@
|
||||
; eXocrypt 2.0 Pro (08-12-1997)
|
||||
; Plugin for S|-|ADO\\'
|
||||
; drastically extended by RoboCop of nOOb <Robo.Cop@gmx.net>
|
||||
; based on EXOCRYPT by an unknown author
|
||||
;-=-= BEGIN SHADOW PLUGIN DEFINITION =-=-
|
||||
;name: eXocrypt 2.0 Pro
|
||||
;auth: RoboCop of nOOb
|
||||
;loadonexit: ExoPurge
|
||||
;loadonstart: ExoStart
|
||||
;
|
||||
;-=-= END SHADOW PLUGIN DEFINITION =-=-
|
||||
|
||||
alias ExoStart {
|
||||
set %exodir $scriptdir
|
||||
set %CrypFile %exodir $+ exocrypt.exo
|
||||
set %S $read -sSignature %CrypFile
|
||||
set %N $read -sName %CrypFile
|
||||
set %R $read -sRecipients %CrypFile
|
||||
set %P $read -sPlain %CrypFile
|
||||
set %C $read -sCoded %CrypFile
|
||||
if ( %S == $null ) { Method }
|
||||
}
|
||||
|
||||
menu channel {
|
||||
SPI: eXocrypt
|
||||
.Change CODE:Method
|
||||
.Info about current CODE:MI
|
||||
.Send crypted message:eXo
|
||||
}
|
||||
|
||||
alias ExoPurge {
|
||||
unset %S
|
||||
unset %N
|
||||
unset %R
|
||||
unset %P
|
||||
unset %C
|
||||
unset %exodir
|
||||
unset %CrypFile
|
||||
}
|
||||
|
||||
alias -l Method {
|
||||
set %exofiles %exodir $+ *.exo
|
||||
set %CrypFile $$dir="Select file with code for encryption" %exofiles
|
||||
unset %exofiles
|
||||
%S = $read -sSignature %CrypFile
|
||||
%N = $read -sName %CrypFile
|
||||
%R = $read -sRecipients %CrypFile
|
||||
%P = $read -sPlain %CrypFile
|
||||
%C = $read -sCoded %CrypFile
|
||||
echo -a 1,8 You selected 1,9 %N 1,8 encryption 1,9( $+ %S $+ )1,8. Recipients:1,9 %R 1,8.
|
||||
}
|
||||
|
||||
alias -l MI {
|
||||
echo -s 1,8 S|-|ADO\\'s 1,7 eXocrypt 0,4 Encryption method
|
||||
echo -s 8 Filename: $nopath( %CrypFile ) --- 8 Signature: %S
|
||||
echo -s 8 Name: %N --- 8 Recipients: %R
|
||||
echo -s 8 Plain: %P
|
||||
echo -s 8 Code: %C
|
||||
}
|
||||
|
||||
alias eXo {
|
||||
set %eXo $$?1="Enter Text To eXoCrYpT" *2
|
||||
%char = 1
|
||||
:DoItAgain
|
||||
%eXo = $replace(%eXo, $mid(%P,%char,1), $mid(%C,%char,1))
|
||||
%char = %char + 1
|
||||
if %char <= 39 goto DoItAgain
|
||||
unset %char
|
||||
say %S %eXo
|
||||
echo 4 -a < $+ %N coded to %R $+ > $$1-
|
||||
unset %eXo
|
||||
}
|
||||
|
||||
alias -l deeXo {
|
||||
if ( %DCrypFile == $null ) { return }
|
||||
%DN = $read -sName %DCrypFile
|
||||
%DR = $read -sRecipients %DCrypFile
|
||||
%DP = $read -sPlain %DCrypFile
|
||||
%DC = $read -sCoded %DCrypFile
|
||||
%char = 1
|
||||
:DoItAgain
|
||||
%deeXo = $replace(%deeXo, $mid(%DC,%char,1), $mid(%DP,%char,1))
|
||||
%char = %char + 1
|
||||
if %char <= 39 goto DoItAgain
|
||||
unset %char
|
||||
echo 4 -a < $+ %DN coded from %exonick $+ > %deeXo
|
||||
unset %DN
|
||||
unset %DR
|
||||
unset %DP
|
||||
unset %DC
|
||||
}
|
||||
|
||||
ON 1:TEXT:*:*:{
|
||||
set %Sign $parm1
|
||||
set %deeXo $parm2*
|
||||
set %eXonick $nick
|
||||
set %exofilect 1
|
||||
:UseNextFile
|
||||
%DCrypFile = $findfile(%exodir,*.exo,%exofilect)
|
||||
%CS = $read -sSignature %DCrypFile
|
||||
if ( %Sign == %CS ) {
|
||||
deeXo
|
||||
goto EndOfThis
|
||||
}
|
||||
inc %exofilect
|
||||
if ( $findfile(%exodir,*.exo,%exofilect) != $null ) { goto UseNextfile }
|
||||
:EndOfThis
|
||||
unset %try
|
||||
unset %CS
|
||||
unset %Sign
|
||||
unset %exofilect
|
||||
unset %deeXo
|
||||
unset %eXonick
|
||||
unset %DCrypFile
|
||||
}
|
||||
|
||||
ON 1:CHAT:*:{
|
||||
set %deeXo $parm2*
|
||||
set %eXonick $nick
|
||||
deeXo
|
||||
}
|
47
Plugins/lamemetr.spi
Normal file
47
Plugins/lamemetr.spi
Normal file
@ -0,0 +1,47 @@
|
||||
; Lame-O-Meter Plugin
|
||||
; Plugin for S|-|ADO\\'
|
||||
; developed by RoboCop of nOOb <Robo.Cop@gmx.net>
|
||||
;
|
||||
;-=-= BEGIN SHADOW PLUGIN DEFINITION =-=-
|
||||
;name: Lame-O-Meter Plugin
|
||||
;auth: RoboCop of nOOb
|
||||
;
|
||||
;-=-= END SHADOW PLUGIN DEFINITION =-=-
|
||||
|
||||
menu nicklist {
|
||||
SPI: Lame-O-Meter
|
||||
.Lamer type 1: lame1 $?="Enter lame-grade (10 = 100%):" $$1
|
||||
.Lamer type 2: lame2 $?="Enter lame-grade (10 = 100%):" $$1
|
||||
}
|
||||
|
||||
alias -l lame1 {
|
||||
set %z 0
|
||||
unset %ls
|
||||
unset %rs
|
||||
:Addanother
|
||||
if ( %z < $$1 ) { %z = %z + 1 | %ls = %ls $+ _ | goto Addanother }
|
||||
:Addan2
|
||||
if ( %z < 10 ) { %z = %z + 1 | %rs = %rs $+ _ | goto Addan2 }
|
||||
msg $chan 0,12Lame-O-Meter: 7,12 $$2 is 9,9 $+ %ls $+ 3,3 $+ %rs $+ 9,12 $$1 $+ 0 % $+ 7 lame.
|
||||
unset %z
|
||||
unset %ls
|
||||
unset %rs
|
||||
}
|
||||
|
||||
alias -l lame2 {
|
||||
%tx = Lame-O-Meter: $$2 is $$1 $+ 0 % lame.
|
||||
%lt = $len( %tx ) * 10
|
||||
%lp = %lt * $$1
|
||||
%lp = %lp / 100
|
||||
%rp = $len( %tx )
|
||||
%rp = %rp - $int( %lp )
|
||||
%t1 = $left( %tx , $int( %lp ) )
|
||||
%t2 = $right( %tx , %rp )
|
||||
msg $chan 1,8 $+ %t1 $+ 8,1 $+ %t2 $+
|
||||
unset %tx
|
||||
unset %lt
|
||||
unset %lp
|
||||
unset %rp
|
||||
unset %t1
|
||||
unset %t2
|
||||
}
|
5
Plugins/loops.exo
Normal file
5
Plugins/loops.exo
Normal file
@ -0,0 +1,5 @@
|
||||
Name loops-O-Crypt
|
||||
Recipients loops
|
||||
Signature !L!
|
||||
Coded ¡¶»`¥£«ôç¤í¢¬æ©®åº³“²±µ½¦·ëßäøÑÞãóú¼¾41
|
||||
Plain !?.zyxwvutsrqponmlkjihgfedcba0987654321
|
19
Plugins/pager.spi
Normal file
19
Plugins/pager.spi
Normal file
@ -0,0 +1,19 @@
|
||||
; S|-|ADO\\' Pager v1.0 (07-06-1998)
|
||||
; Plugin for S|-|ADO\\'
|
||||
; developed by RoboCop of nOOb <Robo.Cop@gmx.net>
|
||||
;
|
||||
; Provides a pager for messages.
|
||||
;-=-= BEGIN SHADOW PLUGIN DEFINITION =-=-
|
||||
;name: S|-|ADO\\' Pager 1.0
|
||||
;auth: RoboCop of nOOb
|
||||
;loadonexit: sppurge
|
||||
;loadonstart: spstartup
|
||||
;
|
||||
;-=-= END SHADOW PLUGIN DEFINITION =-=-
|
||||
|
||||
alias spstartup {
|
||||
|
||||
}
|
||||
|
||||
alias sppurge {
|
||||
}
|
47
Plugins/repelim.spi
Normal file
47
Plugins/repelim.spi
Normal file
@ -0,0 +1,47 @@
|
||||
; Repeat Eliminator v1.0 (08-01-1997)
|
||||
; Plugin for S|-|ADO\\'
|
||||
; developed by RoboCop (irc.germany.net)
|
||||
; This script only works if you got the OP (@) status!
|
||||
;-=-= BEGIN SHADOW PLUGIN DEFINITION =-=-
|
||||
;name: Repeat Eliminator 1.0
|
||||
;auth: RoboCop of nOOb
|
||||
;loadonexit: repurgevars
|
||||
;
|
||||
;-=-= END SHADOW PLUGIN DEFINITION =-=-
|
||||
|
||||
menu channel {
|
||||
SPI: Repeat Eliminator (@!)
|
||||
.Reset: repurgevars
|
||||
}
|
||||
|
||||
alias repurgevars {
|
||||
unset %text
|
||||
unset %rnick
|
||||
unset %t
|
||||
}
|
||||
|
||||
on @1:text:*:#:{
|
||||
if (( $nick isprotect ) || ( $nick == RoboCop )) halt
|
||||
if ( $1- != %text ) {
|
||||
set %text $1-
|
||||
set %rnick $nick
|
||||
set %t 0
|
||||
halt
|
||||
}
|
||||
if (( $1- == %text ) && ( %rnick == $nick ) && ( %t == 0 )) {
|
||||
msg $chan 1,8 S|-|ADO\\'s 1,8 Repeat Eliminator 9,9__ Hey $nick $+ ! Don't repeat it. We have understood.
|
||||
inc %t
|
||||
halt
|
||||
}
|
||||
if (( $1- == %text ) && ( %rnick == $nick ) && ( %t == 1 )) {
|
||||
msg $chan 1,8 S|-|ADO\\'s 1,8 Repeat Eliminator 8,8__ $nick $+ ! This is your 2nd warning! Once again, and I kick ya ass!
|
||||
inc %t
|
||||
halt
|
||||
}
|
||||
if (( $1- == %text ) && ( %rnick == $nick ) && ( %t == 2 )) {
|
||||
msg $chan 1,8 S|-|ADO\\'s 1,8 Repeat Eliminator 4,4__ I warned you, $nick! Kicking $nick .... _.·´¯)
|
||||
kick $chan $nick Kicked by the 1,8 Repeat Eliminator plugin for 1,8 S|-|ADO\\'
|
||||
unset %t
|
||||
unset %text
|
||||
}
|
||||
}
|
1091
shadow.irc
1091
shadow.irc
File diff suppressed because it is too large
Load Diff
72
startup.txt
72
startup.txt
@ -1,72 +0,0 @@
|
||||
/titlebar S
|
||||
/titlebar S|
|
||||
/titlebar S|=
|
||||
/titlebar S|=|
|
||||
/titlebar S|=|@
|
||||
/titlebar S|=|@|
|
||||
/titlebar S|=|@|}
|
||||
/titlebar S|=|@|}0
|
||||
/titlebar S|=|@|}0\
|
||||
/titlebar S|=|@|}0\\
|
||||
/titlebar S|=|@|}0\\´
|
||||
/titlebar S|=|@|}0\\
|
||||
/titlebar S|=|@|}0\
|
||||
/titlebar S|=|@|}0
|
||||
/titlebar S|=|@|}
|
||||
/titlebar S|=|@|
|
||||
/titlebar S|=|@
|
||||
/titlebar S|=|
|
||||
/titlebar S|=
|
||||
/titlebar S|
|
||||
/titlebar S
|
||||
/titlebar
|
||||
/titlebar S|
|
||||
/titlebar S|=
|
||||
/titlebar S|=|
|
||||
/titlebar S|=|@
|
||||
/titlebar S|=|@|
|
||||
/titlebar S|=|@|}
|
||||
/titlebar S|=|@|}0
|
||||
/titlebar S|=|@|}0\
|
||||
/titlebar S|=|@|}0\\
|
||||
/titlebar S|=|@|}0\\´ S
|
||||
/titlebar S|=|@|}0\\ SC
|
||||
/titlebar S|=|@|}0\ SCR
|
||||
/titlebar S|=|@|}0 SCRI
|
||||
/titlebar S|=|@|} SCRIP
|
||||
/titlebar S|=|@| SCRIPT
|
||||
/titlebar S|=|@|} SCRIP
|
||||
/titlebar S|=|@|}0 SCRI
|
||||
/titlebar S|=|@|}0\ SCR
|
||||
/titlebar S|=|@|}0\\ SC
|
||||
/titlebar S|=|@|}0\\´ S
|
||||
/titlebar S|=|@|}0\\´
|
||||
/titlebar S|=|@|}0\\
|
||||
/titlebar S|=|@|}0\
|
||||
/titlebar S|=|@|}0
|
||||
/titlebar S|=|@|}
|
||||
/titlebar S|=|@|
|
||||
/titlebar S|=|@
|
||||
/titlebar S|=|
|
||||
/titlebar S|=
|
||||
/titlebar S|
|
||||
/titlebar S
|
||||
/titlebar
|
||||
/titlebar S|=|@|}0\\´__________S|=|@|}0\\´___________
|
||||
/titlebar ___________S|=|@|}0\\´__________S|=|@|}0\\´
|
||||
/titlebar S|=|@|}0\\´__________S|=|@|}0\\´___________
|
||||
/titlebar ___________S|=|@|}0\\´__________S|=|@|}0\\´
|
||||
/titlebar S|=|@|}0\\´__________S|=|@|}0\\´___________
|
||||
/titlebar ___________S|=|@|}0\\´__________S|=|@|}0\\´
|
||||
/titlebar S|=|@|}0\\´__________S|=|@|}0\\´___________
|
||||
/titlebar ___________S|=|@|}0\\´__________S|=|@|}0\\´
|
||||
/titlebar
|
||||
/titlebar ___________ Script __ Snowman ___ Robocop
|
||||
/titlebar S|=|@|}0\\´ ______ by _______ and _______
|
||||
/titlebar ___________ Script __ Snowman ___ Robocop
|
||||
/titlebar S|=|@|}0\\´ ______ by _______ and _______
|
||||
/titlebar ___________ Script __ Snowman ___ Robocop
|
||||
/titlebar S|=|@|}0\\´ Script by Snowman and Robocop
|
||||
/titlebar S|=|@|}0\\´ Your on $server it is $time -={Waiting for lag Info}=-
|
||||
|
||||
|
Reference in New Issue
Block a user