aboutsummaryrefslogtreecommitdiff
path: root/worm.c
diff options
context:
space:
mode:
authorJeffrey Armstrong <jeff@approximatrix.com>2020-04-08 17:06:49 -0400
committerJeffrey Armstrong <jeff@approximatrix.com>2020-04-08 17:06:49 -0400
commit35c7d107799047b22b2c80a6d765719c1c5c6a76 (patch)
tree07ae034224881aa3e5d8a99259301d4b9bedf969 /worm.c
parent0b89dd1d4ada50e2299af967dc10af2daf95bba1 (diff)
downloadgemworm-35c7d107799047b22b2c80a6d765719c1c5c6a76.zip
gemworm-35c7d107799047b22b2c80a6d765719c1c5c6a76.tar.gz
Removing all support for PC GEM. Long time coming...
Diffstat (limited to 'worm.c')
-rw-r--r--worm.c43
1 files changed, 4 insertions, 39 deletions
diff --git a/worm.c b/worm.c
index f2859ec..ff1518d 100644
--- a/worm.c
+++ b/worm.c
@@ -39,32 +39,13 @@
#endif /* __GNUC__ */
/* The proper resource header is dependent upon system */
-#ifdef PCGEM
-#include "wormpc.h"
-#else
#include "wormst.h"
-#endif
#include "util.h"
#include "field.h"
#include "player.h"
#include "scores.h"
-/* Sometimes you may need to compile in some missing global
- * arrays used within the gem libraries
- */
-#ifdef PCGEM
-#ifdef NEEDGSX
-GLOBAL WORD contrl[11]; /* control inputs */
-GLOBAL WORD intin[80]; /* max string length */
-GLOBAL WORD ptsin[256]; /* polygon fill points */
-GLOBAL WORD intout[45]; /* open workstation output */
-GLOBAL WORD ptsout[12];
-#endif
-#else
-#define FAR
-#endif
-
WORD app_wflags = NAME | CLOSER | MOVER | SIZER;
WORD app_accid;
WORD app_appid;
@@ -75,16 +56,12 @@ WORD app_vh; /* VDI handle */
char *app_title = "Worm";
GRECT app_wdw; /* xywh of working area */
-OBJECT FAR *app_menu;
-OBJECT FAR *about_box;
-OBJECT FAR *scores_box;
-OBJECT FAR *newscore_box;
+OBJECT *app_menu;
+OBJECT *about_box;
+OBJECT *scores_box;
+OBJECT *newscore_box;
-#ifdef PCGEM
-#define RCS_FILE "wormpc.rsc"
-#else
#define RCS_FILE "wormst.rsc"
-#endif
#define MOVEDELAY 300
@@ -118,12 +95,7 @@ TEDINFO *eted;
if(res == BOK) {
/* save! */
-#ifdef PCGEM
- eted = (TEDINFO *)(newscore_box[TINITIALS].ob_spec);
-#else
eted = (TEDINFO *)(newscore_box[TINITIALS].ob_spec.index);
-#endif
-
add_high_score((char *)eted->te_ptext, score);
}
@@ -176,16 +148,11 @@ int open_window(int new)
if(app_wh<=0)
return -1;
-#ifdef PCGEM
- wind_set(app_wh, WF_NAME, FPOFF(app_title), FPSEG(app_title), 0, 0);
-#else
-
#ifdef MGEMLIB
wind_set(app_wh, WF_NAME, HIWORD(app_title), LOWORD(app_title), 0, 0);
#else
wind_set(app_wh, WF_NAME, app_title);
#endif
-#endif
if(new == 1) {
/* Get the desktop */
@@ -244,9 +211,7 @@ WORD txtwidth,txtheight;
rsrc_gaddr(R_TREE,NEWSCORE,&newscore_box);
/* Make the application name nicer on Atari GEM */
-#ifndef PCGEM
menu_register(app_accid, "Worm!");
-#endif
return open_window(1);
}