projects
/
h316.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
*** empty log message ***
[h316.git]
/
programs
/
tools
/
src
/
cleanup2.asm
diff --git
a/programs/tools/src/cleanup2.asm
b/programs/tools/src/cleanup2.asm
index 8479bbb9208d782f1239b4a1dec4d41f41a8c04b..70e9fd563dde0029ad09b4e215b3af6792681e79 100644
(file)
--- a/
programs/tools/src/cleanup2.asm
+++ b/
programs/tools/src/cleanup2.asm
@@
-4,16
+4,15
@@
*
* THIS LITTLE ROUTINE CAN BE LOADED ANYWHERE IN CORE.
*
*
* THIS LITTLE ROUTINE CAN BE LOADED ANYWHERE IN CORE.
*
+ SUBR CLENUP,STRT
SUBR ZSTART,ANFA
SUBR ZEND,ENDE
SUBR ZSTART,ANFA
SUBR ZEND,ENDE
- SUBR LOOP
- SUBR ANFA
*
REL ASSEMBLE IN RELOCATABLE MODE
ORG 0
STRT JMP ST2 JUMP OVER CONSTANTS
ANFA OCT 20
*
REL ASSEMBLE IN RELOCATABLE MODE
ORG 0
STRT JMP ST2 JUMP OVER CONSTANTS
ANFA OCT 20
-ENDE
DAC STRT-1
+ENDE
OCT '31777
ST2 LDA ANFA LOAD START ADDRESS
STA PTR
LOOP CRA
ST2 LDA ANFA LOAD START ADDRESS
STA PTR
LOOP CRA