* Uses Format-Lib "GENERAL.FOR". Rev. 1.2 (3/01)* PRINT 0 No list further on * * 1.1 Born in 4/97 *1/1 * 1.2 Fuer System on a Chip ergaenzt (Al/Wo) *1/2 * .IF_PROCTYPE M68K *------------------------------------------------* *..... Task-description-block ...................*1/1 TSKDCB FORMAT a,a,r prio,wsplen,startadr*1/1 / #1(16:31)#2(0:31) prio,wsplen *1/1 / #A=0#A(0:31)#A(0:31) DC.L 0,0 *1/1 / #1(16:31) prio again *1/1 / #3(R) pointer to start *1/1 / #A(0:31)#A(0:31)#A(0:31)#A(0:31) 4 DC.L 0 *1/1 / #A(0:31)#A(0:31)#A(0:31)#A(0:31) 8 DC.L 0 *1/1 / #A(0:31)#A(0:31)#A(0:31)#A(0:31) 12 DC.L 0*1/1 / #A(0:31)#A(0:31)#A(0:31)#A(0:31) 16 DC.L 0*1/1 / e *1/1 *------------------------------------------------* .FIN * PAGE .IF_PROCTYPE MPC604 *------------------------------------------------* *..... Task-description-block ...................*1/1 TSKDCB FORMAT a,a,r prio,wsplen,startadr*1/1 / #1(16:31) prio *1/1 / #A=0#A(0:15)#2(0:31) DC 0, DC.L wsplen *1/1 / #A(0:31)#A(0:31) 2 DC.L 0 (FORS,BACKS)1/1 / #1(16:31)#A(0:15) prio, DC 0 (Block+) *1/1 / #3(R) Start-PC *1/1 / #A(0:31)#A(0:31)#A(0:31)#A(0:31) 4 DC.L 0 *1/1 / #A(0:31)#A(0:31)#A(0:31)#A(0:31) 8 DC.L 0 *1/1 / #A(0:31)#A(0:31)#A(0:31)#A(0:31) 12 DC.L 0*1/1 / #A(0:31)#A(0:31)#A(0:31) 15 '' *1/1 / e *1/1 *------------------------------------------------* .IF SOCPPC <<<<<<<<<<<<<<<<<<<<<1/2 XLI FORMAT.L a,a rT-Nr,Immediate *1/2 / 001111#1(27:31)00000#2(0:15) lis rT,ImmHi *1/2 / 011000#1(27:31)#1(27:31)#2(16:31) ori rT,ImmLo *1/2 / e *1/2 *................................................* XLHZ FORMAT.L a,a rT-Nr,Adr *1/2 / 001111#1(27:31)00000#A=#2#A%16#A(0:15) lis rT,AdrHi*1/2 / 101000#1(27:31)#1(27:31)#2(16:31) lhz rT,AdrLo(rT)*1/2 / e *1/2 *................................................* XLWZ FORMAT.L a,a rT-Nr,Adr *1/2 / 001111#1(27:31)00000#A=#2#A%16#A(0:15) lis rT,AdrHi*1/2 / 100000#1(27:31)#1(27:31)#2(16:31) lwz rT,AdrLo(rT)*1/2 / e *1/2 *................................................* XSTB FORMAT.L a,a,a rS-Nr,Adr,HilfsReg.rH*1/2 / 001111#3(27:31)00000#A=#2#A%16#A(0:15) lis rH,AdrHi*1/2 / 100110#1(27:31)#3(27:31)#2(16:31) stb rS,AdrLo(rH)*1/2 / e *1/2 *................................................* XSTH FORMAT.L a,a,a rS-Nr,Adr,HilfsReg.rH*1/2 / 001111#3(27:31)00000#A=#2#A%16#A(0:15) lis rH,AdrHi*1/2 / 101100#1(27:31)#3(27:31)#2(16:31) sth rS,AdrLo(rH)*1/2 / e *1/2 *................................................* XSTW FORMAT.L a,a,a rS-Nr,Adr,HilfsReg.rH*1/2 / 001111#3(27:31)00000#A=#2#A%16#A(0:15) lis rH,AdrHi*1/2 / 100100#1(27:31)#3(27:31)#2(16:31) stw rS,AdrLo(rH)*1/2 / e *1/2 *................................................* .ELSE SOCPPC <<<<<<<<<<<<<<<<<<<<<1/2 *................................................* XLI FORMAT.L a,a rT-Nr,Immediate *1/2 / 001110#1(27:31)00000#2(16:31) li rT,ImmLo *1/2 / e *1/2 *................................................* XLHZ FORMAT.L a,a rT-Nr,Adr *1/2 / 101000#1(27:31)00000#2(16:31) lhz rT,AdrLo *1/2 / e *1/2 *................................................* XLWZ FORMAT.L a,a rT-Nr,Adr *1/2 / 100000#1(27:31)00000#2(16:31) lwz rT,AdrLo *1/2 / e *1/2 *................................................* XSTB FORMAT.L a,a,a rS-Nr,Adr,Dummy *1/2 / 100110#1(27:31)00000#2(16:31) stb rS,AdrLo *1/2 / e *1/2 *................................................* XSTH FORMAT.L a,a,a rS-Nr,Adr,Dummy *1/2 / 101100#1(27:31)00000#2(16:31) sth rS,AdrLo *1/2 / e *1/2 *................................................* XSTW FORMAT.L a,a,a rS-Nr,Adr,Dummy *1/2 / 100100#1(27:31)00000#2(16:31) stw rS,AdrLo *1/2 / e *1/2 *................................................* .FIN SOCPPC <<<<<<<<<<<<<<<<<<<<<1/2 .FIN