head     56.3;
access   paws bayes jws quist brad dew jwh;
symbols  ;
locks    ; strict;
comment  @# @;


56.3
date     93.01.27.13.36.01;  author jwh;  state Exp;
branches ;
next     56.2;

56.2
date     93.01.27.12.11.57;  author jwh;  state Exp;
branches ;
next     56.1;

56.1
date     91.11.05.09.26.03;  author jwh;  state Exp;
branches ;
next     55.1;

55.1
date     91.08.25.10.03.27;  author jwh;  state Exp;
branches ;
next     54.1;

54.1
date     91.03.18.15.13.18;  author jwh;  state Exp;
branches ;
next     53.1;

53.1
date     91.03.11.19.14.13;  author jwh;  state Exp;
branches ;
next     52.1;

52.1
date     91.02.19.08.59.22;  author jwh;  state Exp;
branches ;
next     51.1;

51.1
date     91.01.30.15.58.19;  author jwh;  state Exp;
branches ;
next     50.1;

50.1
date     90.10.29.16.11.11;  author jwh;  state Exp;
branches ;
next     49.1;

49.1
date     90.08.14.14.00.25;  author jwh;  state Exp;
branches ;
next     48.1;

48.1
date     90.07.26.11.05.53;  author jwh;  state Exp;
branches ;
next     47.1;

47.1
date     90.05.14.10.40.24;  author dew;  state Exp;
branches ;
next     46.1;

46.1
date     90.05.07.08.30.02;  author jwh;  state Exp;
branches ;
next     45.1;

45.1
date     90.04.19.15.37.01;  author jwh;  state Exp;
branches ;
next     44.1;

44.1
date     90.04.01.21.54.45;  author jwh;  state Exp;
branches ;
next     43.1;

43.1
date     90.03.20.13.44.38;  author jwh;  state Exp;
branches ;
next     42.1;

42.1
date     90.01.23.17.30.07;  author jwh;  state Exp;
branches ;
next     41.2;

41.2
date     89.12.26.10.44.02;  author jwh;  state Exp;
branches ;
next     41.1;

41.1
date     89.12.22.11.12.31;  author jwh;  state Exp;
branches ;
next     40.2;

40.2
date     89.11.21.10.06.34;  author jwh;  state Exp;
branches ;
next     40.1;

40.1
date     89.09.29.11.35.39;  author jwh;  state Exp;
branches ;
next     39.1;

39.1
date     89.09.26.16.21.02;  author dew;  state Exp;
branches ;
next     38.1;

38.1
date     89.08.29.11.11.07;  author jwh;  state Exp;
branches ;
next     37.1;

37.1
date     89.05.12.11.24.03;  author dew;  state Exp;
branches ;
next     36.1;

36.1
date     89.02.06.10.03.07;  author dew;  state Exp;
branches ;
next     35.1;

35.1
date     89.02.02.13.12.51;  author dew;  state Exp;
branches ;
next     34.1;

34.1
date     89.01.23.15.48.53;  author jwh;  state Exp;
branches ;
next     33.1;

33.1
date     89.01.16.11.25.12;  author dew;  state Exp;
branches ;
next     32.1;

32.1
date     89.01.10.11.30.08;  author bayes;  state Exp;
branches ;
next     31.1;

31.1
date     88.12.14.17.51.01;  author bayes;  state Exp;
branches ;
next     30.1;

30.1
date     88.12.09.13.29.19;  author dew;  state Exp;
branches ;
next     29.1;

29.1
date     88.10.31.15.13.40;  author bayes;  state Exp;
branches ;
next     28.1;

28.1
date     88.10.06.10.44.08;  author dew;  state Exp;
branches ;
next     27.1;

27.1
date     88.09.29.11.06.53;  author bayes;  state Exp;
branches ;
next     26.1;

26.1
date     88.09.28.12.20.21;  author bayes;  state Exp;
branches ;
next     25.1;

25.1
date     88.03.02.08.59.52;  author bayes;  state Exp;
branches ;
next     24.1;

24.1
date     87.08.31.09.00.26;  author jws;  state Exp;
branches ;
next     23.1;

23.1
date     87.08.26.09.37.35;  author bayes;  state Exp;
branches ;
next     22.1;

22.1
date     87.08.17.10.14.34;  author bayes;  state Exp;
branches ;
next     21.1;

21.1
date     87.08.12.13.04.24;  author bayes;  state Exp;
branches ;
next     20.1;

20.1
date     87.07.30.10.14.25;  author bayes;  state Exp;
branches ;
next     19.1;

19.1
date     87.06.01.07.35.05;  author jws;  state Exp;
branches ;
next     18.1;

18.1
date     87.05.20.14.26.58;  author bayes;  state Exp;
branches ;
next     17.1;

17.1
date     87.04.30.09.43.12;  author jws;  state Exp;
branches ;
next     16.1;

16.1
date     87.04.26.15.00.51;  author jws;  state Exp;
branches ;
next     15.1;

15.1
date     87.04.13.08.23.38;  author jws;  state Exp;
branches ;
next     14.1;

14.1
date     87.04.01.14.09.13;  author jws;  state Exp;
branches ;
next     13.1;

13.1
date     87.02.28.17.52.21;  author jws;  state Exp;
branches ;
next     12.1;

12.1
date     87.02.02.12.37.14;  author jws;  state Exp;
branches ;
next     11.1;

11.1
date     87.01.19.09.03.34;  author jws;  state Exp;
branches ;
next     10.1;

10.1
date     86.12.24.10.07.07;  author jws;  state Exp;
branches ;
next     9.1;

9.1
date     86.12.12.13.24.55;  author bayes;  state Exp;
branches ;
next     8.2;

8.2
date     86.12.09.11.36.33;  author jws;  state Exp;
branches ;
next     8.1;

8.1
date     86.11.27.11.05.26;  author jws;  state Exp;
branches ;
next     7.1;

7.1
date     86.11.20.12.50.38;  author hal;  state Exp;
branches ;
next     6.1;

6.1
date     86.11.04.16.45.34;  author paws;  state Exp;
branches ;
next     5.1;

5.1
date     86.10.28.14.06.00;  author hal;  state Exp;
branches ;
next     4.1;

4.1
date     86.09.30.18.30.25;  author hal;  state Exp;
branches ;
next     3.1;

3.1
date     86.09.01.11.17.31;  author hal;  state Exp;
branches ;
next     2.1;

2.1
date     86.07.30.14.07.04;  author hal;  state Exp;
branches ;
next     1.1;

1.1
date     86.06.30.13.07.07;  author danm;  state tmp;
branches ;
next     ;


desc
@Base file for PWS 3.2 release.

@


56.3
log
@
pws2rcs automatic delta on Wed Jan 27 13:14:25 MST 1993
@
text
@$ref 40$

PROGRAM OPINIT(output);

{ THIS PROGRAM SETS UP THE OPCODE FILE FOR 68000 INSTRUCTIONS }

$include 'M68KFPDEC'$

CONST                                                   (* LAF 861120 *)
  MAXOPSIZE = 11;                                       (* LAF 861120 *)
TYPE
  OPNAME=STRING[MAXOPSIZE];                             (* LAF 861120 *)
  STYPE = ARRAY [0..1499] OF STRING[36+MAXOPSIZE];      (* LAF 861120 *)
VAR
  NAME: OPNAME;
  CODE: INTEGER;
  CLASS: INTEGER;
  N: INTEGER;
  OPFILE,NOPCODES_FILE: TEXT;
  S: ^STYPE;
  I: INTEGER;


PROCEDURE PUTITOUT(NAME: OPNAME; CODE: INTEGER; CLASS: INTEGER);
VAR
  I: INTEGER;
  T: STRING[80];
BEGIN
  SETSTRLEN(S^[N],0);
  IF CODE>=32768 THEN CODE:=CODE-65536;
  IF CODE=-32768 THEN
    STRWRITE(S^[N], 1, I,
      'OPREC[NAME:''', NAME,'':MAXOPSIZE-STRLEN(NAME), ''',',   (* LAF 861120 *)
	    'CODE:-32767-1,',
	    'CLASS:', CLASS:1,   ']')
  ELSE
    STRWRITE(S^[N], 1, I,
      'OPREC[NAME:''', NAME,'':MAXOPSIZE-STRLEN(NAME), ''',',   (* LAF 861120 *)
	    'CODE:',   CODE:6,   ',',
	    'CLASS:', CLASS:3,   ']');
  WRITELN(N:4,'  ',S^[N]);
  IF N>0 THEN
    BEGIN
    I:=N;
    WHILE S^[I]<S^[I-1] DO
      BEGIN
      T:=S^[I]; S^[I]:=S^[I-1]; S^[I-1]:=T;
      I:=I-1;
      END;
    END;
  N:=N+1;
END;


$include 'OPINITFP'$

  PROCEDURE PUTOPS;
  BEGIN

  { Dy,Dx }
  { -(Ay),-(Ax) }
  { |---+---+---+---|---+---+---|---+---+---+---+---|---|---+---+---| }
  { |***************|    Rx     |*******************|R/M|    Ry     | }
  { |---+---+---+---|---+---+---|---+---+---+---+---|---|---+---+---| }
  PUTITOUT( 'SBCD',     OCTAL('100400'),  1);
  PUTITOUT( 'ABCD',     OCTAL('140400'),  1);

  { <ea>,Dn }
  { Dn,<ea> }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    Dn     |  OpMode   |          EA           | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'SUB',      OCTAL('110000'),  2);
  PUTITOUT( 'SUB.B',    OCTAL('110000'),  2);
  PUTITOUT( 'SUB.L',    OCTAL('110000'),  2);
  PUTITOUT( 'SUB.W',    OCTAL('110000'),  2);
  PUTITOUT( 'SUBA',     OCTAL('110000'),  2);
  PUTITOUT( 'SUBA.L',   OCTAL('110000'),  2);
  PUTITOUT( 'SUBA.W',   OCTAL('110000'),  2);
  PUTITOUT( 'ADD',      OCTAL('150000'),  2);
  PUTITOUT( 'ADD.B',    OCTAL('150000'),  2);
  PUTITOUT( 'ADD.L',    OCTAL('150000'),  2);
  PUTITOUT( 'ADD.W',    OCTAL('150000'),  2);
  PUTITOUT( 'ADDA',     OCTAL('150000'),  2);
  PUTITOUT( 'ADDA.L',   OCTAL('150000'),  2);
  PUTITOUT( 'ADDA.W',   OCTAL('150000'),  2);

  { #<data>,<ea> }
  { |---+---+---+---|---+---+---|---|---+---|---+---+---+---+---+---| }
  { |***************|   Data    |***| Size  |          EA           | }
  { |---+---+---+---|---+---+---|---|---+---|---+---+---+---+---+---| }
  PUTITOUT( 'ADDQ',     OCTAL('050000'),  3);
  PUTITOUT( 'ADDQ.B',   OCTAL('050000'),  3);
  PUTITOUT( 'ADDQ.L',   OCTAL('050000'),  3);
  PUTITOUT( 'ADDQ.W',   OCTAL('050000'),  3);
  PUTITOUT( 'SUBQ',     OCTAL('050400'),  3);
  PUTITOUT( 'SUBQ.B',   OCTAL('050400'),  3);
  PUTITOUT( 'SUBQ.L',   OCTAL('050400'),  3);
  PUTITOUT( 'SUBQ.W',   OCTAL('050400'),  3);

  { Dy,Dx }
  { -(Ay),-(Ax) }
  { |---+---+---+---|---+---+---|---|---+---|---+---|---|---+---+---| }
  { |***************|    Rx     |***| Size  |*******|R/M|    Ry     | }
  { |---+---+---+---|---+---+---|---|---+---|---+---|---|---+---+---| }
  PUTITOUT( 'SUBX',     OCTAL('110400'),  4);
  PUTITOUT( 'SUBX.B',   OCTAL('110400'),  4);
  PUTITOUT( 'SUBX.L',   OCTAL('110400'),  4);
  PUTITOUT( 'SUBX.W',   OCTAL('110400'),  4);
  PUTITOUT( 'ADDX',     OCTAL('150400'),  4);
  PUTITOUT( 'ADDX.B',   OCTAL('150400'),  4);
  PUTITOUT( 'ADDX.L',   OCTAL('150400'),  4);
  PUTITOUT( 'ADDX.W',   OCTAL('150400'),  4);

  { <ea>,Dn }
  { Dn,<ea> }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    Dn     |  OpMode   |          EA           | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'OR',       OCTAL('100000'),  5);
  PUTITOUT( 'OR.B',     OCTAL('100000'),  5);
  PUTITOUT( 'OR.L',     OCTAL('100000'),  5);
  PUTITOUT( 'OR.W',     OCTAL('100000'),  5);
  PUTITOUT( 'AND',      OCTAL('140000'),  5);
  PUTITOUT( 'AND.B',    OCTAL('140000'),  5);
  PUTITOUT( 'AND.L',    OCTAL('140000'),  5);
  PUTITOUT( 'AND.W',    OCTAL('140000'),  5);

  { Dx,Dy }
  { #<data>,Dy }
  { <ea> }
  { |---+---+---+---|---+---+---|---|---+---|---|---+---|---+---+---| }
  { |***************|   Count   |dr | Size  |i/r|*******|    Dn     | }
  { |---+---+---+---|---+---+---|---|---+---|---|---+---|---+---+---| }
  PUTITOUT( 'ASR',      OCTAL('160300'),  6);
  PUTITOUT( 'ASR.B',    OCTAL('160300'),  6);
  PUTITOUT( 'ASR.L',    OCTAL('160300'),  6);
  PUTITOUT( 'ASR.W',    OCTAL('160300'),  6);
  PUTITOUT( 'ASL',      OCTAL('160700'),  6);
  PUTITOUT( 'ASL.B',    OCTAL('160700'),  6);
  PUTITOUT( 'ASL.L',    OCTAL('160700'),  6);
  PUTITOUT( 'ASL.W',    OCTAL('160700'),  6);
  PUTITOUT( 'LSR',      OCTAL('161310'),  6);
  PUTITOUT( 'LSR.B',    OCTAL('161310'),  6);
  PUTITOUT( 'LSR.L',    OCTAL('161310'),  6);
  PUTITOUT( 'LSR.W',    OCTAL('161310'),  6);
  PUTITOUT( 'LSL',      OCTAL('161710'),  6);
  PUTITOUT( 'LSL.B',    OCTAL('161710'),  6);
  PUTITOUT( 'LSL.L',    OCTAL('161710'),  6);
  PUTITOUT( 'LSL.W',    OCTAL('161710'),  6);
  PUTITOUT( 'ROXR',     OCTAL('162320'),  6);
  PUTITOUT( 'ROXR.B',   OCTAL('162320'),  6);
  PUTITOUT( 'ROXR.L',   OCTAL('162320'),  6);
  PUTITOUT( 'ROXR.W',   OCTAL('162320'),  6);
  PUTITOUT( 'ROXL',     OCTAL('162720'),  6);
  PUTITOUT( 'ROXL.B',   OCTAL('162720'),  6);
  PUTITOUT( 'ROXL.L',   OCTAL('162720'),  6);
  PUTITOUT( 'ROXL.W',   OCTAL('162720'),  6);
  PUTITOUT( 'ROR',      OCTAL('163330'),  6);
  PUTITOUT( 'ROR.B',    OCTAL('163330'),  6);
  PUTITOUT( 'ROR.L',    OCTAL('163330'),  6);
  PUTITOUT( 'ROR.W',    OCTAL('163330'),  6);
  PUTITOUT( 'ROL',      OCTAL('163730'),  6);
  PUTITOUT( 'ROL.B',    OCTAL('163730'),  6);
  PUTITOUT( 'ROL.L',    OCTAL('163730'),  6);
  PUTITOUT( 'ROL.W',    OCTAL('163730'),  6);

  { <label> }
  { |---+---+---+---+---+---+---+---|---+---+---+---+---+---+---+---| }
  { |*******************************|         Displacement          | }
  { |---+---+---+---+---+---+---+---|---+---+---+---+---+---+---+---| }
  { |                      16-bit displacement                      | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  { |                      32-bit displacement                      | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'BRA',          HEX('6000'),  7);
  PUTITOUT( 'BRA.B',        HEX('6000'),  7);
  PUTITOUT( 'BRA.L',        HEX('6000'),  7);
  PUTITOUT( 'BRA.S',        HEX('6000'),  7);
  PUTITOUT( 'BRA.W',        HEX('6000'),  7);
  PUTITOUT( 'BSR',          HEX('6100'),  7);
  PUTITOUT( 'BSR.B',        HEX('6100'),  7);
  PUTITOUT( 'BSR.L',        HEX('6100'),  7);
  PUTITOUT( 'BSR.S',        HEX('6100'),  7);
  PUTITOUT( 'BSR.W',        HEX('6100'),  7);
  PUTITOUT( 'BHI',          HEX('6200'),  7);
  PUTITOUT( 'BHI.B',        HEX('6200'),  7);
  PUTITOUT( 'BHI.L',        HEX('6200'),  7);
  PUTITOUT( 'BHI.S',        HEX('6200'),  7);
  PUTITOUT( 'BHI.W',        HEX('6200'),  7);
  PUTITOUT( 'BLS',          HEX('6300'),  7);
  PUTITOUT( 'BLS.B',        HEX('6300'),  7);
  PUTITOUT( 'BLS.L',        HEX('6300'),  7);
  PUTITOUT( 'BLS.S',        HEX('6300'),  7);
  PUTITOUT( 'BLS.W',        HEX('6300'),  7);
  PUTITOUT( 'BCC',          HEX('6400'),  7);
  PUTITOUT( 'BCC.B',        HEX('6400'),  7);
  PUTITOUT( 'BCC.L',        HEX('6400'),  7);
  PUTITOUT( 'BCC.S',        HEX('6400'),  7);
  PUTITOUT( 'BCC.W',        HEX('6400'),  7);
  PUTITOUT( 'BHS',          HEX('6400'),  7);
  PUTITOUT( 'BHS.B',        HEX('6400'),  7);
  PUTITOUT( 'BHS.L',        HEX('6400'),  7);
  PUTITOUT( 'BHS.S',        HEX('6400'),  7);
  PUTITOUT( 'BHS.W',        HEX('6400'),  7);
  PUTITOUT( 'BCS',          HEX('6500'),  7);
  PUTITOUT( 'BCS.B',        HEX('6500'),  7);
  PUTITOUT( 'BCS.L',        HEX('6500'),  7);
  PUTITOUT( 'BCS.S',        HEX('6500'),  7);
  PUTITOUT( 'BCS.W',        HEX('6500'),  7);
  PUTITOUT( 'BLO',          HEX('6500'),  7);
  PUTITOUT( 'BLO.B',        HEX('6500'),  7);
  PUTITOUT( 'BLO.L',        HEX('6500'),  7);
  PUTITOUT( 'BLO.S',        HEX('6500'),  7);
  PUTITOUT( 'BLO.W',        HEX('6500'),  7);
  PUTITOUT( 'BNE',          HEX('6600'),  7);
  PUTITOUT( 'BNE.B',        HEX('6600'),  7);
  PUTITOUT( 'BNE.L',        HEX('6600'),  7);
  PUTITOUT( 'BNE.S',        HEX('6600'),  7);
  PUTITOUT( 'BNE.W',        HEX('6600'),  7);
  PUTITOUT( 'BEQ',          HEX('6700'),  7);
  PUTITOUT( 'BEQ.B',        HEX('6700'),  7);
  PUTITOUT( 'BEQ.L',        HEX('6700'),  7);
  PUTITOUT( 'BEQ.S',        HEX('6700'),  7);
  PUTITOUT( 'BEQ.W',        HEX('6700'),  7);
  PUTITOUT( 'BVC',          HEX('6800'),  7);
  PUTITOUT( 'BVC.B',        HEX('6800'),  7);
  PUTITOUT( 'BVC.L',        HEX('6800'),  7);
  PUTITOUT( 'BVC.S',        HEX('6800'),  7);
  PUTITOUT( 'BVC.W',        HEX('6800'),  7);
  PUTITOUT( 'BVS',          HEX('6900'),  7);
  PUTITOUT( 'BVS.B',        HEX('6900'),  7);
  PUTITOUT( 'BVS.L',        HEX('6900'),  7);
  PUTITOUT( 'BVS.S',        HEX('6900'),  7);
  PUTITOUT( 'BVS.W',        HEX('6900'),  7);
  PUTITOUT( 'BPL',          HEX('6A00'),  7);
  PUTITOUT( 'BPL.B',        HEX('6A00'),  7);
  PUTITOUT( 'BPL.L',        HEX('6A00'),  7);
  PUTITOUT( 'BPL.S',        HEX('6A00'),  7);
  PUTITOUT( 'BPL.W',        HEX('6A00'),  7);
  PUTITOUT( 'BMI',          HEX('6B00'),  7);
  PUTITOUT( 'BMI.B',        HEX('6B00'),  7);
  PUTITOUT( 'BMI.L',        HEX('6B00'),  7);
  PUTITOUT( 'BMI.S',        HEX('6B00'),  7);
  PUTITOUT( 'BMI.W',        HEX('6B00'),  7);
  PUTITOUT( 'BGE',          HEX('6C00'),  7);
  PUTITOUT( 'BGE.B',        HEX('6C00'),  7);
  PUTITOUT( 'BGE.L',        HEX('6C00'),  7);
  PUTITOUT( 'BGE.S',        HEX('6C00'),  7);
  PUTITOUT( 'BGE.W',        HEX('6C00'),  7);
  PUTITOUT( 'BLT',          HEX('6D00'),  7);
  PUTITOUT( 'BLT.B',        HEX('6D00'),  7);
  PUTITOUT( 'BLT.L',        HEX('6D00'),  7);
  PUTITOUT( 'BLT.S',        HEX('6D00'),  7);
  PUTITOUT( 'BLT.W',        HEX('6D00'),  7);
  PUTITOUT( 'BGT',          HEX('6E00'),  7);
  PUTITOUT( 'BGT.B',        HEX('6E00'),  7);
  PUTITOUT( 'BGT.L',        HEX('6E00'),  7);
  PUTITOUT( 'BGT.S',        HEX('6E00'),  7);
  PUTITOUT( 'BGT.W',        HEX('6E00'),  7);
  PUTITOUT( 'BLE',          HEX('6F00'),  7);
  PUTITOUT( 'BLE.B',        HEX('6F00'),  7);
  PUTITOUT( 'BLE.L',        HEX('6F00'),  7);
  PUTITOUT( 'BLE.S',        HEX('6F00'),  7);
  PUTITOUT( 'BLE.W',        HEX('6F00'),  7);

  { Dn,<ea> }
  { #<data>,<ea> }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    Dn     |***********|          EA           | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'BTST',     OCTAL('000400'),  8);
  PUTITOUT( 'BCHG',     OCTAL('000500'),  8);
  PUTITOUT( 'BCLR',     OCTAL('000600'),  8);
  PUTITOUT( 'BSET',     OCTAL('000700'),  8);

  { <ea>,Dn }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    Dn     |   Size    |          EA           | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'DIVU',     OCTAL('100300'),  9);
  PUTITOUT( 'DIVU.W',   OCTAL('100300'),  9);
  PUTITOUT( 'DIVS',     OCTAL('100700'),  9);
  PUTITOUT( 'DIVS.W',   OCTAL('100700'),  9);
  PUTITOUT( 'MULU',     OCTAL('140300'),  9);
  PUTITOUT( 'MULU.W',   OCTAL('140300'),  9);
  PUTITOUT( 'MULS',     OCTAL('140700'),  9);
  PUTITOUT( 'MULS.W',   OCTAL('140700'),  9);
  PUTITOUT( 'CHK.L',    OCTAL('040400'),  9);
  PUTITOUT( 'CHK',      OCTAL('040600'),  9);
  PUTITOUT( 'CHK.W',    OCTAL('040600'),  9);

  { <ea> }
  { |---+---+---+---+---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************************|   Size    |          EA           | }
  { |---+---+---+---+---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'NEGX',     OCTAL('040000'), 10);
  PUTITOUT( 'NEGX.B',   OCTAL('040000'), 10);
  PUTITOUT( 'NEGX.L',   OCTAL('040000'), 10);
  PUTITOUT( 'NEGX.W',   OCTAL('040000'), 10);
  PUTITOUT( 'CLR',      OCTAL('041000'), 10);
  PUTITOUT( 'CLR.B',    OCTAL('041000'), 10);
  PUTITOUT( 'CLR.L',    OCTAL('041000'), 10);
  PUTITOUT( 'CLR.W',    OCTAL('041000'), 10);
  PUTITOUT( 'NEG',      OCTAL('042000'), 10);
  PUTITOUT( 'NEG.B',    OCTAL('042000'), 10);
  PUTITOUT( 'NEG.L',    OCTAL('042000'), 10);
  PUTITOUT( 'NEG.W',    OCTAL('042000'), 10);
  PUTITOUT( 'NOT',      OCTAL('043000'), 10);
  PUTITOUT( 'NOT.B',    OCTAL('043000'), 10);
  PUTITOUT( 'NOT.L',    OCTAL('043000'), 10);
  PUTITOUT( 'NOT.W',    OCTAL('043000'), 10);
  PUTITOUT( 'TST',      OCTAL('045000'), 10);
  PUTITOUT( 'TST.B',    OCTAL('045000'), 10);
  PUTITOUT( 'TST.L',    OCTAL('045000'), 10);
  PUTITOUT( 'TST.W',    OCTAL('045000'), 10);

  { <ea>,Dn }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    Dn     |  OpMode   |          EA           | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'CMP',      OCTAL('130000'), 11);
  PUTITOUT( 'CMP.B',    OCTAL('130000'), 11);
  PUTITOUT( 'CMP.L',    OCTAL('130000'), 11);
  PUTITOUT( 'CMP.W',    OCTAL('130000'), 11);
  PUTITOUT( 'CMPA',     OCTAL('130000'), 11);
  PUTITOUT( 'CMPA.L',   OCTAL('130000'), 11);
  PUTITOUT( 'CMPA.W',   OCTAL('130000'), 11);

  { #<data> }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  { |***************************************************************| }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  { |                        Immediate Data                         | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'STOP',     OCTAL('047162'), 12);
  PUTITOUT( 'RTD',      OCTAL('047164'), 12);

  { Dn,<label> }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |***************************************************|    Dn     | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |                      16-bit displacement                      | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'DBT',          HEX('50C8'), 13);
  PUTITOUT( 'DBF',          HEX('51C8'), 13);
  PUTITOUT( 'DBRA',         HEX('51C8'), 13);
  PUTITOUT( 'DBHI',         HEX('52C8'), 13);
  PUTITOUT( 'DBLS',         HEX('53C8'), 13);
  PUTITOUT( 'DBCC',         HEX('54C8'), 13);
  PUTITOUT( 'DBHS',         HEX('54C8'), 13);
  PUTITOUT( 'DBCS',         HEX('55C8'), 13);
  PUTITOUT( 'DBLO',         HEX('55C8'), 13);
  PUTITOUT( 'DBNE',         HEX('56C8'), 13);
  PUTITOUT( 'DBEQ',         HEX('57C8'), 13);
  PUTITOUT( 'DBVC',         HEX('58C8'), 13);
  PUTITOUT( 'DBVS',         HEX('59C8'), 13);
  PUTITOUT( 'DBPL',         HEX('5AC8'), 13);
  PUTITOUT( 'DBMI',         HEX('5BC8'), 13);
  PUTITOUT( 'DBGE',         HEX('5CC8'), 13);
  PUTITOUT( 'DBLT',         HEX('5DC8'), 13);
  PUTITOUT( 'DBGT',         HEX('5EC8'), 13);
  PUTITOUT( 'DBLE',         HEX('5FC8'), 13);

  { Dn,<ea> }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    Dn     |  OpMode   |          EA           | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'EOR',      OCTAL('130000'), 14);
  PUTITOUT( 'EOR.B',    OCTAL('130000'), 14);
  PUTITOUT( 'EOR.L',    OCTAL('130000'), 14);
  PUTITOUT( 'EOR.W',    OCTAL('130000'), 14);

  { Dx,Dy }
  { Ax,Ay }
  { Dx,Ay }
  { |---+---+---+---|---+---+---|---|---+---+---+---+---|---+---+---| }
  { |***************|    Rx     |***|      OpMode       |    Ry     | }
  { |---+---+---+---|---+---+---|---|---+---+---+---+---|---+---+---| }
  PUTITOUT( 'EXG',      OCTAL('140400'), 15);

  { EXT    Dn }
  { EXT.W  Dn }
  { EXT.L  Dn }
  { EXTB.L Dn }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |***************************************************|    Dn     | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  PUTITOUT( 'EXT',      OCTAL('044200'), 16);
  PUTITOUT( 'EXT.W',    OCTAL('044200'), 16);
  PUTITOUT( 'EXT.L',    OCTAL('044300'), 16);
  PUTITOUT( 'EXTB.L',   OCTAL('044700'), 16);

  { <ea> }
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'PEA',      OCTAL('044100'), 17);
  PUTITOUT( 'JSR',      OCTAL('047200'), 17);
  PUTITOUT( 'JMP',      OCTAL('047300'), 17);

  { #<data>,<ea> }
  { |---+---+---+---+---+---+---+---|---+---|---+---+---+---+---+---| }
  { |*******************************| Size  |          EA           | }
  { |---+---+---+---+---+---+---+---|---+---|---+---+---+---+---+---| }
  { |          Word Data            |          Byte Data            | }
  { |---+---+---+---+---+---+---+---|---+---+---+---+---+---+---+---| }
  { |                          Long Data                            | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'SUBI',     OCTAL('002000'), 18);
  PUTITOUT( 'SUBI.B',   OCTAL('002000'), 18);
  PUTITOUT( 'SUBI.L',   OCTAL('002000'), 18);
  PUTITOUT( 'SUBI.W',   OCTAL('002000'), 18);
  PUTITOUT( 'ADDI',     OCTAL('003000'), 18);
  PUTITOUT( 'ADDI.B',   OCTAL('003000'), 18);
  PUTITOUT( 'ADDI.L',   OCTAL('003000'), 18);
  PUTITOUT( 'ADDI.W',   OCTAL('003000'), 18);
  PUTITOUT( 'CMPI',     OCTAL('006000'), 18);
  PUTITOUT( 'CMPI.B',   OCTAL('006000'), 18);
  PUTITOUT( 'CMPI.L',   OCTAL('006000'), 18);
  PUTITOUT( 'CMPI.W',   OCTAL('006000'), 18);

  { <ea>,An }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    An     |***********|          EA           | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'LEA',      OCTAL('040700'), 19);

  { An,#<displacement> }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |***************************************************|    An     | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |                          Word Data                            | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  { |                          Long Data                            | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'LINK.L',   OCTAL('044010'), 20);
  PUTITOUT( 'LINK',     OCTAL('047120'), 20);
  PUTITOUT( 'LINK.W',   OCTAL('047120'), 20);

  { <ea>,<ea> }
  { |---+---|---+---|---+---+---+---+---+---|---+---+---+---+---+---| }
  { |*******| Size  |          EA           |          EA           | }
  { |---+---|---+---|---+---+---+---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'MOVE',     OCTAL('000000'), 21);
  PUTITOUT( 'MOVE.B',   OCTAL('000000'), 21);
  PUTITOUT( 'MOVE.L',   OCTAL('000000'), 21);
  PUTITOUT( 'MOVE.W',   OCTAL('000000'), 21);
  PUTITOUT( 'MOVEA',    OCTAL('000100'), 21);
  PUTITOUT( 'MOVEA.L',  OCTAL('000100'), 21);
  PUTITOUT( 'MOVEA.W',  OCTAL('000100'), 21);

  { register list,<ea> }
  { <ea>,register list }
  { |---+---+---+---+---|---|---+---+---|---|---+---+---+---+---+---| }
  { |*******************|dr |***********|Sz |          EA           | }
  { |---+---+---+---+---|---|---+---+---|---|---+---+---+---+---+---| }
  { |                      Register List Mask                       | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'MOVEM',    OCTAL('044200'), 22);
  PUTITOUT( 'MOVEM.L',  OCTAL('044200'), 22);
  PUTITOUT( 'MOVEM.W',  OCTAL('044200'), 22);

  { Dx,d(Ay) }
  { d(Ay),Dx }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---|---+---+---| }
  { |***************|    Dx     |  OpMode   |***********|    Ay     | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---|---+---+---| }
  { |                         Displacement                          | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'MOVEP',    OCTAL('000010'), 23);
  PUTITOUT( 'MOVEP.L',  OCTAL('000010'), 23);
  PUTITOUT( 'MOVEP.W',  OCTAL('000010'), 23);

  { #<data>,Dn }
  { |---+---+---+---|---+---+---|---|---+---+---+---+---+---+---+---| }
  { |***************|    Dn     |***|             Data              | }
  { |---+---+---+---|---+---+---|---|---+---+---+---+---+---+---+---| }
  PUTITOUT( 'MOVEQ',    OCTAL('070000'), 24);

  { <ea> }
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'NBCD',     OCTAL('044000'), 25);
  PUTITOUT( 'TAS',      OCTAL('045300'), 25);
  PUTITOUT( 'ST',           HEX('50C0'), 25);
  PUTITOUT( 'SF',           HEX('51C0'), 25);
  PUTITOUT( 'SHI',          HEX('52C0'), 25);
  PUTITOUT( 'SLS',          HEX('53C0'), 25);
  PUTITOUT( 'SCC',          HEX('54C0'), 25);
  PUTITOUT( 'SHS',          HEX('54C0'), 25);
  PUTITOUT( 'SCS',          HEX('55C0'), 25);
  PUTITOUT( 'SLO',          HEX('55C0'), 25);
  PUTITOUT( 'SNE',          HEX('56C0'), 25);
  PUTITOUT( 'SEQ',          HEX('57C0'), 25);
  PUTITOUT( 'SVC',          HEX('58C0'), 25);
  PUTITOUT( 'SVS',          HEX('59C0'), 25);
  PUTITOUT( 'SPL',          HEX('5AC0'), 25);
  PUTITOUT( 'SMI',          HEX('5BC0'), 25);
  PUTITOUT( 'SGE',          HEX('5CC0'), 25);
  PUTITOUT( 'SLT',          HEX('5DC0'), 25);
  PUTITOUT( 'SGT',          HEX('5EC0'), 25);
  PUTITOUT( 'SLE',          HEX('5FC0'), 25);

  { }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  { |***************************************************************| }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'ILLEGAL',  OCTAL('045374'), 26);
  PUTITOUT( 'RESET',    OCTAL('047160'), 26);
  PUTITOUT( 'NOP',      OCTAL('047161'), 26);
  PUTITOUT( 'RTE',      OCTAL('047163'), 26);
  PUTITOUT( 'RTS',      OCTAL('047165'), 26);
  PUTITOUT( 'TRAPV',    OCTAL('047166'), 26);
  PUTITOUT( 'RTR',      OCTAL('047167'), 26);

  { #<data>,<ea> }
  { |---+---+---+---+---+---+---+---|---+---|---+---+---+---+---+---| }
  { |*******************************| Size  |          EA           | }
  { |---+---+---+---+---+---+---+---|---+---|---+---+---+---+---+---| }
  { |          Word Data            |          Byte Data            | }
  { |---+---+---+---+---+---+---+---|---+---+---+---+---+---+---+---| }
  { |                          Long Data                            | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'ORI',      OCTAL('000000'), 27);
  PUTITOUT( 'ORI.B',    OCTAL('000000'), 27);
  PUTITOUT( 'ORI.L',    OCTAL('000000'), 27);
  PUTITOUT( 'ORI.W',    OCTAL('000000'), 27);
  PUTITOUT( 'ANDI',     OCTAL('001000'), 27);
  PUTITOUT( 'ANDI.B',   OCTAL('001000'), 27);
  PUTITOUT( 'ANDI.L',   OCTAL('001000'), 27);
  PUTITOUT( 'ANDI.W',   OCTAL('001000'), 27);
  PUTITOUT( 'EORI',     OCTAL('005000'), 27);
  PUTITOUT( 'EORI.B',   OCTAL('005000'), 27);
  PUTITOUT( 'EORI.L',   OCTAL('005000'), 27);
  PUTITOUT( 'EORI.W',   OCTAL('005000'), 27);

  { Dn }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |***************************************************|    Dn     | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  PUTITOUT( 'SWAP',     OCTAL('044100'), 28);

  { #<vector> }
  { |---+---+---+---+---+---+---+---+---+---+---+---|---+---+---+---| }
  { |***********************************************|    Vector     | }
  { |---+---+---+---+---+---+---+---+---+---+---+---|---+---+---+---| }
  PUTITOUT( 'TRAP',     OCTAL('047100'), 29);

  { An }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |***************************************************|    An     | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  PUTITOUT( 'UNLK',     OCTAL('047130'), 30);

  { (Ay)+,(Ax)+ }
  { |---+---+---+---|---+---+---|---|---+---|---+---+---|---+---+---| }
  { |***************|    Ax     |***| Size  |***********|    Ay     | }
  { |---+---+---+---|---+---+---|---|---+---|---+---+---|---+---+---| }
  PUTITOUT( 'CMPM',     OCTAL('130410'), 31);
  PUTITOUT( 'CMPM.B',   OCTAL('130410'), 31);
  PUTITOUT( 'CMPM.L',   OCTAL('130410'), 31);
  PUTITOUT( 'CMPM.W',   OCTAL('130410'), 31);

  { Rn,Rc }
  { Rc,Rn }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---|---| }
  { |***********************************************************|dr | }
  { |---|---+---+---|---+---+---+---+---+---+---+---+---+---+---|---| }
  { |A/D| Register  |               Control Register                | }
  { |---|---+---+---|---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'MOVEC',    OCTAL('047172'), 32);

  { Rn,<ea> }
  { <ea>,Rn }
  { |---+---+---+---+---+---+---+---|---+---|---+---+---+---+---+---| }
  { |*******************************| Size  |          EA           | }
  { |---|---+---+---|---|---+---+---|---+---|---+---+---+---+---+---| }
  { |A/D| Register  |dr | 0   0   0   0   0   0   0   0   0   0   0 | }
  { |---|---+---+---|---|---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'MOVES',    OCTAL('007000'), 33);
  PUTITOUT( 'MOVES.B',  OCTAL('007000'), 33);
  PUTITOUT( 'MOVES.L',  OCTAL('007000'), 33);
  PUTITOUT( 'MOVES.W',  OCTAL('007000'), 33);

  { Rn }
  { |---+---+---+---+---+---+---+---+---+---+---+---|---|---+---+---| }
  { |***********************************************|D/A|    Rn     | }
  { |---+---+---+---+---+---+---+---+---+---+---+---|---|---+---+---| }
  PUTITOUT( 'RTM',      OCTAL('003300'), 34);

  { #<vector> }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |***************************************************|  Vector   | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  PUTITOUT( 'BKPT',     OCTAL('044110'), 35);

  { TRAPcc }
  { TRAPcc.W #<data> }
  { TRAPcc.L #<data> }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |***************************************************|  OpMode   | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |                          Word Data                            | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  { |                          Long Data                            | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'TRAPT.W',      HEX('50FA'), 36);
  PUTITOUT( 'TRAPT.L',      HEX('50FB'), 36);
  PUTITOUT( 'TRAPT',        HEX('50FC'), 36);
  PUTITOUT( 'TRAPF.W',      HEX('51FA'), 36);
  PUTITOUT( 'TRAPF.L',      HEX('51FB'), 36);
  PUTITOUT( 'TRAPF',        HEX('51FC'), 36);
  PUTITOUT( 'TRAPHI.W',     HEX('52FA'), 36);
  PUTITOUT( 'TRAPHI.L',     HEX('52FB'), 36);
  PUTITOUT( 'TRAPHI',       HEX('52FC'), 36);
  PUTITOUT( 'TRAPLS.W',     HEX('53FA'), 36);
  PUTITOUT( 'TRAPLS.L',     HEX('53FB'), 36);
  PUTITOUT( 'TRAPLS',       HEX('53FC'), 36);
  PUTITOUT( 'TRAPCC.W',     HEX('54FA'), 36);
  PUTITOUT( 'TRAPCC.L',     HEX('54FB'), 36);
  PUTITOUT( 'TRAPCC',       HEX('54FC'), 36);
  PUTITOUT( 'TRAPHS.W',     HEX('54FA'), 36);
  PUTITOUT( 'TRAPHS.L',     HEX('54FB'), 36);
  PUTITOUT( 'TRAPHS',       HEX('54FC'), 36);
  PUTITOUT( 'TRAPCS.W',     HEX('55FA'), 36);
  PUTITOUT( 'TRAPCS.L',     HEX('55FB'), 36);
  PUTITOUT( 'TRAPCS',       HEX('55FC'), 36);
  PUTITOUT( 'TRAPLO.W',     HEX('55FA'), 36);
  PUTITOUT( 'TRAPLO.L',     HEX('55FB'), 36);
  PUTITOUT( 'TRAPLO',       HEX('55FC'), 36);
  PUTITOUT( 'TRAPNE.W',     HEX('56FA'), 36);
  PUTITOUT( 'TRAPNE.L',     HEX('56FB'), 36);
  PUTITOUT( 'TRAPNE',       HEX('56FC'), 36);
  PUTITOUT( 'TRAPEQ.W',     HEX('57FA'), 36);
  PUTITOUT( 'TRAPEQ.L',     HEX('57FB'), 36);
  PUTITOUT( 'TRAPEQ',       HEX('57FC'), 36);
  PUTITOUT( 'TRAPVC.W',     HEX('58FA'), 36);
  PUTITOUT( 'TRAPVC.L',     HEX('58FB'), 36);
  PUTITOUT( 'TRAPVC',       HEX('58FC'), 36);
  PUTITOUT( 'TRAPVS.W',     HEX('59FA'), 36);
  PUTITOUT( 'TRAPVS.L',     HEX('59FB'), 36);
  PUTITOUT( 'TRAPVS',       HEX('59FC'), 36);
  PUTITOUT( 'TRAPPL.W',     HEX('5AFA'), 36);
  PUTITOUT( 'TRAPPL.L',     HEX('5AFB'), 36);
  PUTITOUT( 'TRAPPL',       HEX('5AFC'), 36);
  PUTITOUT( 'TRAPMI.W',     HEX('5BFA'), 36);
  PUTITOUT( 'TRAPMI.L',     HEX('5BFB'), 36);
  PUTITOUT( 'TRAPMI',       HEX('5BFC'), 36);
  PUTITOUT( 'TRAPGE.W',     HEX('5CFA'), 36);
  PUTITOUT( 'TRAPGE.L',     HEX('5CFB'), 36);
  PUTITOUT( 'TRAPGE',       HEX('5CFC'), 36);
  PUTITOUT( 'TRAPLT.W',     HEX('5DFA'), 36);
  PUTITOUT( 'TRAPLT.L',     HEX('5DFB'), 36);
  PUTITOUT( 'TRAPLT',       HEX('5DFC'), 36);
  PUTITOUT( 'TRAPGT.W',     HEX('5EFA'), 36);
  PUTITOUT( 'TRAPGT.L',     HEX('5EFB'), 36);
  PUTITOUT( 'TRAPGT',       HEX('5EFC'), 36);
  PUTITOUT( 'TRAPLE.W',     HEX('5FFA'), 36);
  PUTITOUT( 'TRAPLE.L',     HEX('5FFB'), 36);
  PUTITOUT( 'TRAPLE',       HEX('5FFC'), 36);

  { #<data>,<ea> }
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---+---+---+---+---+---+---+---|---+---|---+---+---+---+---+---| }
  { | 0   0   0   0   0   0   0   0 |        Argument Count         | }
  { |---+---+---+---+---+---+---+---|---+---+---+---+---+---+---+---| }
  PUTITOUT( 'CALLM',    OCTAL('003300'), 37);

  { Dc,Du,<ea> }
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---+---+---+---+---+---+---|---+---+---|---+---+---|---+---+---| }
  { | 0   0   0   0   0   0   0 |    Du     | 0   0   0 |    Dc     | }
  { |---+---+---+---+---+---+---|---+---+---|---+---+---|---+---+---| }
  PUTITOUT( 'CAS',      OCTAL('006300'), 38);
  PUTITOUT( 'CAS.B',    OCTAL('005300'), 38);
  PUTITOUT( 'CAS.W',    OCTAL('006300'), 38);
  PUTITOUT( 'CAS.L',    OCTAL('007300'), 38);

  { Dc1:Dc2,Du1:Du2,(Rn1):(Rn2) }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  { |***************************************************************| }
  { |---|---+---+---|---+---+---|---+---+---|---+---+---|---+---+---| }
  { |D/A|    Rn1    | 0   0   0 |    Du1    | 0   0   0 |    Dc1    | }
  { |---|---+---+---|---+---+---|---+---+---|---+---+---|---+---+---| }
  { |D/A|    Rn2    | 0   0   0 |    Du2    | 0   0   0 |    Dc2    | }
  { |---|---+---+---|---+---+---|---+---+---|---+---+---|---+---+---| }
  PUTITOUT( 'CAS2',     OCTAL('006374'), 39);
  PUTITOUT( 'CAS2.B',   OCTAL('005374'), 39);
  PUTITOUT( 'CAS2.W',   OCTAL('006374'), 39);
  PUTITOUT( 'CAS2.L',   OCTAL('007374'), 39);

  { <ea>,Rn }
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---|---+---+---|---|---+---+---+---+---|---+---+---+---+---+---| }
  { |D/A|    Rn     | S | 0   0   0   0   0   0   0   0   0   0   0 | }
  { |---|---+---+---|---|---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'CHK2',     OCTAL('001300'), 40);
  PUTITOUT( 'CHK2.B',   OCTAL('000300'), 40);
  PUTITOUT( 'CHK2.W',   OCTAL('001300'), 40);
  PUTITOUT( 'CHK2.L',   OCTAL('002300'), 40);
  PUTITOUT( 'CMP2',     OCTAL('001300'), 40);
  PUTITOUT( 'CMP2.B',   OCTAL('000300'), 40);
  PUTITOUT( 'CMP2.W',   OCTAL('001300'), 40);
  PUTITOUT( 'CMP2.L',   OCTAL('002300'), 40);

  { -(Ax),-(Ay),#,<adjustment> }
  { Dx,Dy,#,<adjustment> }
  { |---+---+---+---|---+---+---|---+---+---+---+---|---|---+---+---| }
  { |***************|   Dy/Ay   |*******************|R/M|   Dx/Ax   | }
  { |---+---+---+---|---+---+---|---+---+---+---+---|---|---+---+---| }
  { |                          Adjustment                           | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'PACK',     OCTAL('100500'), 41);
  PUTITOUT( 'UNPK',     OCTAL('100600'), 41);

  { <ea>{offset:width}
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---+---+---+---|---|---+---+---+---+---|---|---+---+---+---+---| }
  { | 0   0   0   0 |Do |      Offset       |Dw |       Width       | }
  { |---+---+---+---|---|---+---+---+---+---|---|---+---+---+---+---| }
  PUTITOUT( 'BFTST',    OCTAL('164300'), 42);
  PUTITOUT( 'BFCHG',    OCTAL('165300'), 42);
  PUTITOUT( 'BFCLR',    OCTAL('166300'), 42);
  PUTITOUT( 'BFSET',    OCTAL('167300'), 42);

  { <ea>{offset:width),Dn
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---+---+---+---|---|---+---+---+---+---|---|---+---+---+---+---| }
  { | 0 |    Dn     |Do |      Offset       |Dw |       Width       | }
  { |---+---+---+---|---|---+---+---+---+---|---|---+---+---+---+---| }
  PUTITOUT( 'BFEXTU',   OCTAL('164700'), 43);
  PUTITOUT( 'BFEXTS',   OCTAL('165700'), 43);
  PUTITOUT( 'BFFFO',    OCTAL('166700'), 43);

  { Dn,<ea>{offset:width}
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---+---+---+---|---|---+---+---+---+---|---|---+---+---+---+---| }
  { | 0 |    Dn     |Do |      Offset       |Dw |       Width       | }
  { |---+---+---+---|---|---+---+---+---+---|---|---+---+---+---+---| }
  PUTITOUT( 'BFINS',    OCTAL('167700'), 44);

  { <ea>,Dq }
  { <ea>,Dr:Dq }
  { <ea>,Dl }
  { <ea>,Dh:Dl }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    Dn     |***********|          EA           | }
  { |---|---+---+---|---|---|---|---+---+---|---+---+---|---+---+---| }
  { | 0 |   Dq/Dl   |U/S|Sz | 0   0   0   0   0   0   0 |   Dr/Dh   | }
  { |---|---+---+---|---|---|---+---+---+---+---+---+---|---+---+---| }
  PUTITOUT( 'DIVU.L',   OCTAL('046100'), 45);
  PUTITOUT( 'DIVUL.L',  OCTAL('046100'), 45);
  PUTITOUT( 'DIVS.L',   OCTAL('046100'), 45);
  PUTITOUT( 'DIVSL.L',  OCTAL('046100'), 45);
  PUTITOUT( 'MULU.L',   OCTAL('046000'), 45);
  PUTITOUT( 'MULS.L',   OCTAL('046000'), 45);

  { MOVE16 ADDED FOR THE 68040 6/30/89 - JWH                          }
  { (Ax)+,(Ay)+  ( Post Increment Format )                            }
  { xxx.L,(Ay)+  ( Absolute Format )     op-mode : 01                 }
  { (Ay)+,xxx.L  ( Absolute Format )     op-mode : 00                 }
  { xxx.L,(Ay)   ( Absolute Format )     op-mode : 11                 }
  { (Ay) ,xxx.L  ( Absolute Format )     op-mode : 10                 }
  { Note - xxx here is an absolute long address.                      }
  { Also - I just fabricated class '46' for the MOVE16 instruction.   }

  { Post Increment Format :  4 bytes                                  }
  { |---+---+---+---|---+---+---+---|---+---+---+---|---|---+---+---| }
  { | 1   1   1   1 | 0   1   1   0 | 0   0   1   0 | 0 |Register Ax| }
  { |---|---+---+---|---+---+---+---|---+---+---+---|---+---+---+---| }
  { | 1 |Register Ay| 0   0   0   0 | 0   0   0   0 | 0   0   0   0 | }
  { |---|---+---+---|---+---+---+---|---+---+---+---|---+---+---+---| }

  { Absolute Format :  6 bytes                                        }
  { |---+---+---+---|---+---+---+---|---+---+---|---+---|---+---+---| }
  { | 1   1   1   1 | 0   1   1   0 | 0   0   0 |op-mode|Register Ay| }
  { |---|---+---+---|---+---+---+---|---+---+---|---+---+---+---+---| }
  { |                      HIGH  ORDER  ADDRESS                     | }
  { |---|---+---+---|---+---+---+---|---+---+---+---|---+---+---+---| }
  { |                      LOW   ORDER  ADDRESS                     | }
  { |---|---+---+---|---+---+---+---|---+---+---+---|---+---+---+---| }

  PUTITOUT( 'MOVE16',   octal('173000'),46);

  { CINV INSTRUCTION FAMILY ADDED FOR THE 68040 6/30/89 - JWH         }
  { Syntax :                                                    }
  { CINVL,CPUSHL   DC,(Ax)    Cache : 01 -  data cache          }
  { CINVL,CPUSHL   IC,(Ax)    Cache : 10 -  instruction cache   }
  { CINVL,CPUSHL   DC/IC,(Ax) Cache : 11 -  both caches         }
  { CINVP,CPUSHP   DC,(Ax)    Cache : 01 -  data cache          }
  { CINVP,CPUSHP   IC,(Ax)    Cache : 10 -  instruction cache   }
  { CINVP,CPUSHP   DC/IC,(Ax) Cache : 11 -  both caches         }
  { CINVA,CPUSHA   DC         Cache : 01 -  data cache          }
  { CINVA,CPUSHA   IC         Cache : 10 -  instruction cache   }
  { CINVA,CPUSHA   DC/IC      Cache : 11 -  both caches         }
  { Instruction Format, CINV :  2 bytes                               }
  { |---+---+---+---|---+---+---+---|---+---|---|---+---|---+---+---| }
  { | 1   1   1   1 | 0   1   0   0 | Cache | 0 | Scope |Register Ax| }
  { |---|---+---+---|---+---+---+---|---+---|---|---+---+---+---+---| }
  { Instruction Format, CPUSH :  2 bytes                              }
  { |---+---+---+---|---+---+---+---|---+---|---|---+---|---+---+---| }
  { | 1   1   1   1 | 0   1   0   0 | Cache | 1 | Scope |Register Ax| }
  { |---|---+---+---|---+---+---+---|---+---|---|---+---+---+---+---| }
  { CINVL,CPUSHL - Scope : 01 - ('L' for Line)                  }
  { CINVP,CPUSHP - Scope : 10 - ('P' for Page)                  }
  { CINVA,CPUSHA - Scope : 11 - ('A' for All)                   }
  {              - Scope : 00  Illegal Instruction              }

  PUTITOUT( 'CINVL',   octal('172000'),47);
  PUTITOUT( 'CINVP',   octal('172000'),48);
  PUTITOUT( 'CINVA',   octal('172000'),49);
  PUTITOUT( 'CPUSHL',   octal('172000'),50);
  PUTITOUT( 'CPUSHP',   octal('172000'),51);
  PUTITOUT( 'CPUSHA',   octal('172000'),52);

  END;

  PROCEDURE PUTPSEUDO;
  BEGIN
$if fpimmed$
  putitout( 'DC.D',                 1,   99);
  putitout( 'DS.D',                 2,   99);
  putitout( 'DS.P',                 2,   99);
  putitout( 'DS.S',                 2,   99);
  putitout( 'DS.X',                 2,   99);
$end$
  PUTITOUT( 'DC',                   1,   99);
  PUTITOUT( 'DC.B',                 1,   99);
  PUTITOUT( 'DC.L',                 1,   99);
  PUTITOUT( 'DC.W',                 1,   99);
  PUTITOUT( 'DS',                   2,   99);
  PUTITOUT( 'DS.B',                 2,   99);
  PUTITOUT( 'DS.L',                 2,   99);
  PUTITOUT( 'DS.W',                 2,   99);
  PUTITOUT( 'END',                  3,   99);
  PUTITOUT( 'MNAME',                4,   99);
  PUTITOUT( 'EQU',                  5,   99);
  PUTITOUT( 'SRC',                  6,   99);
  PUTITOUT( 'LIST',                 8,   99);
  PUTITOUT( 'LLEN',                 9,   99);
  PUTITOUT( 'NOL',                 10,   99);
  PUTITOUT( 'NOLIST',              10,   99);
  PUTITOUT( 'NOOBJ',               11,   99);
  PUTITOUT( 'NOPAGE',              12,   99);
  PUTITOUT( 'ORG',                 13,   99);
  PUTITOUT( 'ORG.L',               13,   99);
  PUTITOUT( 'PAGE',                14,   99);
  PUTITOUT( 'RORG',                15,   99);
  PUTITOUT( 'RORG.L',              15,   99);
  PUTITOUT( 'SPC',                 17,   99);
  PUTITOUT( 'TTL',                 18,   99);
  PUTITOUT( 'COM',                 19,   99);
  PUTITOUT( 'DEF',                 20,   99);
  PUTITOUT( 'REFA',                21,   99);
  PUTITOUT( 'REFR',                22,   99);
  PUTITOUT( 'LMODE',               25,   99);
  PUTITOUT( 'SMODE',               26,   99);
  PUTITOUT( 'RMODE',               27,   99);
  PUTITOUT( 'NOSYMS',              29,   99);
  PUTITOUT( 'INCLUDE',             30,   99);
  PUTITOUT( 'SPRINT',              31,   99);
  PUTITOUT( 'LPRINT',              32,   99);
  PUTITOUT( 'START',               33,   99);
  PUTITOUT( 'DECIMAL',             34,   99);
  END;



BEGIN  { MAIN PROGRAM }
NEW(S);
REWRITE(OPFILE,'ASSM:OPCODES.TEXT');
REWRITE(NOPCODES_FILE,'ASSM:NOPCODES.TEXT');
N:=0;
PUTITOUT( '  ????',   OCTAL('000000'),  0);  (* sentinel *)
$if mc68881$            (* flt. pt. coprocessor ops *)
  putfpops;
$end$
PUTOPS;
PUTPSEUDO;
FOR I:=0 TO N-2 DO
  WRITELN(OPFILE,S^[I],',');
WRITELN(OPFILE,S^[N-1]);
CLOSE(OPFILE,'SAVE');
WRITELN(NOPCODES_FILE);
WRITELN(NOPCODES_FILE,'NOPCODES = ',N-1:0,';   (* MAXIMUM OPCODE INDEX *)');
WRITELN(NOPCODES_FILE);
CLOSE(NOPCODES_FILE,'SAVE');
WRITELN(OUTPUT,N,' OPCODES.');
END.
@


56.2
log
@
pws2rcs automatic delta on Wed Jan 27 11:57:27 MST 1993
@
text
@d1 897
@


56.1
log
@Automatic bump of revision number for PWS version 3.25
@
text
@a0 897
$ref 40$

PROGRAM OPINIT(output);

{ THIS PROGRAM SETS UP THE OPCODE FILE FOR 68000 INSTRUCTIONS }

$include 'M68KFPDEC'$

CONST                                                   (* LAF 861120 *)
  MAXOPSIZE = 11;                                       (* LAF 861120 *)
TYPE
  OPNAME=STRING[MAXOPSIZE];                             (* LAF 861120 *)
  STYPE = ARRAY [0..1499] OF STRING[36+MAXOPSIZE];      (* LAF 861120 *)
VAR
  NAME: OPNAME;
  CODE: INTEGER;
  CLASS: INTEGER;
  N: INTEGER;
  OPFILE,NOPCODES_FILE: TEXT;
  S: ^STYPE;
  I: INTEGER;


PROCEDURE PUTITOUT(NAME: OPNAME; CODE: INTEGER; CLASS: INTEGER);
VAR
  I: INTEGER;
  T: STRING[80];
BEGIN
  SETSTRLEN(S^[N],0);
  IF CODE>=32768 THEN CODE:=CODE-65536;
  IF CODE=-32768 THEN
    STRWRITE(S^[N], 1, I,
      'OPREC[NAME:''', NAME,'':MAXOPSIZE-STRLEN(NAME), ''',',   (* LAF 861120 *)
	    'CODE:-32767-1,',
	    'CLASS:', CLASS:1,   ']')
  ELSE
    STRWRITE(S^[N], 1, I,
      'OPREC[NAME:''', NAME,'':MAXOPSIZE-STRLEN(NAME), ''',',   (* LAF 861120 *)
	    'CODE:',   CODE:6,   ',',
	    'CLASS:', CLASS:3,   ']');
  WRITELN(N:4,'  ',S^[N]);
  IF N>0 THEN
    BEGIN
    I:=N;
    WHILE S^[I]<S^[I-1] DO
      BEGIN
      T:=S^[I]; S^[I]:=S^[I-1]; S^[I-1]:=T;
      I:=I-1;
      END;
    END;
  N:=N+1;
END;


$include 'OPINITFP'$

  PROCEDURE PUTOPS;
  BEGIN

  { Dy,Dx }
  { -(Ay),-(Ax) }
  { |---+---+---+---|---+---+---|---+---+---+---+---|---|---+---+---| }
  { |***************|    Rx     |*******************|R/M|    Ry     | }
  { |---+---+---+---|---+---+---|---+---+---+---+---|---|---+---+---| }
  PUTITOUT( 'SBCD',     OCTAL('100400'),  1);
  PUTITOUT( 'ABCD',     OCTAL('140400'),  1);

  { <ea>,Dn }
  { Dn,<ea> }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    Dn     |  OpMode   |          EA           | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'SUB',      OCTAL('110000'),  2);
  PUTITOUT( 'SUB.B',    OCTAL('110000'),  2);
  PUTITOUT( 'SUB.L',    OCTAL('110000'),  2);
  PUTITOUT( 'SUB.W',    OCTAL('110000'),  2);
  PUTITOUT( 'SUBA',     OCTAL('110000'),  2);
  PUTITOUT( 'SUBA.L',   OCTAL('110000'),  2);
  PUTITOUT( 'SUBA.W',   OCTAL('110000'),  2);
  PUTITOUT( 'ADD',      OCTAL('150000'),  2);
  PUTITOUT( 'ADD.B',    OCTAL('150000'),  2);
  PUTITOUT( 'ADD.L',    OCTAL('150000'),  2);
  PUTITOUT( 'ADD.W',    OCTAL('150000'),  2);
  PUTITOUT( 'ADDA',     OCTAL('150000'),  2);
  PUTITOUT( 'ADDA.L',   OCTAL('150000'),  2);
  PUTITOUT( 'ADDA.W',   OCTAL('150000'),  2);

  { #<data>,<ea> }
  { |---+---+---+---|---+---+---|---|---+---|---+---+---+---+---+---| }
  { |***************|   Data    |***| Size  |          EA           | }
  { |---+---+---+---|---+---+---|---|---+---|---+---+---+---+---+---| }
  PUTITOUT( 'ADDQ',     OCTAL('050000'),  3);
  PUTITOUT( 'ADDQ.B',   OCTAL('050000'),  3);
  PUTITOUT( 'ADDQ.L',   OCTAL('050000'),  3);
  PUTITOUT( 'ADDQ.W',   OCTAL('050000'),  3);
  PUTITOUT( 'SUBQ',     OCTAL('050400'),  3);
  PUTITOUT( 'SUBQ.B',   OCTAL('050400'),  3);
  PUTITOUT( 'SUBQ.L',   OCTAL('050400'),  3);
  PUTITOUT( 'SUBQ.W',   OCTAL('050400'),  3);

  { Dy,Dx }
  { -(Ay),-(Ax) }
  { |---+---+---+---|---+---+---|---|---+---|---+---|---|---+---+---| }
  { |***************|    Rx     |***| Size  |*******|R/M|    Ry     | }
  { |---+---+---+---|---+---+---|---|---+---|---+---|---|---+---+---| }
  PUTITOUT( 'SUBX',     OCTAL('110400'),  4);
  PUTITOUT( 'SUBX.B',   OCTAL('110400'),  4);
  PUTITOUT( 'SUBX.L',   OCTAL('110400'),  4);
  PUTITOUT( 'SUBX.W',   OCTAL('110400'),  4);
  PUTITOUT( 'ADDX',     OCTAL('150400'),  4);
  PUTITOUT( 'ADDX.B',   OCTAL('150400'),  4);
  PUTITOUT( 'ADDX.L',   OCTAL('150400'),  4);
  PUTITOUT( 'ADDX.W',   OCTAL('150400'),  4);

  { <ea>,Dn }
  { Dn,<ea> }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    Dn     |  OpMode   |          EA           | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'OR',       OCTAL('100000'),  5);
  PUTITOUT( 'OR.B',     OCTAL('100000'),  5);
  PUTITOUT( 'OR.L',     OCTAL('100000'),  5);
  PUTITOUT( 'OR.W',     OCTAL('100000'),  5);
  PUTITOUT( 'AND',      OCTAL('140000'),  5);
  PUTITOUT( 'AND.B',    OCTAL('140000'),  5);
  PUTITOUT( 'AND.L',    OCTAL('140000'),  5);
  PUTITOUT( 'AND.W',    OCTAL('140000'),  5);

  { Dx,Dy }
  { #<data>,Dy }
  { <ea> }
  { |---+---+---+---|---+---+---|---|---+---|---|---+---|---+---+---| }
  { |***************|   Count   |dr | Size  |i/r|*******|    Dn     | }
  { |---+---+---+---|---+---+---|---|---+---|---|---+---|---+---+---| }
  PUTITOUT( 'ASR',      OCTAL('160300'),  6);
  PUTITOUT( 'ASR.B',    OCTAL('160300'),  6);
  PUTITOUT( 'ASR.L',    OCTAL('160300'),  6);
  PUTITOUT( 'ASR.W',    OCTAL('160300'),  6);
  PUTITOUT( 'ASL',      OCTAL('160700'),  6);
  PUTITOUT( 'ASL.B',    OCTAL('160700'),  6);
  PUTITOUT( 'ASL.L',    OCTAL('160700'),  6);
  PUTITOUT( 'ASL.W',    OCTAL('160700'),  6);
  PUTITOUT( 'LSR',      OCTAL('161310'),  6);
  PUTITOUT( 'LSR.B',    OCTAL('161310'),  6);
  PUTITOUT( 'LSR.L',    OCTAL('161310'),  6);
  PUTITOUT( 'LSR.W',    OCTAL('161310'),  6);
  PUTITOUT( 'LSL',      OCTAL('161710'),  6);
  PUTITOUT( 'LSL.B',    OCTAL('161710'),  6);
  PUTITOUT( 'LSL.L',    OCTAL('161710'),  6);
  PUTITOUT( 'LSL.W',    OCTAL('161710'),  6);
  PUTITOUT( 'ROXR',     OCTAL('162320'),  6);
  PUTITOUT( 'ROXR.B',   OCTAL('162320'),  6);
  PUTITOUT( 'ROXR.L',   OCTAL('162320'),  6);
  PUTITOUT( 'ROXR.W',   OCTAL('162320'),  6);
  PUTITOUT( 'ROXL',     OCTAL('162720'),  6);
  PUTITOUT( 'ROXL.B',   OCTAL('162720'),  6);
  PUTITOUT( 'ROXL.L',   OCTAL('162720'),  6);
  PUTITOUT( 'ROXL.W',   OCTAL('162720'),  6);
  PUTITOUT( 'ROR',      OCTAL('163330'),  6);
  PUTITOUT( 'ROR.B',    OCTAL('163330'),  6);
  PUTITOUT( 'ROR.L',    OCTAL('163330'),  6);
  PUTITOUT( 'ROR.W',    OCTAL('163330'),  6);
  PUTITOUT( 'ROL',      OCTAL('163730'),  6);
  PUTITOUT( 'ROL.B',    OCTAL('163730'),  6);
  PUTITOUT( 'ROL.L',    OCTAL('163730'),  6);
  PUTITOUT( 'ROL.W',    OCTAL('163730'),  6);

  { <label> }
  { |---+---+---+---+---+---+---+---|---+---+---+---+---+---+---+---| }
  { |*******************************|         Displacement          | }
  { |---+---+---+---+---+---+---+---|---+---+---+---+---+---+---+---| }
  { |                      16-bit displacement                      | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  { |                      32-bit displacement                      | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'BRA',          HEX('6000'),  7);
  PUTITOUT( 'BRA.B',        HEX('6000'),  7);
  PUTITOUT( 'BRA.L',        HEX('6000'),  7);
  PUTITOUT( 'BRA.S',        HEX('6000'),  7);
  PUTITOUT( 'BRA.W',        HEX('6000'),  7);
  PUTITOUT( 'BSR',          HEX('6100'),  7);
  PUTITOUT( 'BSR.B',        HEX('6100'),  7);
  PUTITOUT( 'BSR.L',        HEX('6100'),  7);
  PUTITOUT( 'BSR.S',        HEX('6100'),  7);
  PUTITOUT( 'BSR.W',        HEX('6100'),  7);
  PUTITOUT( 'BHI',          HEX('6200'),  7);
  PUTITOUT( 'BHI.B',        HEX('6200'),  7);
  PUTITOUT( 'BHI.L',        HEX('6200'),  7);
  PUTITOUT( 'BHI.S',        HEX('6200'),  7);
  PUTITOUT( 'BHI.W',        HEX('6200'),  7);
  PUTITOUT( 'BLS',          HEX('6300'),  7);
  PUTITOUT( 'BLS.B',        HEX('6300'),  7);
  PUTITOUT( 'BLS.L',        HEX('6300'),  7);
  PUTITOUT( 'BLS.S',        HEX('6300'),  7);
  PUTITOUT( 'BLS.W',        HEX('6300'),  7);
  PUTITOUT( 'BCC',          HEX('6400'),  7);
  PUTITOUT( 'BCC.B',        HEX('6400'),  7);
  PUTITOUT( 'BCC.L',        HEX('6400'),  7);
  PUTITOUT( 'BCC.S',        HEX('6400'),  7);
  PUTITOUT( 'BCC.W',        HEX('6400'),  7);
  PUTITOUT( 'BHS',          HEX('6400'),  7);
  PUTITOUT( 'BHS.B',        HEX('6400'),  7);
  PUTITOUT( 'BHS.L',        HEX('6400'),  7);
  PUTITOUT( 'BHS.S',        HEX('6400'),  7);
  PUTITOUT( 'BHS.W',        HEX('6400'),  7);
  PUTITOUT( 'BCS',          HEX('6500'),  7);
  PUTITOUT( 'BCS.B',        HEX('6500'),  7);
  PUTITOUT( 'BCS.L',        HEX('6500'),  7);
  PUTITOUT( 'BCS.S',        HEX('6500'),  7);
  PUTITOUT( 'BCS.W',        HEX('6500'),  7);
  PUTITOUT( 'BLO',          HEX('6500'),  7);
  PUTITOUT( 'BLO.B',        HEX('6500'),  7);
  PUTITOUT( 'BLO.L',        HEX('6500'),  7);
  PUTITOUT( 'BLO.S',        HEX('6500'),  7);
  PUTITOUT( 'BLO.W',        HEX('6500'),  7);
  PUTITOUT( 'BNE',          HEX('6600'),  7);
  PUTITOUT( 'BNE.B',        HEX('6600'),  7);
  PUTITOUT( 'BNE.L',        HEX('6600'),  7);
  PUTITOUT( 'BNE.S',        HEX('6600'),  7);
  PUTITOUT( 'BNE.W',        HEX('6600'),  7);
  PUTITOUT( 'BEQ',          HEX('6700'),  7);
  PUTITOUT( 'BEQ.B',        HEX('6700'),  7);
  PUTITOUT( 'BEQ.L',        HEX('6700'),  7);
  PUTITOUT( 'BEQ.S',        HEX('6700'),  7);
  PUTITOUT( 'BEQ.W',        HEX('6700'),  7);
  PUTITOUT( 'BVC',          HEX('6800'),  7);
  PUTITOUT( 'BVC.B',        HEX('6800'),  7);
  PUTITOUT( 'BVC.L',        HEX('6800'),  7);
  PUTITOUT( 'BVC.S',        HEX('6800'),  7);
  PUTITOUT( 'BVC.W',        HEX('6800'),  7);
  PUTITOUT( 'BVS',          HEX('6900'),  7);
  PUTITOUT( 'BVS.B',        HEX('6900'),  7);
  PUTITOUT( 'BVS.L',        HEX('6900'),  7);
  PUTITOUT( 'BVS.S',        HEX('6900'),  7);
  PUTITOUT( 'BVS.W',        HEX('6900'),  7);
  PUTITOUT( 'BPL',          HEX('6A00'),  7);
  PUTITOUT( 'BPL.B',        HEX('6A00'),  7);
  PUTITOUT( 'BPL.L',        HEX('6A00'),  7);
  PUTITOUT( 'BPL.S',        HEX('6A00'),  7);
  PUTITOUT( 'BPL.W',        HEX('6A00'),  7);
  PUTITOUT( 'BMI',          HEX('6B00'),  7);
  PUTITOUT( 'BMI.B',        HEX('6B00'),  7);
  PUTITOUT( 'BMI.L',        HEX('6B00'),  7);
  PUTITOUT( 'BMI.S',        HEX('6B00'),  7);
  PUTITOUT( 'BMI.W',        HEX('6B00'),  7);
  PUTITOUT( 'BGE',          HEX('6C00'),  7);
  PUTITOUT( 'BGE.B',        HEX('6C00'),  7);
  PUTITOUT( 'BGE.L',        HEX('6C00'),  7);
  PUTITOUT( 'BGE.S',        HEX('6C00'),  7);
  PUTITOUT( 'BGE.W',        HEX('6C00'),  7);
  PUTITOUT( 'BLT',          HEX('6D00'),  7);
  PUTITOUT( 'BLT.B',        HEX('6D00'),  7);
  PUTITOUT( 'BLT.L',        HEX('6D00'),  7);
  PUTITOUT( 'BLT.S',        HEX('6D00'),  7);
  PUTITOUT( 'BLT.W',        HEX('6D00'),  7);
  PUTITOUT( 'BGT',          HEX('6E00'),  7);
  PUTITOUT( 'BGT.B',        HEX('6E00'),  7);
  PUTITOUT( 'BGT.L',        HEX('6E00'),  7);
  PUTITOUT( 'BGT.S',        HEX('6E00'),  7);
  PUTITOUT( 'BGT.W',        HEX('6E00'),  7);
  PUTITOUT( 'BLE',          HEX('6F00'),  7);
  PUTITOUT( 'BLE.B',        HEX('6F00'),  7);
  PUTITOUT( 'BLE.L',        HEX('6F00'),  7);
  PUTITOUT( 'BLE.S',        HEX('6F00'),  7);
  PUTITOUT( 'BLE.W',        HEX('6F00'),  7);

  { Dn,<ea> }
  { #<data>,<ea> }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    Dn     |***********|          EA           | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'BTST',     OCTAL('000400'),  8);
  PUTITOUT( 'BCHG',     OCTAL('000500'),  8);
  PUTITOUT( 'BCLR',     OCTAL('000600'),  8);
  PUTITOUT( 'BSET',     OCTAL('000700'),  8);

  { <ea>,Dn }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    Dn     |   Size    |          EA           | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'DIVU',     OCTAL('100300'),  9);
  PUTITOUT( 'DIVU.W',   OCTAL('100300'),  9);
  PUTITOUT( 'DIVS',     OCTAL('100700'),  9);
  PUTITOUT( 'DIVS.W',   OCTAL('100700'),  9);
  PUTITOUT( 'MULU',     OCTAL('140300'),  9);
  PUTITOUT( 'MULU.W',   OCTAL('140300'),  9);
  PUTITOUT( 'MULS',     OCTAL('140700'),  9);
  PUTITOUT( 'MULS.W',   OCTAL('140700'),  9);
  PUTITOUT( 'CHK.L',    OCTAL('040400'),  9);
  PUTITOUT( 'CHK',      OCTAL('040600'),  9);
  PUTITOUT( 'CHK.W',    OCTAL('040600'),  9);

  { <ea> }
  { |---+---+---+---+---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************************|   Size    |          EA           | }
  { |---+---+---+---+---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'NEGX',     OCTAL('040000'), 10);
  PUTITOUT( 'NEGX.B',   OCTAL('040000'), 10);
  PUTITOUT( 'NEGX.L',   OCTAL('040000'), 10);
  PUTITOUT( 'NEGX.W',   OCTAL('040000'), 10);
  PUTITOUT( 'CLR',      OCTAL('041000'), 10);
  PUTITOUT( 'CLR.B',    OCTAL('041000'), 10);
  PUTITOUT( 'CLR.L',    OCTAL('041000'), 10);
  PUTITOUT( 'CLR.W',    OCTAL('041000'), 10);
  PUTITOUT( 'NEG',      OCTAL('042000'), 10);
  PUTITOUT( 'NEG.B',    OCTAL('042000'), 10);
  PUTITOUT( 'NEG.L',    OCTAL('042000'), 10);
  PUTITOUT( 'NEG.W',    OCTAL('042000'), 10);
  PUTITOUT( 'NOT',      OCTAL('043000'), 10);
  PUTITOUT( 'NOT.B',    OCTAL('043000'), 10);
  PUTITOUT( 'NOT.L',    OCTAL('043000'), 10);
  PUTITOUT( 'NOT.W',    OCTAL('043000'), 10);
  PUTITOUT( 'TST',      OCTAL('045000'), 10);
  PUTITOUT( 'TST.B',    OCTAL('045000'), 10);
  PUTITOUT( 'TST.L',    OCTAL('045000'), 10);
  PUTITOUT( 'TST.W',    OCTAL('045000'), 10);

  { <ea>,Dn }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    Dn     |  OpMode   |          EA           | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'CMP',      OCTAL('130000'), 11);
  PUTITOUT( 'CMP.B',    OCTAL('130000'), 11);
  PUTITOUT( 'CMP.L',    OCTAL('130000'), 11);
  PUTITOUT( 'CMP.W',    OCTAL('130000'), 11);
  PUTITOUT( 'CMPA',     OCTAL('130000'), 11);
  PUTITOUT( 'CMPA.L',   OCTAL('130000'), 11);
  PUTITOUT( 'CMPA.W',   OCTAL('130000'), 11);

  { #<data> }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  { |***************************************************************| }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  { |                        Immediate Data                         | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'STOP',     OCTAL('047162'), 12);
  PUTITOUT( 'RTD',      OCTAL('047164'), 12);

  { Dn,<label> }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |***************************************************|    Dn     | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |                      16-bit displacement                      | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'DBT',          HEX('50C8'), 13);
  PUTITOUT( 'DBF',          HEX('51C8'), 13);
  PUTITOUT( 'DBRA',         HEX('51C8'), 13);
  PUTITOUT( 'DBHI',         HEX('52C8'), 13);
  PUTITOUT( 'DBLS',         HEX('53C8'), 13);
  PUTITOUT( 'DBCC',         HEX('54C8'), 13);
  PUTITOUT( 'DBHS',         HEX('54C8'), 13);
  PUTITOUT( 'DBCS',         HEX('55C8'), 13);
  PUTITOUT( 'DBLO',         HEX('55C8'), 13);
  PUTITOUT( 'DBNE',         HEX('56C8'), 13);
  PUTITOUT( 'DBEQ',         HEX('57C8'), 13);
  PUTITOUT( 'DBVC',         HEX('58C8'), 13);
  PUTITOUT( 'DBVS',         HEX('59C8'), 13);
  PUTITOUT( 'DBPL',         HEX('5AC8'), 13);
  PUTITOUT( 'DBMI',         HEX('5BC8'), 13);
  PUTITOUT( 'DBGE',         HEX('5CC8'), 13);
  PUTITOUT( 'DBLT',         HEX('5DC8'), 13);
  PUTITOUT( 'DBGT',         HEX('5EC8'), 13);
  PUTITOUT( 'DBLE',         HEX('5FC8'), 13);

  { Dn,<ea> }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    Dn     |  OpMode   |          EA           | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'EOR',      OCTAL('130000'), 14);
  PUTITOUT( 'EOR.B',    OCTAL('130000'), 14);
  PUTITOUT( 'EOR.L',    OCTAL('130000'), 14);
  PUTITOUT( 'EOR.W',    OCTAL('130000'), 14);

  { Dx,Dy }
  { Ax,Ay }
  { Dx,Ay }
  { |---+---+---+---|---+---+---|---|---+---+---+---+---|---+---+---| }
  { |***************|    Rx     |***|      OpMode       |    Ry     | }
  { |---+---+---+---|---+---+---|---|---+---+---+---+---|---+---+---| }
  PUTITOUT( 'EXG',      OCTAL('140400'), 15);

  { EXT    Dn }
  { EXT.W  Dn }
  { EXT.L  Dn }
  { EXTB.L Dn }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |***************************************************|    Dn     | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  PUTITOUT( 'EXT',      OCTAL('044200'), 16);
  PUTITOUT( 'EXT.W',    OCTAL('044200'), 16);
  PUTITOUT( 'EXT.L',    OCTAL('044300'), 16);
  PUTITOUT( 'EXTB.L',   OCTAL('044700'), 16);

  { <ea> }
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'PEA',      OCTAL('044100'), 17);
  PUTITOUT( 'JSR',      OCTAL('047200'), 17);
  PUTITOUT( 'JMP',      OCTAL('047300'), 17);

  { #<data>,<ea> }
  { |---+---+---+---+---+---+---+---|---+---|---+---+---+---+---+---| }
  { |*******************************| Size  |          EA           | }
  { |---+---+---+---+---+---+---+---|---+---|---+---+---+---+---+---| }
  { |          Word Data            |          Byte Data            | }
  { |---+---+---+---+---+---+---+---|---+---+---+---+---+---+---+---| }
  { |                          Long Data                            | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'SUBI',     OCTAL('002000'), 18);
  PUTITOUT( 'SUBI.B',   OCTAL('002000'), 18);
  PUTITOUT( 'SUBI.L',   OCTAL('002000'), 18);
  PUTITOUT( 'SUBI.W',   OCTAL('002000'), 18);
  PUTITOUT( 'ADDI',     OCTAL('003000'), 18);
  PUTITOUT( 'ADDI.B',   OCTAL('003000'), 18);
  PUTITOUT( 'ADDI.L',   OCTAL('003000'), 18);
  PUTITOUT( 'ADDI.W',   OCTAL('003000'), 18);
  PUTITOUT( 'CMPI',     OCTAL('006000'), 18);
  PUTITOUT( 'CMPI.B',   OCTAL('006000'), 18);
  PUTITOUT( 'CMPI.L',   OCTAL('006000'), 18);
  PUTITOUT( 'CMPI.W',   OCTAL('006000'), 18);

  { <ea>,An }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    An     |***********|          EA           | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'LEA',      OCTAL('040700'), 19);

  { An,#<displacement> }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |***************************************************|    An     | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |                          Word Data                            | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  { |                          Long Data                            | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'LINK.L',   OCTAL('044010'), 20);
  PUTITOUT( 'LINK',     OCTAL('047120'), 20);
  PUTITOUT( 'LINK.W',   OCTAL('047120'), 20);

  { <ea>,<ea> }
  { |---+---|---+---|---+---+---+---+---+---|---+---+---+---+---+---| }
  { |*******| Size  |          EA           |          EA           | }
  { |---+---|---+---|---+---+---+---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'MOVE',     OCTAL('000000'), 21);
  PUTITOUT( 'MOVE.B',   OCTAL('000000'), 21);
  PUTITOUT( 'MOVE.L',   OCTAL('000000'), 21);
  PUTITOUT( 'MOVE.W',   OCTAL('000000'), 21);
  PUTITOUT( 'MOVEA',    OCTAL('000100'), 21);
  PUTITOUT( 'MOVEA.L',  OCTAL('000100'), 21);
  PUTITOUT( 'MOVEA.W',  OCTAL('000100'), 21);

  { register list,<ea> }
  { <ea>,register list }
  { |---+---+---+---+---|---|---+---+---|---|---+---+---+---+---+---| }
  { |*******************|dr |***********|Sz |          EA           | }
  { |---+---+---+---+---|---|---+---+---|---|---+---+---+---+---+---| }
  { |                      Register List Mask                       | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'MOVEM',    OCTAL('044200'), 22);
  PUTITOUT( 'MOVEM.L',  OCTAL('044200'), 22);
  PUTITOUT( 'MOVEM.W',  OCTAL('044200'), 22);

  { Dx,d(Ay) }
  { d(Ay),Dx }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---|---+---+---| }
  { |***************|    Dx     |  OpMode   |***********|    Ay     | }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---|---+---+---| }
  { |                         Displacement                          | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'MOVEP',    OCTAL('000010'), 23);
  PUTITOUT( 'MOVEP.L',  OCTAL('000010'), 23);
  PUTITOUT( 'MOVEP.W',  OCTAL('000010'), 23);

  { #<data>,Dn }
  { |---+---+---+---|---+---+---|---|---+---+---+---+---+---+---+---| }
  { |***************|    Dn     |***|             Data              | }
  { |---+---+---+---|---+---+---|---|---+---+---+---+---+---+---+---| }
  PUTITOUT( 'MOVEQ',    OCTAL('070000'), 24);

  { <ea> }
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  PUTITOUT( 'NBCD',     OCTAL('044000'), 25);
  PUTITOUT( 'TAS',      OCTAL('045300'), 25);
  PUTITOUT( 'ST',           HEX('50C0'), 25);
  PUTITOUT( 'SF',           HEX('51C0'), 25);
  PUTITOUT( 'SHI',          HEX('52C0'), 25);
  PUTITOUT( 'SLS',          HEX('53C0'), 25);
  PUTITOUT( 'SCC',          HEX('54C0'), 25);
  PUTITOUT( 'SHS',          HEX('54C0'), 25);
  PUTITOUT( 'SCS',          HEX('55C0'), 25);
  PUTITOUT( 'SLO',          HEX('55C0'), 25);
  PUTITOUT( 'SNE',          HEX('56C0'), 25);
  PUTITOUT( 'SEQ',          HEX('57C0'), 25);
  PUTITOUT( 'SVC',          HEX('58C0'), 25);
  PUTITOUT( 'SVS',          HEX('59C0'), 25);
  PUTITOUT( 'SPL',          HEX('5AC0'), 25);
  PUTITOUT( 'SMI',          HEX('5BC0'), 25);
  PUTITOUT( 'SGE',          HEX('5CC0'), 25);
  PUTITOUT( 'SLT',          HEX('5DC0'), 25);
  PUTITOUT( 'SGT',          HEX('5EC0'), 25);
  PUTITOUT( 'SLE',          HEX('5FC0'), 25);

  { }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  { |***************************************************************| }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'ILLEGAL',  OCTAL('045374'), 26);
  PUTITOUT( 'RESET',    OCTAL('047160'), 26);
  PUTITOUT( 'NOP',      OCTAL('047161'), 26);
  PUTITOUT( 'RTE',      OCTAL('047163'), 26);
  PUTITOUT( 'RTS',      OCTAL('047165'), 26);
  PUTITOUT( 'TRAPV',    OCTAL('047166'), 26);
  PUTITOUT( 'RTR',      OCTAL('047167'), 26);

  { #<data>,<ea> }
  { |---+---+---+---+---+---+---+---|---+---|---+---+---+---+---+---| }
  { |*******************************| Size  |          EA           | }
  { |---+---+---+---+---+---+---+---|---+---|---+---+---+---+---+---| }
  { |          Word Data            |          Byte Data            | }
  { |---+---+---+---+---+---+---+---|---+---+---+---+---+---+---+---| }
  { |                          Long Data                            | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'ORI',      OCTAL('000000'), 27);
  PUTITOUT( 'ORI.B',    OCTAL('000000'), 27);
  PUTITOUT( 'ORI.L',    OCTAL('000000'), 27);
  PUTITOUT( 'ORI.W',    OCTAL('000000'), 27);
  PUTITOUT( 'ANDI',     OCTAL('001000'), 27);
  PUTITOUT( 'ANDI.B',   OCTAL('001000'), 27);
  PUTITOUT( 'ANDI.L',   OCTAL('001000'), 27);
  PUTITOUT( 'ANDI.W',   OCTAL('001000'), 27);
  PUTITOUT( 'EORI',     OCTAL('005000'), 27);
  PUTITOUT( 'EORI.B',   OCTAL('005000'), 27);
  PUTITOUT( 'EORI.L',   OCTAL('005000'), 27);
  PUTITOUT( 'EORI.W',   OCTAL('005000'), 27);

  { Dn }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |***************************************************|    Dn     | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  PUTITOUT( 'SWAP',     OCTAL('044100'), 28);

  { #<vector> }
  { |---+---+---+---+---+---+---+---+---+---+---+---|---+---+---+---| }
  { |***********************************************|    Vector     | }
  { |---+---+---+---+---+---+---+---+---+---+---+---|---+---+---+---| }
  PUTITOUT( 'TRAP',     OCTAL('047100'), 29);

  { An }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |***************************************************|    An     | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  PUTITOUT( 'UNLK',     OCTAL('047130'), 30);

  { (Ay)+,(Ax)+ }
  { |---+---+---+---|---+---+---|---|---+---|---+---+---|---+---+---| }
  { |***************|    Ax     |***| Size  |***********|    Ay     | }
  { |---+---+---+---|---+---+---|---|---+---|---+---+---|---+---+---| }
  PUTITOUT( 'CMPM',     OCTAL('130410'), 31);
  PUTITOUT( 'CMPM.B',   OCTAL('130410'), 31);
  PUTITOUT( 'CMPM.L',   OCTAL('130410'), 31);
  PUTITOUT( 'CMPM.W',   OCTAL('130410'), 31);

  { Rn,Rc }
  { Rc,Rn }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---|---| }
  { |***********************************************************|dr | }
  { |---|---+---+---|---+---+---+---+---+---+---+---+---+---+---|---| }
  { |A/D| Register  |               Control Register                | }
  { |---|---+---+---|---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'MOVEC',    OCTAL('047172'), 32);

  { Rn,<ea> }
  { <ea>,Rn }
  { |---+---+---+---+---+---+---+---|---+---|---+---+---+---+---+---| }
  { |*******************************| Size  |          EA           | }
  { |---|---+---+---|---|---+---+---|---+---|---+---+---+---+---+---| }
  { |A/D| Register  |dr | 0   0   0   0   0   0   0   0   0   0   0 | }
  { |---|---+---+---|---|---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'MOVES',    OCTAL('007000'), 33);
  PUTITOUT( 'MOVES.B',  OCTAL('007000'), 33);
  PUTITOUT( 'MOVES.L',  OCTAL('007000'), 33);
  PUTITOUT( 'MOVES.W',  OCTAL('007000'), 33);

  { Rn }
  { |---+---+---+---+---+---+---+---+---+---+---+---|---|---+---+---| }
  { |***********************************************|D/A|    Rn     | }
  { |---+---+---+---+---+---+---+---+---+---+---+---|---|---+---+---| }
  PUTITOUT( 'RTM',      OCTAL('003300'), 34);

  { #<vector> }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |***************************************************|  Vector   | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  PUTITOUT( 'BKPT',     OCTAL('044110'), 35);

  { TRAPcc }
  { TRAPcc.W #<data> }
  { TRAPcc.L #<data> }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |***************************************************|  OpMode   | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---|---+---+---| }
  { |                          Word Data                            | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  { |                          Long Data                            | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'TRAPT.W',      HEX('50FA'), 36);
  PUTITOUT( 'TRAPT.L',      HEX('50FB'), 36);
  PUTITOUT( 'TRAPT',        HEX('50FC'), 36);
  PUTITOUT( 'TRAPF.W',      HEX('51FA'), 36);
  PUTITOUT( 'TRAPF.L',      HEX('51FB'), 36);
  PUTITOUT( 'TRAPF',        HEX('51FC'), 36);
  PUTITOUT( 'TRAPHI.W',     HEX('52FA'), 36);
  PUTITOUT( 'TRAPHI.L',     HEX('52FB'), 36);
  PUTITOUT( 'TRAPHI',       HEX('52FC'), 36);
  PUTITOUT( 'TRAPLS.W',     HEX('53FA'), 36);
  PUTITOUT( 'TRAPLS.L',     HEX('53FB'), 36);
  PUTITOUT( 'TRAPLS',       HEX('53FC'), 36);
  PUTITOUT( 'TRAPCC.W',     HEX('54FA'), 36);
  PUTITOUT( 'TRAPCC.L',     HEX('54FB'), 36);
  PUTITOUT( 'TRAPCC',       HEX('54FC'), 36);
  PUTITOUT( 'TRAPHS.W',     HEX('54FA'), 36);
  PUTITOUT( 'TRAPHS.L',     HEX('54FB'), 36);
  PUTITOUT( 'TRAPHS',       HEX('54FC'), 36);
  PUTITOUT( 'TRAPCS.W',     HEX('55FA'), 36);
  PUTITOUT( 'TRAPCS.L',     HEX('55FB'), 36);
  PUTITOUT( 'TRAPCS',       HEX('55FC'), 36);
  PUTITOUT( 'TRAPLO.W',     HEX('55FA'), 36);
  PUTITOUT( 'TRAPLO.L',     HEX('55FB'), 36);
  PUTITOUT( 'TRAPLO',       HEX('55FC'), 36);
  PUTITOUT( 'TRAPNE.W',     HEX('56FA'), 36);
  PUTITOUT( 'TRAPNE.L',     HEX('56FB'), 36);
  PUTITOUT( 'TRAPNE',       HEX('56FC'), 36);
  PUTITOUT( 'TRAPEQ.W',     HEX('57FA'), 36);
  PUTITOUT( 'TRAPEQ.L',     HEX('57FB'), 36);
  PUTITOUT( 'TRAPEQ',       HEX('57FC'), 36);
  PUTITOUT( 'TRAPVC.W',     HEX('58FA'), 36);
  PUTITOUT( 'TRAPVC.L',     HEX('58FB'), 36);
  PUTITOUT( 'TRAPVC',       HEX('58FC'), 36);
  PUTITOUT( 'TRAPVS.W',     HEX('59FA'), 36);
  PUTITOUT( 'TRAPVS.L',     HEX('59FB'), 36);
  PUTITOUT( 'TRAPVS',       HEX('59FC'), 36);
  PUTITOUT( 'TRAPPL.W',     HEX('5AFA'), 36);
  PUTITOUT( 'TRAPPL.L',     HEX('5AFB'), 36);
  PUTITOUT( 'TRAPPL',       HEX('5AFC'), 36);
  PUTITOUT( 'TRAPMI.W',     HEX('5BFA'), 36);
  PUTITOUT( 'TRAPMI.L',     HEX('5BFB'), 36);
  PUTITOUT( 'TRAPMI',       HEX('5BFC'), 36);
  PUTITOUT( 'TRAPGE.W',     HEX('5CFA'), 36);
  PUTITOUT( 'TRAPGE.L',     HEX('5CFB'), 36);
  PUTITOUT( 'TRAPGE',       HEX('5CFC'), 36);
  PUTITOUT( 'TRAPLT.W',     HEX('5DFA'), 36);
  PUTITOUT( 'TRAPLT.L',     HEX('5DFB'), 36);
  PUTITOUT( 'TRAPLT',       HEX('5DFC'), 36);
  PUTITOUT( 'TRAPGT.W',     HEX('5EFA'), 36);
  PUTITOUT( 'TRAPGT.L',     HEX('5EFB'), 36);
  PUTITOUT( 'TRAPGT',       HEX('5EFC'), 36);
  PUTITOUT( 'TRAPLE.W',     HEX('5FFA'), 36);
  PUTITOUT( 'TRAPLE.L',     HEX('5FFB'), 36);
  PUTITOUT( 'TRAPLE',       HEX('5FFC'), 36);

  { #<data>,<ea> }
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---+---+---+---+---+---+---+---|---+---|---+---+---+---+---+---| }
  { | 0   0   0   0   0   0   0   0 |        Argument Count         | }
  { |---+---+---+---+---+---+---+---|---+---+---+---+---+---+---+---| }
  PUTITOUT( 'CALLM',    OCTAL('003300'), 37);

  { Dc,Du,<ea> }
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---+---+---+---+---+---+---|---+---+---|---+---+---|---+---+---| }
  { | 0   0   0   0   0   0   0 |    Du     | 0   0   0 |    Dc     | }
  { |---+---+---+---+---+---+---|---+---+---|---+---+---|---+---+---| }
  PUTITOUT( 'CAS',      OCTAL('006300'), 38);
  PUTITOUT( 'CAS.B',    OCTAL('005300'), 38);
  PUTITOUT( 'CAS.W',    OCTAL('006300'), 38);
  PUTITOUT( 'CAS.L',    OCTAL('007300'), 38);

  { Dc1:Dc2,Du1:Du2,(Rn1):(Rn2) }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  { |***************************************************************| }
  { |---|---+---+---|---+---+---|---+---+---|---+---+---|---+---+---| }
  { |D/A|    Rn1    | 0   0   0 |    Du1    | 0   0   0 |    Dc1    | }
  { |---|---+---+---|---+---+---|---+---+---|---+---+---|---+---+---| }
  { |D/A|    Rn2    | 0   0   0 |    Du2    | 0   0   0 |    Dc2    | }
  { |---|---+---+---|---+---+---|---+---+---|---+---+---|---+---+---| }
  PUTITOUT( 'CAS2',     OCTAL('006374'), 39);
  PUTITOUT( 'CAS2.B',   OCTAL('005374'), 39);
  PUTITOUT( 'CAS2.W',   OCTAL('006374'), 39);
  PUTITOUT( 'CAS2.L',   OCTAL('007374'), 39);

  { <ea>,Rn }
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---|---+---+---|---|---+---+---+---+---|---+---+---+---+---+---| }
  { |D/A|    Rn     | S | 0   0   0   0   0   0   0   0   0   0   0 | }
  { |---|---+---+---|---|---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'CHK2',     OCTAL('001300'), 40);
  PUTITOUT( 'CHK2.B',   OCTAL('000300'), 40);
  PUTITOUT( 'CHK2.W',   OCTAL('001300'), 40);
  PUTITOUT( 'CHK2.L',   OCTAL('002300'), 40);
  PUTITOUT( 'CMP2',     OCTAL('001300'), 40);
  PUTITOUT( 'CMP2.B',   OCTAL('000300'), 40);
  PUTITOUT( 'CMP2.W',   OCTAL('001300'), 40);
  PUTITOUT( 'CMP2.L',   OCTAL('002300'), 40);

  { -(Ax),-(Ay),#,<adjustment> }
  { Dx,Dy,#,<adjustment> }
  { |---+---+---+---|---+---+---|---+---+---+---+---|---|---+---+---| }
  { |***************|   Dy/Ay   |*******************|R/M|   Dx/Ax   | }
  { |---+---+---+---|---+---+---|---+---+---+---+---|---|---+---+---| }
  { |                          Adjustment                           | }
  { |---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---| }
  PUTITOUT( 'PACK',     OCTAL('100500'), 41);
  PUTITOUT( 'UNPK',     OCTAL('100600'), 41);

  { <ea>{offset:width}
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---+---+---+---|---|---+---+---+---+---|---|---+---+---+---+---| }
  { | 0   0   0   0 |Do |      Offset       |Dw |       Width       | }
  { |---+---+---+---|---|---+---+---+---+---|---|---+---+---+---+---| }
  PUTITOUT( 'BFTST',    OCTAL('164300'), 42);
  PUTITOUT( 'BFCHG',    OCTAL('165300'), 42);
  PUTITOUT( 'BFCLR',    OCTAL('166300'), 42);
  PUTITOUT( 'BFSET',    OCTAL('167300'), 42);

  { <ea>{offset:width),Dn
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---+---+---+---|---|---+---+---+---+---|---|---+---+---+---+---| }
  { | 0 |    Dn     |Do |      Offset       |Dw |       Width       | }
  { |---+---+---+---|---|---+---+---+---+---|---|---+---+---+---+---| }
  PUTITOUT( 'BFEXTU',   OCTAL('164700'), 43);
  PUTITOUT( 'BFEXTS',   OCTAL('165700'), 43);
  PUTITOUT( 'BFFFO',    OCTAL('166700'), 43);

  { Dn,<ea>{offset:width}
  { |---+---+---+---+---+---+---+---+---+---|---+---+---+---+---+---| }
  { |***************************************|          EA           | }
  { |---+---+---+---|---|---+---+---+---+---|---|---+---+---+---+---| }
  { | 0 |    Dn     |Do |      Offset       |Dw |       Width       | }
  { |---+---+---+---|---|---+---+---+---+---|---|---+---+---+---+---| }
  PUTITOUT( 'BFINS',    OCTAL('167700'), 44);

  { <ea>,Dq }
  { <ea>,Dr:Dq }
  { <ea>,Dl }
  { <ea>,Dh:Dl }
  { |---+---+---+---|---+---+---|---+---+---|---+---+---+---+---+---| }
  { |***************|    Dn     |***********|          EA           | }
  { |---|---+---+---|---|---|---|---+---+---|---+---+---|---+---+---| }
  { | 0 |   Dq/Dl   |U/S|Sz | 0   0   0   0   0   0   0 |   Dr/Dh   | }
  { |---|---+---+---|---|---|---+---+---+---+---+---+---|---+---+---| }
  PUTITOUT( 'DIVU.L',   OCTAL('046100'), 45);
  PUTITOUT( 'DIVUL.L',  OCTAL('046100'), 45);
  PUTITOUT( 'DIVS.L',   OCTAL('046100'), 45);
  PUTITOUT( 'DIVSL.L',  OCTAL('046100'), 45);
  PUTITOUT( 'MULU.L',   OCTAL('046000'), 45);
  PUTITOUT( 'MULS.L',   OCTAL('046000'), 45);

  { MOVE16 ADDED FOR THE 68040 6/30/89 - JWH                          }
  { (Ax)+,(Ay)+  ( Post Increment Format )                            }
  { xxx.L,(Ay)+  ( Absolute Format )     op-mode : 01                 }
  { (Ay)+,xxx.L  ( Absolute Format )     op-mode : 00                 }
  { xxx.L,(Ay)   ( Absolute Format )     op-mode : 11                 }
  { (Ay) ,xxx.L  ( Absolute Format )     op-mode : 10                 }
  { Note - xxx here is an absolute long address.                      }
  { Also - I just fabricated class '46' for the MOVE16 instruction.   }

  { Post Increment Format :  4 bytes                                  }
  { |---+---+---+---|---+---+---+---|---+---+---+---|---|---+---+---| }
  { | 1   1   1   1 | 0   1   1   0 | 0   0   1   0 | 0 |Register Ax| }
  { |---|---+---+---|---+---+---+---|---+---+---+---|---+---+---+---| }
  { | 1 |Register Ay| 0   0   0   0 | 0   0   0   0 | 0   0   0   0 | }
  { |---|---+---+---|---+---+---+---|---+---+---+---|---+---+---+---| }

  { Absolute Format :  6 bytes                                        }
  { |---+---+---+---|---+---+---+---|---+---+---|---+---|---+---+---| }
  { | 1   1   1   1 | 0   1   1   0 | 0   0   0 |op-mode|Register Ay| }
  { |---|---+---+---|---+---+---+---|---+---+---|---+---+---+---+---| }
  { |                      HIGH  ORDER  ADDRESS                     | }
  { |---|---+---+---|---+---+---+---|---+---+---+---|---+---+---+---| }
  { |                      LOW   ORDER  ADDRESS                     | }
  { |---|---+---+---|---+---+---+---|---+---+---+---|---+---+---+---| }

  PUTITOUT( 'MOVE16',   octal('173000'),46);

  { CINV INSTRUCTION FAMILY ADDED FOR THE 68040 6/30/89 - JWH         }
  { Syntax :                                                    }
  { CINVL,CPUSHL   DC,(Ax)    Cache : 01 -  data cache          }
  { CINVL,CPUSHL   IC,(Ax)    Cache : 10 -  instruction cache   }
  { CINVL,CPUSHL   DC/IC,(Ax) Cache : 11 -  both caches         }
  { CINVP,CPUSHP   DC,(Ax)    Cache : 01 -  data cache          }
  { CINVP,CPUSHP   IC,(Ax)    Cache : 10 -  instruction cache   }
  { CINVP,CPUSHP   DC/IC,(Ax) Cache : 11 -  both caches         }
  { CINVA,CPUSHA   DC         Cache : 01 -  data cache          }
  { CINVA,CPUSHA   IC         Cache : 10 -  instruction cache   }
  { CINVA,CPUSHA   DC/IC      Cache : 11 -  both caches         }
  { Instruction Format, CINV :  2 bytes                               }
  { |---+---+---+---|---+---+---+---|---+---|---|---+---|---+---+---| }
  { | 1   1   1   1 | 0   1   0   0 | Cache | 0 | Scope |Register Ax| }
  { |---|---+---+---|---+---+---+---|---+---|---|---+---+---+---+---| }
  { Instruction Format, CPUSH :  2 bytes                              }
  { |---+---+---+---|---+---+---+---|---+---|---|---+---|---+---+---| }
  { | 1   1   1   1 | 0   1   0   0 | Cache | 1 | Scope |Register Ax| }
  { |---|---+---+---|---+---+---+---|---+---|---|---+---+---+---+---| }
  { CINVL,CPUSHL - Scope : 01 - ('L' for Line)                  }
  { CINVP,CPUSHP - Scope : 10 - ('P' for Page)                  }
  { CINVA,CPUSHA - Scope : 11 - ('A' for All)                   }
  {              - Scope : 00  Illegal Instruction              }

  PUTITOUT( 'CINVL',   octal('172000'),47);
  PUTITOUT( 'CINVP',   octal('172000'),48);
  PUTITOUT( 'CINVA',   octal('172000'),49);
  PUTITOUT( 'CPUSHL',   octal('172000'),50);
  PUTITOUT( 'CPUSHP',   octal('172000'),51);
  PUTITOUT( 'CPUSHA',   octal('172000'),52);

  END;

  PROCEDURE PUTPSEUDO;
  BEGIN
$if fpimmed$
  putitout( 'DC.D',                 1,   99);
  putitout( 'DS.D',                 2,   99);
  putitout( 'DS.P',                 2,   99);
  putitout( 'DS.S',                 2,   99);
  putitout( 'DS.X',                 2,   99);
$end$
  PUTITOUT( 'DC',                   1,   99);
  PUTITOUT( 'DC.B',                 1,   99);
  PUTITOUT( 'DC.L',                 1,   99);
  PUTITOUT( 'DC.W',                 1,   99);
  PUTITOUT( 'DS',                   2,   99);
  PUTITOUT( 'DS.B',                 2,   99);
  PUTITOUT( 'DS.L',                 2,   99);
  PUTITOUT( 'DS.W',                 2,   99);
  PUTITOUT( 'END',                  3,   99);
  PUTITOUT( 'MNAME',                4,   99);
  PUTITOUT( 'EQU',                  5,   99);
  PUTITOUT( 'SRC',                  6,   99);
  PUTITOUT( 'LIST',                 8,   99);
  PUTITOUT( 'LLEN',                 9,   99);
  PUTITOUT( 'NOL',                 10,   99);
  PUTITOUT( 'NOLIST',              10,   99);
  PUTITOUT( 'NOOBJ',               11,   99);
  PUTITOUT( 'NOPAGE',              12,   99);
  PUTITOUT( 'ORG',                 13,   99);
  PUTITOUT( 'ORG.L',               13,   99);
  PUTITOUT( 'PAGE',                14,   99);
  PUTITOUT( 'RORG',                15,   99);
  PUTITOUT( 'RORG.L',              15,   99);
  PUTITOUT( 'SPC',                 17,   99);
  PUTITOUT( 'TTL',                 18,   99);
  PUTITOUT( 'COM',                 19,   99);
  PUTITOUT( 'DEF',                 20,   99);
  PUTITOUT( 'REFA',                21,   99);
  PUTITOUT( 'REFR',                22,   99);
  PUTITOUT( 'LMODE',               25,   99);
  PUTITOUT( 'SMODE',               26,   99);
  PUTITOUT( 'RMODE',               27,   99);
  PUTITOUT( 'NOSYMS',              29,   99);
  PUTITOUT( 'INCLUDE',             30,   99);
  PUTITOUT( 'SPRINT',              31,   99);
  PUTITOUT( 'LPRINT',              32,   99);
  PUTITOUT( 'START',               33,   99);
  PUTITOUT( 'DECIMAL',             34,   99);
  END;



BEGIN  { MAIN PROGRAM }
NEW(S);
REWRITE(OPFILE,'ASSM:OPCODES.TEXT');
REWRITE(NOPCODES_FILE,'ASSM:NOPCODES.TEXT');
N:=0;
PUTITOUT( '  ????',   OCTAL('000000'),  0);  (* sentinel *)
$if mc68881$            (* flt. pt. coprocessor ops *)
  putfpops;
$end$
PUTOPS;
PUTPSEUDO;
FOR I:=0 TO N-2 DO
  WRITELN(OPFILE,S^[I],',');
WRITELN(OPFILE,S^[N-1]);
CLOSE(OPFILE,'SAVE');
WRITELN(NOPCODES_FILE);
WRITELN(NOPCODES_FILE,'NOPCODES = ',N-1:0,';   (* MAXIMUM OPCODE INDEX *)');
WRITELN(NOPCODES_FILE);
CLOSE(NOPCODES_FILE,'SAVE');
WRITELN(OUTPUT,N,' OPCODES.');
END.
@


55.1
log
@Automatic bump of revision number for PWS version 3.25A
@
text
@@


54.1
log
@Automatic bump of revision number for PWS version 3.24
@
text
@@


53.1
log
@Automatic bump of revision number for PWS version 3.24B
@
text
@@


52.1
log
@Automatic bump of revision number for PWS version 3.24A
@
text
@@


51.1
log
@Automatic bump of revision number for PWS version 3.24d
@
text
@@


50.1
log
@Automatic bump of revision number for PWS version 3.23c
@
text
@@


49.1
log
@Automatic bump of revision number for PWS version 3.24b
@
text
@@


48.1
log
@Automatic bump of revision number for PWS version 3.24a
@
text
@@


47.1
log
@Automatic bump of revision number for PWS version 3.23
@
text
@@


46.1
log
@Automatic bump of revision number for PWS version 3.23
@
text
@@


45.1
log
@Automatic bump of revision number for PWS version 3.23C
@
text
@@


44.1
log
@Automatic bump of revision number for PWS version 3.23B
@
text
@@


43.1
log
@Automatic bump of revision number for PWS version 3.23aA
@
text
@@


42.1
log
@Automatic bump of revision number for PWS version 3.23e
@
text
@@


41.2
log
@

         Corrected a comment. JWH 12/26/89.
@
text
@@


41.1
log
@Automatic bump of revision number for PWS version 3.23d
@
text
@d815 1
a815 1
  {              - Scope : 11  Illegal Instruction              }
@


40.2
log
@

          Added entries for the new 68040 instructions MOVE16,
     CINV (all versions) and CPUSH (all versions).

          JWH 11/21/89.

@
text
@@


40.1
log
@Automatic bump of revision number for PWS version 3.23c
@
text
@d766 58
@


39.1
log
@Automatic bump of revision number for PWS version 3.23b
@
text
@@


38.1
log
@Automatic bump of revision number for PWS version 3.23a
@
text
@@


37.1
log
@Automatic bump of revision number for PWS version 3.3a
@
text
@@


36.1
log
@Automatic bump of revision number for PWS version 3.22
@
text
@@


35.1
log
@Automatic bump of revision number for PWS version 3.22
@
text
@@


34.1
log
@Automatic bump of revision number for PWS version 3.22
@
text
@@


33.1
log
@Automatic bump of revision number for PWS version 3.22D
@
text
@@


32.1
log
@Automatic bump of revision number for PWS version 3.22C
@
text
@@


31.1
log
@Automatic bump of revision number for PWS version 3.22B
@
text
@@


30.1
log
@Automatic bump of revision number for PWS version 3.22A
@
text
@@


29.1
log
@Automatic bump of revision number for PWS version 3.22b
@
text
@@


28.1
log
@Automatic bump of revision number for PWS version 3.3b
@
text
@@


27.1
log
@Automatic bump of revision number for PWS version 3.3a
@
text
@@


26.1
log
@Automatic bump of revision number for PWS version 3.3 Synch
@
text
@@


25.1
log
@Automatic bump of revision number for PWS version 3.2Y
@
text
@@


24.1
log
@Automatic bump of revision number for PWS version 3.2
@
text
@@


23.1
log
@Automatic bump of revision number for PWS version 3.2P
@
text
@@


22.1
log
@Automatic bump of revision number for PWS version 3.2N
@
text
@@


21.1
log
@Automatic bump of revision number for PWS version 3.2M
@
text
@@


20.1
log
@Automatic bump of revision number for PWS version 3.2L
@
text
@@


19.1
log
@Automatic bump of revision number for PWS version 3.2K
@
text
@@


18.1
log
@Automatic bump of revision number for PWS version 3.2J
@
text
@@


17.1
log
@Automatic bump of revision number for PWS version 3.2I+
@
text
@@


16.1
log
@Automatic bump of revision number for PWS version 3.2I
@
text
@@


15.1
log
@Automatic bump of revision number for PWS version 3.2H
@
text
@@


14.1
log
@Automatic bump of revision number for PWS version 3.2G
@
text
@@


13.1
log
@Automatic bump of revision number for PWS version 3.2F
@
text
@@


12.1
log
@Automatic bump of revision number for PWS version 3.2E
@
text
@@


11.1
log
@Automatic bump of revision number for PWS version 3.2D
@
text
@@


10.1
log
@Automatic bump of revision number for PWS version 3.2C
@
text
@@


9.1
log
@Automatic bump of revision number for PWS version 3.2B
@
text
@@


8.2
log
@bugs 682 & 784: add FINTRZ, add D & X to FSGLDIV & MUL,
  change FTcc & FTPcc to FTRAPcc
@
text
@@


8.1
log
@Automatic bump of revision number for PWS version 3.2A
@
text
@d9 2
d12 2
a13 2
  OPNAME=STRING[9];
  STYPE = ARRAY [0..1499] OF STRING[45];
d33 1
a33 1
      'OPREC[NAME:''', NAME,'':9-STRLEN(NAME), ''',',
d38 1
a38 1
      'OPREC[NAME:''', NAME,'':9-STRLEN(NAME), ''',',
@


7.1
log
@Automatic bump of revision number for PWS version 3.2l
@
text
@@


6.1
log
@Automatic bump of revision number for PWS version 3.2k
@
text
@@


5.1
log
@Automatic bump of revision number for PWS version 3.2j
@
text
@@


4.1
log
@Automatic bump of revision number for PWS version 3.2i
@
text
@@


3.1
log
@Automatic bump of revision number for PWS version 3.2h
@
text
@@


2.1
log
@Auto bump rev number to 2.1 for sys 3.2e.
@
text
@@


1.1
log
@Initial revision
@
text
@@
