Wanted
2007-06-11 18:53:04
…
procedure MakeMeASandwich(Meat, Lettuce, Tomato: Boolean; Layers: Integer);
begin
WriteLn('');
WriteLn(' OMFG MAKE YOUR OWN DAMN SANDWICH YOU LAZY BUM!');
Wait(1000 + random(5000));
WriteLn(' ALRIGHT FINE, DAMN...');
Wait(1000);
WriteLn('');
if (Layers <= 0) then
begin
WriteLn('WTF NO LAYERS?');
Exit;
end;
x := 1;
while (x <= Layers) do
begin
x := x + 1;
Wait(100);
WriteLn(' _________________________________');
WriteLn(' [_________________________________]');
Wait(100);
if (Tomato) then
begin
WriteLn(' {////} {////} {////} {////} ');
Wait(100);
end;
if (Lettuce) then
begin
Writeln(' ----------------------------');
Wait(100);
end;
if (Meat) then
begin
WriteLn(' [|||||||||||||||||||||||||||||]');
Wait(100);
end;
end;
Wait(100);
WriteLn(' _________________________________');
WriteLn(' [_________________________________]');
WriteLn('');
WriteLn('There''s your crappy Sandwich Lazy Ass....');
WriteLn('');
end;
bullzeye95
2007-06-11 19:04:48
OMG DAT R DA LEETZORZ OMG OMG
/masturbate
Bobarkinator
2007-06-11 19:06:24
Looks like we do now :P
OMFG MAKE YOUR OWN DAMN SANDWHICH YOU LAZY BUM!
ALRIGHT FINE, DAMN...
_________________________________
[_________________________________]
{////} {////} {////} {////}
----------------------------
[|||||||||||||||||||||||||||||]
_________________________________
[_________________________________]
{////} {////} {////} {////}
----------------------------
[|||||||||||||||||||||||||||||]
_________________________________
[_________________________________]
{////} {////} {////} {////}
----------------------------
[|||||||||||||||||||||||||||||]
_________________________________
[_________________________________]
{////} {////} {////} {////}
----------------------------
[|||||||||||||||||||||||||||||]
_________________________________
[_________________________________]
There's your crappy Sandwhich Lazy Ass....
Wanted
2007-06-11 19:10:36
It just occurred to me that I misspelled sandwhich…
Edit: Fixed, Ok recopy this into SRL/SRL.scar.
R0b0t1
2007-06-12 19:55:45
Erm. I like sandwiches, but I never thought I could get a very ornery computer to make a sandwich.
~alex~
2007-06-13 04:37:43
Looks like someone has too much time on their hands :P
The Claw
2007-06-13 06:43:50
IT CAN MAKE A SANDWICH BUT IT CANT MAKE A CUP OF COFFEE!??!
lol
Abyssal
2007-06-13 09:18:33
procedure Coffee;
begin
Writeln('Freshen your drink, govna?');
Writeln(' ____________________');
Writeln(' /\ \ /');
Writeln(' | \/ \');
Writeln('/ / COFFEE \');
Writeln('| | |');
Writeln('\__| |');
Writeln(' |____________________|');
end;
YOUR JUST JEALOUS!
Freshen your drink, govna?
____________________
/\ \ /
| \/ \
/ / COFFEE \
| | |
\__| |
|____________________|
Markus
2007-06-13 09:33:46
procedure Baguette;
begin
writeln(' _______________________________________'):
writeln('/ \');
writeln('| |');
writeln('\______________________________________ /');
end;
Lol, now we only need a pie :)
nielsie95
2007-06-13 10:37:05
________
/ \
/ \
| |
| |
\ /
\________/
| |
| |
| |
| |
| |
Lolly anyone? :p
Sorry for my bad drawing art.
Markus
2007-06-13 10:47:36
A tree magically spawned in your debug box:
procedure Tree;
begin
writeln(' 000000000 ');
writeln(' 0000000000000000 ');
writeln(' 000000000000000000000 ');
writeln(' 0000000000000000000000000 ');
writeln(' 00000000000000000000000000 ');
writeln(' 00000000000000000000000000 ');
writeln(' 000000000000000000000000 ');
writeln(' 00000000000000000000 ');
writeln(' 00000000000000 ');
writeln(' _ 000000 // ');
writeln(' \\ ###### / \ ');
writeln(' \\ ######//\ \ ');
writeln(' \\######/ 0000 ');
writeln(' \###### 00 ');
writeln(' ###### ');
writeln(' ###### ');
writeln(' ###### ');
writeln(' ###### ');
writeln(' ###### ');
end;
Lol, we should make a Debug Box Role Playing Game :p
"Suddenly, a sandwhich appears! The sandwhich and the tree attack you! What are you going to do?"
n3ss3s
2007-06-13 14:39:39
Lol, gangfight - The gang of a sandwich who has a bad status and nothing to lose and a willow , famous of his fast knife hand VS. the gang of a ApplePie who murdered his relatives and an iPod which plays only bad music! :O
Wanted
2007-06-13 15:17:06
That's an awesome idea, we could make a game for SCAR but instead of using a form we could us ASCII to make word art with the debug box…
Lol Imagine this,
Super Mario Bros ASCII - SCAR Edition.
Anyone want to help? Lol I'll make it… seriously.
Edit: Lol, there's a procedure in SCAR divi which allows you to delete certain debug lines and also we theres one to resize the debug box :)
R0b0t1
2007-06-13 20:48:54
Oooh. That might be a good idea. But every key stroke you would have to update the debug.
Might cause lag. And scripting problems.
lolpie
2007-06-13 22:18:06
What about the X-rated type of sandwich?
YOO FALE
Dunceiam
2007-06-14 00:14:03
______________
/ ;;;;;;;;;;;;;;;;;;;;;;;;\ /\ /\ /\
\ ;;;;;;;;;;;;;;;;;;;;;;;;/ || || ||
|;;;;;;;;;;;;;;;;;;;;;;;;| || || ||
|;;;;;;;;;;;;;;;;;;;;;;;;| || || ||
|;;;;;;;;;;;;;;;;;;;;;;;;| || || ||
|;;;;;;;;;;;;;;;;;;;;;;;;| \ || | /
|;;;;;;;;;;;;;;;;;;;;;;;;| | |
|[u];;;;;;;;;;;;;;;;;;;;;;;;|[/u] | |
| |
| |
/ \
| |
\ __ /
Mmmm…toast and a fork…
Yummy…
-Dunceiam
Edit–that fork don't like me. Either that or parts of it are attracted to the "hot" toast.
Smartzkid
2007-06-14 00:25:56
_________________________
/ ;;;;;;;;;;;;;;;;;;;;;;;;\ /\ /\ /\
\ ;;;;;;;;;;;;;;;;;;;;;;;;/ || || ||
|;;;;;;;;;;;;;;;;;;;;;;;;| || || ||
|;;;;;;;;;;;;;;;;;;;;;;;;| || || ||
|;;;;;;;;;;;;;;;;;;;;;;;;| || || ||
|;;;;;;;;;;;;;;;;;;;;;;;;| \| || |/
|;;;;;;;;;;;;;;;;;;;;;;;;| | |
|;;;;;;;;;;;;;;;;;;;;;;;;| | |
| |
| |
/ \
| |
\ __ /
Markus
2007-06-14 05:57:32
Super Mario ASCII edition, love the idea.
Let's make it :p
Moving goomba :p
program Goomba;
var spaces : string;
begin
cleardebug;
spaces := '';
repeat
repeat
cleardebug;
writeln(spaces + ' ***');
writeln(spaces + ' *****');
writeln(spaces + ' **\*/**');
writeln(spaces + ' |___| ');
writeln(spaces + ' / \');
spaces := spaces + ' ';
addtoreport('goomba 1');
wait(500);
cleardebug;
spaces := spaces + ' ';
writeln(spaces + ' ***');
writeln(spaces + ' *****');
writeln(spaces + ' **\*/**');
writeln(spaces + ' |___| ');
writeln(spaces + ' \ /');
spaces := spaces + ' ';
addtoreport('goomba 2');
wait(500);
until(length(spaces) > 20);
repeat
cleardebug;
writeln(spaces + ' ***');
writeln(spaces + ' *****');
writeln(spaces + ' **\*/**');
writeln(spaces + ' |___| ');
writeln(spaces + ' / \');
addtoreport('goomba 1');
wait(500);
cleardebug;
Delete(spaces, 1, 1);
writeln(spaces + ' ***');
writeln(spaces + ' *****');
writeln(spaces + ' **\*/**');
writeln(spaces + ' |___| ');
writeln(spaces + ' \ /');
Delete(spaces, 1, 1);
addtoreport('goomba 2');
wait(500);
until(length(spaces) < 10);
until(false);
end.
I tried doing the legs with DeleteDebugLine but it is giving me weird acces violations :s
If we make this game, let's make it for scar 1.01, now downloadable from freddys site :)
Mario:
procedure Mario;
begin
writeln(' ### ');
writeln(' # M # ');
writeln(' ##########');
writeln(' | o_|');
writeln(' |____|')
writeln(' // \\');
end;
Wanted
2007-06-14 13:16:15
Lol this script is going to be thousands of lines of code mainly just Writeln's, Wait's, and if(KeyDown….
Secet
2007-06-14 14:27:42
…………………..,-~*`lllllllllllllllllllllllllll¯`*-,………………………………
………………,-~*llllllllllllllllllllllllllllllllllllllllllll*-,…………………………….
……………,-*llllllllllllllllllllllllllllllllllllllllllllllllllllll.\……………………………
………….;*`lllllllllllllllllllllllllll,-~*~-,llllllllllllllllllll\…………………………..
…………..\lllllllllllllllllllllllllll/………\;;;;llllllllllll,-`~-,………………………
……………\lllllllllllllllllllll,-*………..`~-~-,…(.(¯`*,`,……………………..
…………….\llllllllllll,-~*…………………)_-\..*`*;..)……………………..
……………..\,-*`¯,*`)…………,-~*`~……………./…………………
………………|/…/…/~,……-~*,-~*`;……………./.\………………
……………../…/…/…/..,-,..*~,.`*~*…………….*…\……………..
…………….|…/…/…/.*`…\………………………)….)¯`~,………………
…………….|./…/…./…….)……,.)`*~-,…………/….|..)…`~-,………….
……………/./…/…,*`-,…..`-,…*`….,—……\…./…../..|………¯```*~-,,,,
……………(……….)`*~-,….`*`.,-~*.,-*……|…/…./…/…………\……..
…………….*-,…….`*-,…`~,..``.,,,-*……….|.,*…,*…|…………..\……..
……………….*,………`-,…)-,…………..,-*`…,-*….(`-,…………\…….
………………….f`-,………`-,/…*-,___,,-~*….,-*……|…`-,……….\……..
Dunceiam
2007-06-14 15:16:34
http://www.studiolo.org/Mona/images/ASCII-Mona.gif:p
Whoever made it got too much time on their hands though…
-Dunceiam
Markus
2007-06-15 06:59:07
From: Icefire908
Lol this script is going to be thousands of lines of code mainly just Writeln's, Wait's, and if(KeyDown….
Not necessary, if we just write a few high level functions like Scrollmap and DrawObject it is easy to do.
I think most stuff is the ascii art itself.
Wow, the most useful thread in this whole site?
lolpie
2007-06-15 09:18:42
From: GoF
Wow, the most useful thread in this whole site?
Definately. All the leet scripts use advanced pixel finding techniques via ASCII drawn Mona Lisas. Duh
