Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-12-27 17:29:49 +00:00
Code Issues Projects Releases Wiki Activity

tfv: animate the ship landing

Browse Source
This commit is contained in:
Vince Weaver 2017-10-22 23:26:08 -04:00
parent 7844a43608
commit 26fbd6db55
1 changed files with 33 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

34
gr-sim/tfv_flying.c
View File

@ -609,6 +609,7 @@ int flying(void) {
print_help();
}
/* Ending */
if (ch==13) {
int landing_color,tx,ty;
#if FIXEDPT
@ -619,7 +620,38 @@ int flying(void) {
landing_color=lookup_map(tx,ty);
printf("Trying to land at %d %d\n",tx,ty);
printf("Color=%d\n",landing_color);
if (landing_color==12) return 0;
if (landing_color==12) {
int loop;
#if FIXEDPT
zint=space_z.i;
#else
zint=space_z;
#endif
/* Land the ship */
for(loop=zint;loop>0;loop--) {
draw_background_mode7();
grsim_put_sprite(shadow_forward,SHIPX+3,31+zint);
grsim_put_sprite(ship_forward,SHIPX,shipy);
page_flip();
usleep(200000);
#if FIXEDPT
space_z.i--;
#else
space_z--;
#endif
}
return 0;
}
else {
int draw_save;
draw_save=ram[DRAW_PAGE];