Re: Random function - PASCAL - Article 614 - go-pugleaf

Article View: comp.lang.pascal.borland

Article #614

Back to comp.lang.pascal.borland Previous Next

Re: Random function - PASCAL

#614

From: Arno Fleck
Date: Wed, 08 Dec 1999 00:00

22 lines
1422 bytes

Hi !

> const
>   SystemDown = False;
> 
>   ...
> 
>   repeat
>     DoSomething;
>   until SystemDown;

And here's another possibility: ;-)
WHILE True DO DoSomething;

Bye,
Arno
-- 
http://afleck.home.pages.de (English and German)
Software, Links, C&C, Chartbreaker and more

http://pangea.home.pages.de (German only)
Mach mit bei einem Spiele-Projekt im Internet

Technical Details

Message-ID: <384E9F78.E9E9946@gmx.de>

Path: arc1-ca.pugleaf.net!unknown!not-for-mail

References:

<384c42e3.0@news1.mweb.co.za> <384C4D84.1F625BA7@gmx.at> <kmko4ssvc7sr3k908b2dekf0v9lds0cfp4@4ax.com> <384C5638.D278469F@gmx.at> <acuo4s8gc4lgbud1t3dehbaeq5oq8fl5nu@4ax.com> <384DC718.F5C9C609@t-online.de>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: fd1d1,22f85d6fecf732ec
X-Google-Attributes: gidfd1d1,public
X-Google-Thread: 10261c,22f85d6fecf732ec
X-Google-Attributes: gid10261c,public
X-Google-Thread: 102601,22f85d6fecf732ec
X-Google-Attributes: gid102601,public
X-Google-Thread: 111659,22f85d6fecf732ec
X-Google-Attributes: gid111659,public
From: Arno Fleck <Arno_Fleck@gmx.de>
Subject: Re: Random function - PASCAL
Date: 1999/12/08
Message-ID: <384E9F78.E9E9946@gmx.de>
X-Deja-AN: 558656647
Content-Transfer-Encoding: 7bit
References: <384c42e3.0@news1.mweb.co.za> <384C4D84.1F625BA7@gmx.at> <kmko4ssvc7sr3k908b2dekf0v9lds0cfp4@4ax.com> <384C5638.D278469F@gmx.at> <acuo4s8gc4lgbud1t3dehbaeq5oq8fl5nu@4ax.com> <384DC718.F5C9C609@t-online.de>
X-Accept-Language: de,en-GB,en-US
Content-Type: text/plain; charset=us-ascii
X-Trace: fu-berlin.de 944763474 3105900 212.21.46.245 (16 [12591])
Mime-Version: 1.0
Newsgroups: comp.lang.pascal.borland,comp.lang.pascal.misc,ctdl.lang.pascal,de.comp.lang.pascal

Reply to Parent Message