Skip to content

Commit d53d24a

Browse files
olafkryusveikkos
authored andcommitted
Fix profile of the hill check alert box
1 parent 186ae06 commit d53d24a

File tree

1 file changed

+5
-4
lines changed

1 file changed

+5
-4
lines changed

SJ3UNIT.PAS

Lines changed: 5 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -726,6 +726,7 @@ begin
726726
if (l<>acthill.profile) then { profiilichekkaus }
727727
begin
728728

729+
fillbox(0,0,319,199,0);
729730
alertbox;
730731

731732
str1:='RUN THE HILL MAKER AGAIN.';
@@ -736,11 +737,11 @@ begin
736737
str1:='EXITING CUP.';
737738
end;
738739

739-
writefont(80,90,'THE PROFILE OF HILL #'+acthill.frindex);
740-
writefont(80,102,'HAS BEEN CHANGED! NOT GOOD.');
741-
writefont(80,114,str1);
740+
writefont(80,85,'THE PROFILE OF THE HILL (FRONT'+acthill.frindex+'.PCX)');
741+
writefont(80,95,'HAS BEEN CHANGED! NOT GOOD.');
742+
writefont(80,105,str1);
742743

743-
writefont(80,130,'PRESS A KEY...');
744+
writefont(80,120,'PRESS A KEY...');
744745
drawscreen;
745746

746747
waitforkey;

0 commit comments

Comments
 (0)