FUNNY FORMAT LOADER 9-223-62 NOINPUT R=7762 CKS=7775 INDEX=10 TEM1=R CNT=7777 FUNNY, JMS R DAC DONE 1 JMS R DAC DONE 2 JMS R DAC CEND DAC CBEG ISZ CEND GO, JMS R DAC LA SPA JMP DONE JMS R DAC CNT ADD LA DAC CKS JMS RAP DZM WORD CONTIN, ISZ CNT JMP RALPW LAC CKS CMA SZA HLT RSB JMP GO RALPW, JMS RAP DAC TEM1 JMS RAP RTL RTL RTL RTL ADD TEM1 DAC TEM1 JMS RAP RTR ADD CDSP DAC RAP AND CCMA RAR ADD TEM1 XCT I RAP JMP CONTIN DSP, JMP CODE1 JMP CODE2 JMP CODE3 JMP CODE4 XCT CODE4A JMP CODE6 NOP NOP NOP DONE, LAC CEND NOP XX /ROUTINES TO HANDLE FUNNY WORDS CODE2, AND MASK ADD I TEM1 CODE1, ADD WORD  /STORAGE WORD IN LA, XX CLC TAD LA DAC LA JMP CONTIN-1 CODE3, SPA!CLA CCMA, CMA XOR I TEM1 ADD WORD DAC WORD JMP CONTIN CODE4, DAC CODE4A LAC LA TAD CCMA CODE4A, XX JMP CONTIN RAP, 0  /READ 1 ALPHA LINE RSF JMP .-1 RRB RSA DAC TEM2 ADD CKS DAC CKS LAC TEM2 CLL JMP I RAP CDSP, DSP MASK, 760000 TEM2, 0 WORD, 0 CEND, 0 CBEG, 0 CODE6, ADD WORD  /CONSTANT IN DAC I CEND LAC CBEG DAC INDEX LAC I CEND SAD I INDEX JMP . 2 JMP .-2 LAC INDEX SAD CEND ISZ CEND JMP CODE4-2 START VeN\q_qq