Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-09-10 23:54:33 +00:00
Code Issues Projects Releases Wiki Activity

gr-sim: fireworks actually works

Browse Source
This commit is contained in:
Vince Weaver 2018-09-03 23:59:51 -04:00
parent 91846e77e5
commit 6591a180ab
1 changed files with 8 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
gr-sim/hgr/fireworks.c
View File

@ -1,6 +1,7 @@
#include <stdio.h> #include <stdio.h>
#include <stdlib.h> #include <stdlib.h>
#include <unistd.h> #include <unistd.h>
#include <math.h>
#include "gr-sim.h" #include "gr-sim.h"
@ -15,9 +16,9 @@
const int ysize=191,xsize=280,mg=24; const int ysize=191,xsize=280,mg=24;
int cl; int cl;
int ms; int ms;
int x1,x2=0,y1,y2=0,cs,pk; double x1,x2=0,ypos1,y2=0,cs,pk;
double xpos,ypos,x_velocity,y_velocity; double xpos,ypos,x_velocity,y_velocity;
int i,n; double i,n;
void routine_370(void) { void routine_370(void) {
hplot(xpos+x2+n,ypos+y2+n); hplot(xpos+x2+n,ypos+y2+n);
@ -63,7 +64,7 @@ label_180:
//210 REM Draw rocket //210 REM Draw rocket
for(cs=1;cs<=ms;cs++) { for(cs=1;cs<=ms;cs++) {
y1=y2; ypos1=y2;
y2=ypos; y2=ypos;
x1=x2; x1=x2;
x2=xpos; x2=xpos;
@ -107,11 +108,11 @@ label_180:
} }
hcolor_equals(cl*4); hcolor_equals(cl*4);
hplot(x1,y1); hplot(x1,ypos1);
hplot_to(x2,y2); hplot_to(x2,y2);
// //
// printf("C=%d, %d,%d to %d,%d\n",cl*4, // printf("C=%d, %d,%d to %d,%d\n",cl*4,
// x1,y1,x2,y2); // x1,ypos1,x2,y2);
grsim_update(); grsim_update();
ch=grsim_input(); ch=grsim_input();
@ -123,8 +124,8 @@ label_180:
label_290: label_290:
//280 REM Draw explosion near X2,Y2 //280 REM Draw explosion near X2,Y2
//x2=int(x2); x2=floor(x2);
//y2=int(y2); y2=floor(y2);
xpos=(random()%20)-10; xpos=(random()%20)-10;
ypos=(random()%20)-10; ypos=(random()%20)-10;
hcolor_equals(cl*4+3); hcolor_equals(cl*4+3);
@ -150,18 +151,6 @@ label_290:
goto label_180; goto label_180;
while(1) {
grsim_update();
ch=grsim_input();
if (ch=='q') break;
usleep(100000);
}
return 0; return 0;
} }