diff --git a/boot.jim b/boot.jim index a3f1549..0866cef 100755 Binary files a/boot.jim and b/boot.jim differ diff --git a/catalog.exe b/catalog.exe index c63addd..a90799a 100755 Binary files a/catalog.exe and b/catalog.exe differ diff --git a/debug.jim b/debug.jim index b09d42b..792623c 100755 Binary files a/debug.jim and b/debug.jim differ diff --git a/defs.jim b/defs.jim index cef31c0..3f80771 100755 Binary files a/defs.jim and b/defs.jim differ diff --git a/end.jim b/end.jim index e6a81ba..ffef3ad 100755 Binary files a/end.jim and b/end.jim differ diff --git a/end.jor b/end.jor index af9e872..e771232 100755 --- a/end.jor +++ b/end.jor @@ -2,7 +2,7 @@ : line" [ ' s" , ] :| 20 center 10 texty +! |; , ; immediate : end-tick - fuck s" endep1" loadscr + clear-pages fuck s" endep1" loadscr ^ENTER wait-key WHITE text-color ! 35 15 2 10 box diff --git a/entity.jim b/entity.jim index 857078c..235beff 100755 Binary files a/entity.jim and b/entity.jim differ diff --git a/footer.jim b/footer.jim index 3c0eb6d..350d4b4 100755 Binary files a/footer.jim and b/footer.jim differ diff --git a/game.jim b/game.jim index 4d73e36..c115ea9 100755 Binary files a/game.jim and b/game.jim differ diff --git a/game.jor b/game.jor index 9d99622..2cb2864 100755 --- a/game.jor +++ b/game.jor @@ -261,7 +261,7 @@ defer reset-level userword 0 q-level ! reset-level dup LEV_QUIT = if - drop title + drop clear-pages title else loadlevel party each follow more diff --git a/input.jim b/input.jim index 4e3ee8d..b18a51e 100755 Binary files a/input.jim and b/input.jim differ diff --git a/jiles.jim b/jiles.jim index 1b1a97a..1954fed 100755 Binary files a/jiles.jim and b/jiles.jim differ diff --git a/job.jim b/job.jim index f943079..a49b418 100755 Binary files a/job.jim and b/job.jim differ diff --git a/lev00006.jim b/lev00006.jim index 8d46439..cfae883 100755 Binary files a/lev00006.jim and b/lev00006.jim differ diff --git a/level.jim b/level.jim index 7767b90..bc92900 100755 Binary files a/level.jim and b/level.jim differ diff --git a/map.jim b/map.jim index 76ab8a0..2a4364a 100755 Binary files a/map.jim and b/map.jim differ diff --git a/neuttowr.exe b/neuttowr.exe index 9215f88..8d1f1d0 100755 Binary files a/neuttowr.exe and b/neuttowr.exe differ diff --git a/neuttowr.prj b/neuttowr.prj index 863ad26..372c9d0 100755 Binary files a/neuttowr.prj and b/neuttowr.prj differ diff --git a/sound.jim b/sound.jim index 645c738..ea73221 100755 Binary files a/sound.jim and b/sound.jim differ diff --git a/start.jor b/start.jor index df4bf05..ead3e8d 100755 --- a/start.jor +++ b/start.jor @@ -16,5 +16,4 @@ task :noname activate blah begin draw suspend again ; execute reset-level loadlevel -draw unfuck load-footer - +clear-pages unfuck reloadportraits reloadtiles draw load-footer diff --git a/state.jim b/state.jim index 628ab22..e9059bf 100755 Binary files a/state.jim and b/state.jim differ diff --git a/testbed.c b/testbed.c index dd046a7..4244f88 100755 --- a/testbed.c +++ b/testbed.c @@ -459,6 +459,17 @@ void f_system() { kbd_init(); } +void clearPages() { + unsigned int offset; + + setAllPlanes(); + setWriteMode(0); + for (offset = 0; offset < OFF_PAGE2 + SIZE_PAGE; offset ++) { + VID[offset] = 0; + } +} + + /* JILES */ #define SCREEN_STRIDE 40 @@ -820,6 +831,7 @@ void game_f_init(char *exe, char *bootjor) { CDEF("scrollpos", f_scrollpos); CDEF("draw-screen", drawScreen); CDEF("split-screen", f_splitscreen); + CDEF("clear-pages", clearPages); CDEF("ticks", f_ticks); CDEF("ticks!", f_setticks); CDEF("text", f_text); diff --git a/timer.jim b/timer.jim index 89ef1b7..8605ca2 100755 Binary files a/timer.jim and b/timer.jim differ diff --git a/title.jim b/title.jim index 883abbd..73c2cb0 100755 Binary files a/title.jim and b/title.jim differ