Liste des instructions pour mise en oeuvre des routines 300-800 1. AFFECTATION MEMOIRES 1.00= TTL DEVRAM 2.00=@ 3.00=DRAM 4.00=TS@SEO RMB 1 5.00=* 6.00=AMPPEG RMB 1 7.00=AMPRUN RMB 1 8.00=AMPVAL RMB 1 9.00=AMPSTA RMB 1 10.00=AMPSEQ RMB 1 11.00=AMPRPT RMB 1 12.00=AMPCNT RMB 2 13.00=* 14.00=DTSREG RMB 1 15.00=DTSLTC RMB 1 16.00=DTSRER RMB 1 17.00=DTSSEO RMB 1 18.00=DTSCT1 RMB 1 19.00=DTSCT2 RMB 1 20.00=* 21.00=DTCREG RMB 1 22.00=DTCVAL RMB 1 23.00=DTCSEQ RMB 1 24.00=DTCSRH RMB 1 25.00=DTCSRL RMB 1 26.00=DTCSRC RMB 1 27.00=DTCCOD RMB 1 28.00=DTCCNT RMB 2 29.00=* 30.00=DMFREG RMB 1 31.00=DMFRUN RMB 1 32.00=DMFFLG RMB 1 33.00=DMFCNT RMB 2 34.00=* 35.00=EMTREG RMB 1 36.00=EMTRUN RMB 1 37.00=EMTSEO RMB 2 38.00=EMTCT1 RMB 2 39.00=EMTCT2 RMB 2 40.00=EMTFRQ RMB 2 41.00=* 42.00=NUMREG RMB 1 43.00=NUMRUN RMB 1 44.00=NUMSSO RMB 1 45.00=NUMSHT RMB 2 46.00=NUMMIS RMB 1 47.00=NUMTER RMB 1 48.00=NUMBP1 RMB 2 49.00=NUMBP2 RMB 2 50.00=NUMBUF RMB 12 51.00=* 52.00=DTTREG RMB 1 53.00=DTTLTC RMB 1 54.00=DTTSEO RMB 1 55.00=DTTCTI RMB 2 56.00=DTTCT2 RMB 2 57.00=DTTPER RMB 1 58.00=* 59.00=DMCREG RMB 1 60.00=EMSRUN RMB 1 61.00=EMCSEQ RMB 1 62.00=EMCCNT RMB 2 63.00=EMCBP1 RMB 2 64.00=* 65.00=HPREG RMB 1 66.00=HPRUN RMB 1 67.00=HPSEQ RMB 2 68.00=HPCTI RMB 2 69.00=HPFRQ RMB 2 70.00=HPCT2 RMB 2 71.00=* 72.00=WORK RMB 2 73.00=WIRK RMB 2 74.00=* 75.00=DEVESS RMB 1 76.00=PGMCNT RMB 2 77.00=* 78.00=MULCVV RMB 1 79.00=* 80.00=CLVREG RMB 1 81.00=CLVLTC RMB 1 82.00=CLVSEQ RMB 1 83.00=CLVCNT RMB 2 84.00=* 85.00=MULLDL RMB 1 86.00=MULLDA RMB 1 87.00=MULLDS RMB 1 88.00=* 89.00=LEDREG RMB 1 90.00=LEDFLH RMB 1 91.00=LEDSEO RMB 1 92.00=LEDBNT RMB 2 93.00=* 94.00=FONSOD RMB 1 95.00=FONNUM RMB 1 96.00=FONBST RMB 1 97.00=FONBP1 RMB 2 98.00=FONBP2 RMB 2 99.00=FONBUF RMB 12 100.00=* 101.00=FRAM 102.00=* 103.00=DRAMS 104.00=DEVNUM RMB 1 105.00=NUMSTS RMB 1 106.00=NUMMEM RMB 123 107.00=FRAMS 108.00=* 109.00=CHKMEM RMB 2 110.00=* 111.00= END 2. DEFINITION ENTREES-SORTIES 1.00= TTL DEVEQU 2.00=* 3.00=RAM EQU $0000 4.00=ROM EQU $E000 5.00=PIA EQU $2000 6.00=PTM EQU $2800 7.00=DAC EQU $3000 8.00=* 9.00=PIAC EQU PIA+1 10.00=PIAD EQU PIA 11.00=PIBC EQU PIA+3 12.00=PIBD EQU PIA+2 13.00=* 14.00=PTMSTA EQU PTM+1 15.00=PTMC2 EQU PTM+1 16.00=PTMC13 EQU PTM 17.00=PTM1 EQU PTM+2 18.00=PTM2 EQU PTM+4 19.00=PTM3 EQU PTM+6 20.00=* 21.00= END 3.ROUTINES D'EXECUTION 1.00= TTL DEVDTT 2.00=* 3.00=DTTCTL 4.00= JSR DTTSTA 5.00= CMPA DTTLTC 6.00= BEO DTTCL1 7.00= STAA DTTLTC 8.00= LDX #DTTFTB 9.00= LDAA DTTSEQ 10.00= JMP DRIVER 11.00=DTTCL1 12.00= LDX DTTCT2 13.00= BEQ DTTCL2 14.00= DEX 15.00= STX DTTCT2 16.00=DTTCL2 17.00= LDX DTTCT1 18.00= BEQ DTTCL3 19.00= DEX 20.00= STX DTTCT1 21.00= BNE DTTCL3 22.00= LDX #DTTCTB 23.00= LDAA DTTSEQ 24.00= JMP DRIVER 25.00=DTTCL3 26.00= RTS 27.00=* 28.00=DTTFTB 29.00= FDB DTTFO 30.00= FDB DTTF1 31.00= FDB DTTF2 32.00= FDB DTTF3 33.00= EDB DTTF4 34.00= FDB DTTF5 35.00= FDB DTTF6 36.00= FDB DTTF7 37.00= FDB DTTF8 38.00= FDB DTTF9 39.00= FDB DTTFA 40.00= FDB DTTFB 41.00=* 42.00=DTTCTB 43.00= FDB DTTCO 44.00= FDB DTTC1 45.00= FDB DTTC2 46.00= FDB DTTC3 47.00= FDB DTTC4 48.00= FDB DTTC5 49.00= FDB DTTC6 50.00= FDB DTTC7 51.00= FDB DTTCa 52.00= FDB DTTC9 53.00= FDB DTTCA 54.00= FDB DTTCB 55.00=* 56.00=DTTFO 57.00= LDX $120 58.00= STX DTTCT1 59.00= LDAA #1 60.00= STAA DTTSEO 61.00= RTS 62.00=* 63.00=DTTCO 64.00= ETS 65.00=* 66.00=DTTF1 67.00= LDAA #3 68.00= STAA DTTPER 69.00=* 70.00=DTTR2 71.00= LDAA #3 72.00= STAA DTTSEQ 73.00= RTS 74.00=* 75.00=DTTC2 76.00= CLR DTTREG 77.00=* 78.00=DTTC1 79.00= LDX #930 80.00= STX DTTCT1 81.00= LDAA #5 82.00= STAA DTTSEQ 83.00= RTS 84.00=* 85.00=DTTF3 86.00= LDX #120 87.00= STX DTTCT2 88.00= LDAA #4 89.00= STAA DTTSEQ 90.00= RTS 91.00=* 92.00=DTTC3 93.00= @LR DTTREG 94.00= LDAA #3 95.00= STAA DTTPER 96.00= LDX #930 97.00= STX DTTCT1 98.00= LDAA #7 99.00= STAA DTTSEO 100. 00= RTS 101.00=* 102.00=DTTF4 103.00= CLR DTTREG 104.00= CLR DTTSEQ 105.00= RTS 106.00=* 107.00=DTTC4 108.00= LDX DTTCT2 109.00= STX DTTCT1 110.00= LDAA DTTPER 111.00= BEQ DTTC41 112.00= DECA 113.00= STAA DTTPER 114.00= BNE DTTC42 115.00=DTTC41 116.00= LDAA #1 117.00= STAA DTTREG 118.00=DTTC42 119.00= LDAA #2 120.00= STAA DTTSE 121.00= RTS 122.00=* 123.00= PTTF5 124.00= LDAA #;3 125.00= STAA DTTPER 126.00=* 127.00=DTTF6 128.00= LDAA #7 129.00= STAA DTTSEQ 130.00= RTS 131.00=* 132.00=DTTC8 133.00= CLR DTTREG 134.00=* 135.00=DTTC5 136.00= LDX #150 137.00= STX DTTCT1 138.00= LDAA #9 139.00= STAA DTTSEO 140.00= RTS 141.00=* 142.00=DTTF7 143.00= LDX@#1050 144.00= STX DTTCT2 145.00= LDAA XS 146,00= STAA DTTSEQ 147.00= RTS 148.00=* 149.00=DTTC7 150.00=DTTF8 151.00= CLR DTTREG 152.00= CLR DTTSEQ 153.00= RTS 154.00=* 155.00=DTTCS 156.00= LDX DTTCT2 157.00= STX DTTCT1 158.00= LDAA DTTPER 159.00= BEQ DTTCS1 160.00= DECA 161.00= STAA DTTPER 162.00= BNE DTTCS2 163.00=DTTC31 164.00= LDAA # ;2 165.00= STAA DTTREG 166.00=DTTCS2 167.00= LDAA es 168.00= STAA DTTSEQ 169.00= RTS 170.00=* 171.00=DTTF9 172.00= CLR DTTREG 173.00= CLR DTTSEQ 174.00= RTS 175.00=* 176.00=DTTC9 177.00= LDX $400 178.00= STX DTTCT1 179.00= LDAA #10 180.00= STAA DTTSEO 181.00= RTS.