idk

includes/PrgmCommands/PRGM.asm

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

includes/Text.inc

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

includes/lib/prgm/Prgm.asm

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