• Please review our updated Terms and Rules here
  • Exhibitor application for VCF West 2022 is now open! If you are interested in exhibiting, please fill out the form here.
  • Here are the results of the VCF East 2022 Post Event Survey: Survey Results

Hi folks

CP/M User

Veteran Member
Joined
May 2, 2003
Messages
2,979
Location
Back of Burke (Guday!), Australia
(* Poor Kiwi's dont't seem to be getting any peace from Horrible Earthquakes!
:-O *)

{$C-}

var disaster : byte;
minusone : integer;
begin
clrscr;
minusone := 1;
disaster := 1;
repeat
gotoxy(disaster,10);
write(' OH NO! ');
if disaster = 74 then
minusone:=-1;
if disaster = 1 then
minusone:=1;
disaster:=disaster+minusone;
delay(50);
until keypressed;

end.
 

CP/M User

Veteran Member
Joined
May 2, 2003
Messages
2,979
Location
Back of Burke (Guday!), Australia
No, I can run Turbo Pascal 3 through an emulator, though the funny thing about it is whenever I boot-up the emulator the fan on the CPU always revs up, don't know the reasoning behind it as it's author specified that my system should be up to spec for it.
 
Top