Fixed up segments on IIgs.

This commit is contained in:
Scott Duensing 2018-09-18 19:59:40 -05:00
parent e15a7d0df0
commit 878e93d236
8 changed files with 67 additions and 24 deletions

View file

@ -2,13 +2,12 @@
#include <stdarg.h> #include <stdarg.h>
#include "joey.h" #include "joey.h"
#ifdef JOEY_IIGS
segment "ansiterm";
#endif
#include "ansiterm.h" #include "ansiterm.h"
segment "ansiterm";
// http://ansi-bbs.org/ansi-bbs-core-server.html // http://ansi-bbs.org/ansi-bbs-core-server.html

View file

@ -1,7 +1,8 @@
#!/bin/bash -e #!/bin/bash -e
PROJECT=ifengine PROJECT=ifengine
DATA=(8x8thin.sta gamedata.z5) DATA=(8x8thin.sta output.z8 gamedata.dat)
SOURCE=(*.c *.h)
# --- HERE BE DRAGONS --- # --- HERE BE DRAGONS ---
@ -38,7 +39,16 @@ for F in "${DATA[@]}"; do
${AC}/import.sh ${F} BIN ${AC}/import.sh ${F} BIN
done done
if [ -z $1 ]; then mkdir -p /tmp/IIgs/source
for S in "${SOURCE[@]}"; do
for F in `ls -1 ${S}`; do
tr "\n" "\r" < ${F} > /tmp/IIgs/source/${F}
${AC}/import.sh /tmp/IIgs/source/${F} TXT
rm /tmp/IIgs/source/${F}
done
done
if [ ! -z $1 ]; then
pushd ${JOEY}/sdks/iix/gsplus pushd ${JOEY}/sdks/iix/gsplus
./gsplus -config IIgsTest.cfg || true ./gsplus -config IIgsTest.cfg || true
popd popd

View file

@ -1,3 +1,5 @@
#include "joey.h"
segment "fileio";
/* $Id: fileio.c,v 1.3 2000/07/05 15:20:34 jholder Exp $ /* $Id: fileio.c,v 1.3 2000/07/05 15:20:34 jholder Exp $
* -------------------------------------------------------------------- * --------------------------------------------------------------------

View file

@ -3,6 +3,9 @@
#include "ztypes.h" #include "ztypes.h"
segment "joeyio";
#define DISPLAY_MIXED_SIZE 5 #define DISPLAY_MIXED_SIZE 5
#define COMMAND_BUFFER_SIZE 32 #define COMMAND_BUFFER_SIZE 32

33
main.c
View file

@ -8,6 +8,9 @@
#include "ztypes.h" #include "ztypes.h"
segment "ifengine";
extern int GLOBALVER; extern int GLOBALVER;
@ -101,6 +104,8 @@ int main(void) {
char game[40]; char game[40];
char text[40]; char text[40];
//asm { brk 0xea }
in = fopen("gamedata.dat", "rt"); in = fopen("gamedata.dat", "rt");
if (in != NULL) { if (in != NULL) {
@ -115,28 +120,50 @@ int main(void) {
text[strlen(text) - 1] = 0; text[strlen(text) - 1] = 0;
jlUtilStartup(name); jlUtilStartup(name);
jlStaLoad(font, text);
_jlDebugBorder(BORDER_DEEP_RED);
jlDisplayPresent();
_jlDebugBorder(BORDER_PURPLE);
//jlKeyWaitForAny();
/*
if (!jlStaLoad(font, text)) {
jlUtilDie("Unable to load %s", text);
}
termStart(font, 0, 0, 40, 25); termStart(font, 0, 0, 40, 25);
termPrint("Term started...\n");
termDestruciveBackspace(false); termDestruciveBackspace(false);
termMoveCursor(1, 25); termMoveCursor(1, 25);
termSaveCursor(); termSaveCursor();
termPrint("Term configured...\n");
termPrint("process_arguments...\n");
process_arguments(game); process_arguments(game);
termPrint("configure...\n");
configure(V1, V8); configure(V1, V8);
termPrint("initialize_screen...\n");
initialize_screen(); initialize_screen();
termPrint("load_cache...\n");
load_cache(); load_cache();
termPrint("z_restart...\n");
z_restart(); z_restart();
termPrint("interpret...\n");
(void)interpret(); (void)interpret();
termPrint("unload_cache...\n");
unload_cache(); unload_cache();
termPrint("close_story...\n");
close_story(); close_story();
termPrint("close_script...\n");
close_script(); close_script();
termPrint("reset_screen...\n");
reset_screen(); reset_screen();
termStop(); termStop();
jlStaFree(font); jlStaFree(font);
*/
jlUtilShutdown();
} }
jlUtilShutdown();
} }

Binary file not shown.

View file

@ -1,29 +1,29 @@
# Reset Palette, Clear Screen to White, Draw in Black # Reset Palette, Clear Screen to White, Draw in Black
# Hacky Border because we can't hit 319 yet. # Hacky Border because we can't hit 319 yet.
R reset
C 0 color 0
E clear
C 15 color 15
S 0 0 255 199 fbox 0 0 255 199
C 0 color 0
# Horizon # Horizon
L 0 87 255 87 line 0 87 255 87
# Sun # Sun
L 255 64 248 61 240 61 233 62 228 66 223 72 220 78 220 87 line 255 64 248 61 240 61 233 62 228 66 223 72 220 78 220 87
# Beach # Beach
L 0 101 87 124 126 128 148 133 160 136 168 141 172 146 171 149 169 153 169 158 176 164 188 168 205 171 227 174 255 174 line 0 101 87 124 126 128 148 133 160 136 168 141 172 146 171 149 169 153 169 158 176 164 188 168 205 171 227 174 255 174
# Fill Sun # Fill Sun
C 12 color 12
F 242 74 # fill 242 74
# Fill Beach # Fill Beach
C 14 color 14
F 105 161 #fill 105 161
# Fill Ocean # Fill Ocean
C 1 color 1
F 194 106 #fill 194 106

View file

@ -1,3 +1,5 @@
#include "joey.h"
segment "quetzal";
/* $Id: quetzal.c,v 1.3 2000/07/05 15:20:34 jholder Exp $ /* $Id: quetzal.c,v 1.3 2000/07/05 15:20:34 jholder Exp $
* -------------------------------------------------------------------- * --------------------------------------------------------------------