SRL Archive - First Scripts

My first script


TomTuff

2009-02-09 14:36:08

this is my first working script, although it does nothing runescape oriented :P

I don't expect to become an SRL-Forum member with this, btw, so dont criticize me like you think i do, all it does is draw some ASCII and say some junk.

:sasmokin: :sasmokin: :sasmokin: :sasmokin: :sasmokin:

Dervish

2009-02-09 14:46:07

I'll help you a little bit ;) :

These lines :

 begin
RightNotice
end;
End.

At the end of the script can be deleted.

I'm happy to see you gave a try at standards, here's how it should be :

Your version (wrong standards) :

program demonstration;
Procedure DrawAscii;
begin
Writeln('___________ ___________ _____ _____')
wait(150)
Writeln('\__ ___/___ ____\__ ___/_ ___/ ____\/ ____\______')
wait(150)
writeln(' | | / _ \ / \| | | | \ __\\ __\/ ___/')
wait(150)
writeln(' | |( <_> ) Y Y \ | | | /| | | | \___ \')
wait(150)
writeln(' |____| \____/|__|_| /____| |____/ |__| |__| /____ >')
wait(150)
writeln(' \/ \/')
wait(150)
writeln('___________ .__')
wait(150)
writeln('\_ _____/__ ________ _____ ______ | | ____')
wait(150)
writeln(' | __)_\ \/ /\__ \ / \\____ \| | _/ __ \ ')
wait(150)
writeln(' | \> < / __ \| Y Y \ |_> > |_\ ___/')
wait(150)
writeln('/_______ /__/\_ \(____ /__|_| / __/|____/\___ >')
wait(150)
writeln(' \/ \/ \/ \/|__| \/ ')
End;
procedure RightNotice;
begin
Writeln('I hope to one day become an SRL-Forums member,')
wait(75)
Writeln('And this is my first step towards doing just that!')
wait(150)
Writeln('all this written by TomTuff, ascii art by www.network-science.de/ascii')
End;
begin
DrawAscii
RightNotice
end.

This is the right one :

program demonstration;

Procedure DrawAscii;
begin //begins aren't indented.
//Two space identation after a begin.
Writeln('___________ ___________ _____ _____'); // ";"'s after a function etc...
wait(150)
Writeln('\__ ___/___ ____\__ ___/_ ___/ ____\/ ___\______');
wait(150);
writeln(' | | / _ \ / \| | | | \ __\\ __\/ ___/');
wait(150);
writeln(' | |( <_> ) Y Y \ | | | /| | | | \___ \');
wait(150);
writeln(' |____| \____/|__|_| /____| |____/ |__| |__| /____ >');
wait(150);
writeln(' \/ \/');
wait(150);
writeln('___________ .__');
wait(150);
writeln('\_ _____/__ ________ _____ ______ | | ____');
wait(150);
writeln(' | __)_\ \/ /\__ \ / \\____ \| | _/ __ \ ');
wait(150);
writeln(' | \> < / __ \| Y Y \ |_> > |_\ ___/');
wait(150);
writeln('/_______ /__/\_ \(____ /__|_| / __/|____/\___ >');
wait(150);
writeln(' \/ \/ \/ \/|__| \/ ');
End; //End;s are on the same line as their corresponding "begin"s.

procedure RightNotice;
begin
Writeln('I hope to one day become an SRL-Forums member,');
wait(75);
Writeln('And this is my first step towards doing just that!');
wait(150);
Writeln('all this written by TomTuff, ascii art by www.network-science.de/ascii');
End;

begin
DrawAscii
RightNotice
end.

Good attitude ;). I'm sure you will accomplish SRL Member's someday, and as you said, this is a first step ;).

Good luck, and keep going ;).

TomTuff

2009-02-09 14:51:19

thanks for the input :D i didnt even know i was trying for standards O.o what are those? i was just spacing as a courtesy, and i also knew that if i expected decent feedback, i'd need to be able to organize the script…
can you link me to a post with these "standards"?

Dervish

2009-02-09 14:52:49

Here you go : SCAR Official Standards ;).

TomTuff

2009-02-09 14:56:34

k, thx, im learning about bitmaps and how to implement them into scar so that i can make a world sign-in-er that logs you into the world with the least people and that isnt a PK world
wish me luck :bart:

Tickyy

2009-02-09 15:15:12

Writeln('I hope to one day become an SRL-Forums member,')

Good luck with that :D, i hope to see ya soon :)

btw not bad for a first script :)

EDIT: if you need help with something, then just pm me or add me : [email]Tickyy_@msn.com[/email]

TomTuff

2009-02-09 15:18:42

From: Tickyy
Writeln('I hope to one day become an SRL-Forums member,')

Good luck with that :D, i hope to see ya soon :)

btw not bad for a first script :)


thanks :D

rofl and i gave up on least ppl not pk world script thing, just gonna make a sign in thing :D

Lance

2009-02-09 20:11:42

good job man x] im new to scripting to lol.