SRL Archive - SRL Archives

Perfect-Direction


Krazy_Meerkat

2006-05-16 21:49:20

Well I can't see why perfectnorth wasn't like this but here it is, took about 5 seconds:
[php]{*******************************************************************************
procedure Perfect(Direction1);
By:
Description:
N, S, E, W, n, s, e, w.
*******************************************************************************}
procedure Perfect(Direction1 : String);
begin
MakeCompass(Direction1);
Wait(500 + Random(500));
MakeCompass(Direction1);
Wait(500 + Random(500));
MakeCompass(Direction1);
Wait(500 + Random(500));
SendArrowSilentWait(0, 1000 + Random(500));
ActivateClient;
end;[/php]

WhiteShadow

2006-05-16 21:56:39

Interesting, usually I just use one MakeCompass and it works fine.

Bebe

2006-05-16 22:00:39

Got the idea from perfect north ;)

nice idea though…

XxKanexX

2006-05-17 02:19:39

Why do people need it perfect, anyway? Detectable.

WT-Fakawi

2006-05-17 03:58:17

I made it, since MakeCompass('N') sometimes slips through. I found out that by calling MakeCompass three times, it would always tweak itself to almost perfect.

Never used other Compass directions except 'N', thats why I never bothered to make it any different :)

But I guess you are right though, Perfect(Direction1 : String); will do nicely.

Krazy_Meerkat

2006-05-17 06:51:02

Hey, finally some praise! I must have done something right? :p Thanks for the nice feedback guys but it wasn't neccessary, it's a very simple procedure and I hope it helps somehow :D