* 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
