Apple-2-SW/WeeGUI
1
0
Fork 0
mirror of https://github.com/blondie7575/WeeGUI.git synced 2024-12-13 15:30:04 +00:00
Code Issues Projects Releases Wiki Activity

Moved WeeGUI down, clear of BASIC.SYSTEM’s buffer

Browse Source 
Temporarily removed memory map management, pending more evaluation of the right way to do that.
This commit is contained in:
blondie7575 2017-12-22 15:57:55 -07:00
parent 5cb58f44dc
commit 23272a30fd
4 changed files with 27 additions and 27 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Makefile
View File

@ -11,7 +11,7 @@
CL65=cl65
AC=AppleCommander.jar
ADDR=7a00
ADDR=7800
ADDRDEMO=6000
PGM=weegui

2
WeeGUI_MLI.s
View File

@ -21,7 +21,7 @@ PARAM3 = $09
; WeeGUI entry point
; Set up your call, then do a JSR to this address.
;
WeeGUI = $7a04
WeeGUI = $7804 ; Offset of WGDispatch from 7800
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

BIN
weegui.dsk
View File

Binary file not shown.

50
weegui.s
View File

@ -7,7 +7,7 @@
;
.org $7a00
.org $7800
; Common definitions
@ -84,7 +84,7 @@ WGInit:
;
; See section 5.1.4 in the ProDOS 8 Technical Reference Manual
; for an explanation of these values. We're reserving memory
; pages $7b-$95 so that ProDOS won't use our memory for file
; pages $78-$94 so that ProDOS won't use our memory for file
; buffers, or allow Applesoft to step on us
;
; Byte in System Bitmap : Bit within byte
@ -101,20 +101,20 @@ WGInit:
; 12:100
; 12:011
; 12:010
lda #%00001111
tsb MEMBITMAP + $0f
lda #%11111111
tsb MEMBITMAP + $10
tsb MEMBITMAP + $11
lda #%11111100
tsb MEMBITMAP + $12
; lda #%00001111
; tsb MEMBITMAP + $0f
; lda #%11111111
; tsb MEMBITMAP + $10
; tsb MEMBITMAP + $11
; lda #%11111100
; tsb MEMBITMAP + $12
; Protect us from Applesoft by setting up HIMEM
lda #$79 ; 7a00 (really 79ff)
sta LINNUMH
lda #$ff
sta LINNUML
jsr SETHI
; lda #$77 ; 7800 (really 77ff)
; sta LINNUMH
; lda #$ff
; sta LINNUML
; jsr SETHI
jsr WG80 ; Enter 80-col text mode
jsr WGInitApplesoft ; Set up Applesoft API
@ -150,19 +150,19 @@ WGExit:
sta INVERSE
; Restore HIMEM to ProDOS default
lda #$96
sta LINNUMH
stz LINNUML
jsr SETHI
; lda #$96
; sta LINNUMH
; stz LINNUML
; jsr SETHI
; Remove ourselves from ProDOS memory map
lda #%00001111
trb MEMBITMAP + $0f
lda #$ff
trb MEMBITMAP + $10
trb MEMBITMAP + $11
lda #%11111100
trb MEMBITMAP + $12
; lda #%00001111
; trb MEMBITMAP + $0f
; lda #$ff
; trb MEMBITMAP + $10
; trb MEMBITMAP + $11
; lda #%11111100
; trb MEMBITMAP + $12
pla
rts