Ejjman
2007-08-13 19:19:18
Another awesome script in the MJ series! Just download the script and fill in the consts, and have fun with it :)
SRL Archive - Other Scripts
Mohawk Michael Jackson
noobielul
2007-08-13 19:52:23
fun script :p
TravisV10
2007-08-13 19:57:17
ill chek it out
stupedspam
2007-08-13 20:27:38
And you call yourself a Srl member… Needs more dances… Like
~Stupedspam
Const
Level:= 1; // 1-5 for different dances = D
procedure LevelFinder;
begin
case Level of
1: SimpleDanceone;
2: SimpleDancetwo;
3: SimpleDancethree;
4: SimpleDancefour;
5: SimpleDancefive;
end;
end;~Stupedspam
Sp0rky
2007-08-13 20:27:58
Rofl, extremely random.
Someone bored?
I enjoyed the dancing =)
Edit: Stuped, you call yourself a scripter?
A const isnt a variable! :p
Someone bored?
I enjoyed the dancing =)
Edit: Stuped, you call yourself a scripter?
Const
Level[COLOR="Red"][B][U]:=[/U][/B][/COLOR] 1; // 1-5 for different dances = D
A const isnt a variable! :p
Spky
2007-08-13 20:30:00
Owned.
stupedspam
2007-08-13 21:27:40
Wow Sp0rk-eh, your finally a member :D. Yea I know about :… I just type really fast…
Here is a better Dancer…
~Stupedspam
Here is a better Dancer…
program DanceTime;
//Made by Stupedspam... I was very bored... Its better than Ejjman1's =D
var Times:integer;
const
Level= 5; //1-5 for diffrent dances
ExtraWait= 200;//extra wait time
DoTimes= 3; //number of times to dance. Less than 5
DoSig= False;//Want to see the sig?
Procedure Danceone;
Begin
Repeat
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' \/ [] \/ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \ \__/ / ');
WriteLn(' \/[]\/ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' \ |--| / ');
WriteLn(' \\__// ');
WriteLn(' \[]/ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \ \__/ / ');
WriteLn(' \/[]\/ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' \/ [] \/ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
Times:= Times +1;
until(DoTimes = Times);
ClearDebug;
end;
Procedure Dancetwo;
Begin
Repeat
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' /[] \ ');
WriteLn(' /[] \');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / []\ ');
WriteLn('/ []\ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
Times:= Times +1;
until(DoTimes = Times);
ClearDebug;
end;
Procedure Dancethree;
Begin
Repeat
ClearDebug;
WriteLn(' \ |--| ');
WriteLn(' \\__/ ');
WriteLn(' \[]\ ');
WriteLn(' [] \ ');
WriteLn(' [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' /\\__/ ');
WriteLn(' \[]\ ');
WriteLn(' [] \/ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ / ');
WriteLn(' /\[]\/ ');
WriteLn(' / [] ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| / ');
WriteLn(' \__// ');
WriteLn(' /[]/ ');
WriteLn(' / [] ');
WriteLn(' / [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ / ');
WriteLn(' /\[]\/ ');
WriteLn(' / [] ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' /\\__/ ');
WriteLn(' \[]\ ');
WriteLn(' [] \/ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
Times:= Times +1;
until(DoTimes = Times);
ClearDebug;
end;
Procedure Dancefour;
Begin
Repeat
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' \/ [] \/ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' \__/ \__/ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' \/ [] \/ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' \__/ \__/ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' \/ [] \/ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' \__/ \__/ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' \/ [] \/ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' \__/ \__/ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__/ ');
WriteLn(' /[]\ ');
WriteLn(' / [] \ ');
WriteLn(' / [] \ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
Times:= Times +1;
until(DoTimes = Times);
ClearDebug;
end;
Procedure Dancefive;
Begin
Repeat
ClearDebug;
WriteLn(' |--| / ');
WriteLn(' \__// ');
WriteLn(' /[]/ ');
WriteLn(' / [] ');
WriteLn(' / [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__//\ ');
WriteLn(' /[]/ ');
WriteLn(' \/ [] ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \ \__/ ');
WriteLn(' \/[]/\ ');
WriteLn(' [] \ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn('\ |--| ');
WriteLn(' \\__/ ');
WriteLn(' \[]\ ');
WriteLn(' []\ ');
WriteLn(' []\ ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \ \__/ ');
WriteLn(' \/[]/\ ');
WriteLn(' [] \ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__//\ ');
WriteLn(' /[]/ ');
WriteLn(' \/ [] ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| / ');
WriteLn(' \__// ');
WriteLn(' /[]/ ');
WriteLn(' / [] ');
WriteLn(' / [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__//\ ');
WriteLn(' / []/ ');
WriteLn(' \/ [] ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \ \__/ ');
WriteLn(' \/[]/\ ');
WriteLn(' [] \ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' \ |--| ');
WriteLn(' \\__/ ');
WriteLn(' \[]\ ');
WriteLn(' [] \ ');
WriteLn(' [] \');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \ \__/ ');
WriteLn(' \/[]/\ ');
WriteLn(' [] \ ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| ');
WriteLn(' \__//\ ');
WriteLn(' / []/ ');
WriteLn(' \/ [] ');
WriteLn(' [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
ClearDebug;
WriteLn(' |--| / ');
WriteLn(' \__// ');
WriteLn(' /[]/ ');
WriteLn(' / [] ');
WriteLn(' / [] ');
WriteLn(' [] ');
WriteLn(' /\ ');
WriteLn(' / \ ');
WriteLn(' ___/ \___ ');
wait(200+random(ExtraWait))
Times:= Times +1;
until(DoTimes = Times);
ClearDebug;
end;
procedure FindLevel;
begin
case Level of
1: Danceone;
2: Dancetwo;
3: Dancethree;
4: Dancefour;
5: Dancefive;
end;
end;
Procedure Sig;
begin
If not (DoSig) then Exit;
WriteLn(' ||===\\ /\ |\ || //===\\ ||========');
WriteLn(' || \\ //\\ | \ || // \\ || ');
WriteLn(' || \\ // \\ ||\\ || // || ');
WriteLn(' || \\ // \\ || \\ || || || ');
WriteLn(' || || //======\\ || \\ || || ||=== ');
WriteLn(' || // // \\ || \\ || \\ || ');
WriteLn(' || // // \\ || \\ || \\ || ');
WriteLn(' || // // \\ || \\ || \\ // || ');
WriteLn(' ||==// // \\ || \\|| \\===// ||========');
Wait(1500)
ClearDebug;
end;
begin
Sig;
Wait(500)
FindLevel;
end.~Stupedspam
Harry
2007-08-13 22:32:04
Ejj, I feel sorry for you, too much time XD
Sp0rky
2007-08-13 23:51:36
lol, I feel sorry for stupedspam who just went that step beyond bordem and entered into the realm of insanity.
stupedspam
2007-08-13 23:58:53
Yep, I'm going insane… School started so that might be the culprit. Just enjoy The Debug dancers Ejjman1 and I made :D
~Stupedspam
~Stupedspam
Sp0rky
2007-08-14 00:01:54
lol, I could watch them forever in a never ending loop. They're that good.
WhiteShadow
2007-08-14 00:04:21
What an interesting script. sexsiii.
Ejjman
2007-08-14 15:01:19
Well I was going to make every emote in RS last night..but my friend got offline to work with. And so I just threw that up. I think it pwns stuped but w/e :)
I have Michael Jackson, stay away kiddies.
I have Michael Jackson, stay away kiddies.
Emagdnim
2007-08-14 15:05:07
Wow this is some funny crap damn you guys got a lot of free time.
the scar noob
2007-08-15 13:10:53
cool one, nice work :)
btw want one for rs? check my sig for T.O.U.R.! :)
btw want one for rs? check my sig for T.O.U.R.! :)
lordsaturn
2007-08-17 14:43:26
HAHA! Halarious script!
Vi1e
2007-09-17 18:55:14
I want that minute of my life back!
Lacky
2007-10-12 05:01:07
Rofl! I love this script! I could have a lot of fun with this!