icaema
/
fsh-shell
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

idk

This commit is contained in:
Stephen Toth 2018-07-21 21:07:39 -04:00
parent 54648a2c9a
commit fd9a898ee0
5 changed files with 1771 additions and 1770 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
bin/FSHa.8xp
View File

Binary file not shown.

3501
bin/FSHa.lst
View File

File diff suppressed because it is too large Load Diff

5
includes/PrgmCommands/PRGM.asm
View File

@ -5,9 +5,8 @@ prgmcmdPRGMu: .db "PRGM", 0
prgmcmdPRGMf: prgmcmdPRGMf:
ld hl, prgmcmdPRGMSprgm ld hl, prgmcmdPRGMSprgm
ld de, OP1 call _Mov9ToOP1
call strcpy
call prgmasm call prgmasm
prgmcmdPRGMSprgm: .db "NOS1", 0 prgmcmdPRGMSprgm: .db ProgObj, "CHAR", 0

2
includes/Text.inc
View File

@ -8,7 +8,7 @@ FshVVars: .db "64w", 0
FshVMajor: .db "0", 0 FshVMajor: .db "0", 0
FshVMinor: .db "1", 0 FshVMinor: .db "1", 0
FshVPatch: .db "1", 0 FshVPatch: .db "1", 0
FshVBuild: .db "500", 0 FshVBuild: .db "530", 0
FshVSeparator: .db ".", 0 FshVSeparator: .db ".", 0
FshMotd2nd: .db "Press 2nd for numbers", 0 FshMotd2nd: .db "Press 2nd for numbers", 0
FshMotdHelp: .db "Type 'HELP' for help", 0 FshMotdHelp: .db "Type 'HELP' for help", 0

33
includes/lib/prgm/Prgm.asm
View File

@ -31,8 +31,6 @@ prgminstallload:
ldir ldir
ret ret
prgmmov_start: prgmmov_start:
.org SafeSScreen .org SafeSScreen
@ -40,7 +38,9 @@ prgmmov_start:
prgmmov: prgmmov:
prgmloader: prgmloader:
call prgm_to_usermem ld a, 's'
call _PutC
call prgm_to_usermem_loc
ld hl, prgmunloader ld hl, prgmunloader
push hl push hl
set appAutoScroll,(iy + appflags) set appAutoScroll,(iy + appflags)
@ -48,9 +48,8 @@ prgmloader:
prgmloaderend: prgmloaderend:
prgmunloader: prgmunloader:
ld hl, Fsh ld hl, prgmFsh
ld de, OP1 call _Mov9ToOP1
call strcpy
call prgm_to_usermem call prgm_to_usermem
call _RunIndicOff call _RunIndicOff
jp Fin jp Fin
@ -75,15 +74,15 @@ prgm_to_usermem.in_ram: ; hl -> size bytes
inc hl inc hl
inc hl ; bypass tExtTok, tAsm84CECmp inc hl ; bypass tExtTok, tAsm84CECmp
push hl push hl
push de push de
ex de,hl ex de,hl
call _ErrNotEnoughMem ; check and see if we have enough memory call _ErrNotEnoughMem; check and see if we have enough memory
pop hl pop hl
ld (asm_prgm_size),hl ; store the size of the program ld (asm_prgm_size),hl ; store the size of the program
ld de,userMem ld de,userMem
push de push de
call _InsertMem; insert memory into usermem call _InsertMem; insert memory into usermem
pop de pop de
pop hl ; hl -> start of program pop hl ; hl -> start of program
ld bc,(asm_prgm_size) ; load size of current program ld bc,(asm_prgm_size) ; load size of current program
prgm_to_usermem.smc equ $ prgm_to_usermem.smc equ $
@ -92,6 +91,8 @@ prgm_to_usermem.smc equ $
ret ret
prgm_to_usermem_end: prgm_to_usermem_end:
prgmFsh: .db ProgObj, "FSHA", 0
prgmmov_end: prgmmov_end:
.org prgmmov_start+prgmmov_end-prgmmov .org prgmmov_start