Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- /BIN LOADER FOR FABRITEK
- /KYLE OWEN - 4 DEC 2015
- *7652
- SWITCH, 0
- CHAR, 0
- CHKSUM, 0
- ORIGIN, 0
- BEGG, 0
- DCA SWITCH
- JMS READ /GET CHAR
- TAD M376 /TEST FOR 377, SUBTRACT 376
- SPA SNA CLA /DON'T SKIP IF BIT 0 IS SET
- JMP .+4
- ISZ SWITCH /YES, COMPLEMENT SWITCH
- CMA
- JMP BEGG+1
- TAD SWITCH /NOT 377
- SZA CLA /IS SWITCH SET?
- JMP BEGG+2 /YES, IGNORE
- TAD CHAR /NO, TEST FOR CODE
- AND MASK /TYPES
- TAD M200
- SPA
- ISZ BEGG /DATA OR ORIGIN
- SPA SNA CLA
- JMP I BEGG /DATA, ORIGIN OR L/T
- HLT /IF FIELD SETTING, HALT!
- JMP BEGIN
- READ, 0
- 6012
- 6015
- JMP .-1
- DCA CHAR
- TAD CHAR
- JMP I READ
- MASK, 300
- BEND, JMS ASSEMB
- CIA
- TAD CHKSUM
- M376, HLT
- BEGIN, NOP
- JMS BEGG
- JMP .-1
- GO, DCA CHKSUM
- TAD CHAR
- DCA WORD1
- JMS READ
- DCA WORD2
- JMS BEGG
- JMP BEND
- JMS ASSEMB
- SNL
- JMP MEMFLD
- DCA ORIGIN
- CHEX, TAD WORD1
- TAD WORD2
- TAD CHKSUM
- JMP GO
- MEMFLD, DCA I ORIGIN
- ISZ ORIGIN
- M200, 7600
- JMP CHEX
- ASSEMB, 0
- TAD WORD1
- CLL RTL
- RTL
- RTL
- TAD WORD2
- JMP I ASSEMB
- WORD1=7776
- WORD2, 0
- *7755
- JMP BEGIN-1
- $
- /RAW OCTAL DUMP FOR FABRITEK RIM FORMAT (STRIPPED LEADER AND TRAILER)
- /153
- /063
- /176
- /051
- /100
- /000
- /100
- /000
- /100
- /000
- /100
- /000
- /100
- /000
- /132
- /052
- /143
- /003
- /113
- /016
- /177
- /050
- /152
- /067
- /122
- /052
- /170
- /040
- /152
- /057
- /112
- /052
- /176
- /040
- /152
- /060
- /112
- /053
- /103
- /012
- /113
- /043
- /175
- /010
- /122
- /056
- /177
- /050
- /156
- /056
- /174
- /002
- /153
- /017
- /100
- /000
- /160
- /012
- /160
- /015
- /153
- /005
- /132
- /053
- /112
- /053
- /157
- /003
- /103
- /000
- /143
- /045
- /170
- /041
- /112
- /054
- /174
- /002
- /170
- /000
- /142
- /056
- /153
- /020
- /132
- /054
- /112
- /053
- /133
- /076
- /143
- /003
- /133
- /054
- /142
- /056
- /153
- /013
- /143
- /045
- /174
- /020
- /153
- /041
- /132
- /055
- /113
- /076
- /113
- /054
- /112
- /054
- /153
- /022
- /136
- /055
- /122
- /055
- /176
- /000
- /153
- /035
- /100
- /000
- /113
- /076
- /171
- /006
- /170
- /006
- /170
- /006
- /113
- /054
- /157
- /045
- /100
- /000
- /153
- /016
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement