home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
HAM Radio 1
/
HamRadio.cdr
/
cw
/
kam-car
/
kam-hlp.pas
< prev
next >
Wrap
Pascal/Delphi Source File
|
1989-02-25
|
520b
|
35 lines
procedure help;
begin
save_screen;
video^ := help_scr;
viewing_help := TRUE;
help_color;
gotoxy(40,24);
repeat until keypressed;
if viewing_help then
begin
restore_screen;
viewing_help := FALSE;
end;
end;
procedure qsignals;
begin
save_screen;
video^ := qsig_scr;
help_color;
gotoxy(40,24);
wait('');
restore_screen;
end;
procedure rst;
begin
save_screen;
video^ := rst_scr;
help_color;
gotoxy(40,24);
wait('');
restore_screen;
end;