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
/
binal.asm
diff --git
a/programs/tools/src/binal.asm
b/programs/tools/src/binal.asm
index b93caff6c1f4bc63e1b26e465863345955674380..4e383f932a4b57cc33646d89edf4422fb1a52962 100644
(file)
--- a/
programs/tools/src/binal.asm
+++ b/
programs/tools/src/binal.asm
@@
-391,7
+391,7
@@
SWRD DAC **
B2AD DAC BO2S START ADDRESS OF SECOND STAGE LOADER
B3AD DAC BO3S START ADDRESS OF THIRD STAGE LOADER
*
B2AD DAC BO2S START ADDRESS OF SECOND STAGE LOADER
B3AD DAC BO3S START ADDRESS OF THIRD STAGE LOADER
*
-LDRL DEC
3
00 LEADER LENGTH
+LDRL DEC
1
00 LEADER LENGTH
SZE SZE INSTRUCTION FOR FILL IN
SNZ SNZ INSTRUCTION FOR FILL IN
*
SZE SZE INSTRUCTION FOR FILL IN
SNZ SNZ INSTRUCTION FOR FILL IN
*
@@
-454,6
+454,8
@@
BO3S DAC * THAT IS FOR THE SECOND STAGE LOADER
* COMPLETE THE PAUS ROUTINE
LDA PJ1
STA J1
* COMPLETE THE PAUS ROUTINE
LDA PJ1
STA J1
+ LDA PJ2
+ STA J2
CRA
STA PAUS
STA JH
CRA
STA PAUS
STA JH
@@
-564,7
+566,7
@@
TSTP OCT '66
TDAT OCT '11
*
*
TDAT OCT '11
*
*
-LWRD OCT 66
+LWRD OCT 66
CAN'T BE INITIALLY ZERO!
INA '1001 CLEAR A AND INPUT
JMP *-1
ICA
INA '1001 CLEAR A AND INPUT
JMP *-1
ICA
@@
-576,7
+578,9
@@
LWRD OCT 66
*******************
* THE ATTIC OF THE THIRD STAGE LOADER
PJ1 JMP* PAUS LAST LOCATION THAT WILL BE LOADED FROM TAPE!
*******************
* THE ATTIC OF THE THIRD STAGE LOADER
PJ1 JMP* PAUS LAST LOCATION THAT WILL BE LOADED FROM TAPE!
+PJ2 OCP '101 STOP READER
PAUS DAC ** WILL BE INITIALIZED TO ZERO BEFORE PUNCHING
PAUS DAC ** WILL BE INITIALIZED TO ZERO BEFORE PUNCHING
+J2 DAC ** BECOMES OCP '101 ON START OF LOAD
JH HLT BECOMES CLEARED ON START OF LOAD
J1 DAC ** BECOMES JMP* PAUS ON START OF LOAD
*
JH HLT BECOMES CLEARED ON START OF LOAD
J1 DAC ** BECOMES JMP* PAUS ON START OF LOAD
*
@@
-590,5
+594,5
@@
PTR DAC ** MEMORY POINTER
CNT DAC ** WHERE TO LOAD? CAN BE CHANGED.
*
************************************************************
CNT DAC ** WHERE TO LOAD? CAN BE CHANGED.
*
************************************************************
- END
THAT'S IT, ENJOY!
+ END
ANF
THAT'S IT, ENJOY!