Subj : FPC Oneliners.
To : mark lewis
From : Joseph Larsen
Date : Thu Jun 09 2016 01:56 am
ml> remember to keep it simple and straightforward...
ml>
I think I know the problem.
--snip---
Procedure position;
Begin
show;
Repeat
printf('onen.ans');
ch1:=ReadKey;
case ch1 of
#0 : begin
begin
ch1:=ReadKey;
case ch1 of
#80 : bot_bar;
#72 : top_bar;
end;
end;
end;
until ch1=#13
end;
--snip----
See the "#8 : begin" ? I don't think that's right. Any idea what I change it
to?
