Free Hero Mesh

Check-in [aa4fea4bb5]
Login
This is a mirror of the main repository for Free Hero Mesh. New tickets and changes will not be accepted at this mirror.
Overview
Comment:Add "min", "max", "eq2", "Coloc", and "Target" instructions.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: aa4fea4bb5f3bde9e4abd3a03ae0539342f201e4
User & Date: user on 2021-04-11 01:11:30
Other Links: manifest | tags
Context
2021-04-11
04:56
Start to implement loading dependent pictures (the file format isn't implemented yet, nor even defined yet, nor does the picture editor support this yet). check-in: e17ab8c4ed user: user tags: trunk
01:11
Add "min", "max", "eq2", "Coloc", and "Target" instructions. check-in: aa4fea4bb5 user: user tags: trunk
00:38
A few more additions to TODO check-in: 45284c54d0 user: user tags: trunk
Changes

Modified class.doc from [7f2eb9e655] to [59627fa4c6].

1134
1135
1136
1137
1138
1139
1140










1141
1142
1143
1144
1145
1146
1147
  Calculate the Chebyshev distance between this object and the specified
  object. If the specified object is zero, then the result is also zero.

,Chebyshev  ( obj1 obj2 -- number )
  Calculate the Chebyshev distance between thie two specified objects. If
  either specified object is zero, then the result is also zero.











Create  ( class x y image dir -- obj ) **
  Creates a new object at the specified location, and returns it. The
  result is zero if the class is zero, the coordinates are out of range,
  the object cannot be created due to the CollisionLayers, or if the new
  object is destroyed before its CREATE message returns.

cz?  ( any -- bool )







>
>
>
>
>
>
>
>
>
>







1134
1135
1136
1137
1138
1139
1140
1141
1142
1143
1144
1145
1146
1147
1148
1149
1150
1151
1152
1153
1154
1155
1156
1157
  Calculate the Chebyshev distance between this object and the specified
  object. If the specified object is zero, then the result is also zero.

,Chebyshev  ( obj1 obj2 -- number )
  Calculate the Chebyshev distance between thie two specified objects. If
  either specified object is zero, then the result is also zero.

Coloc  ( obj -- bool )
  True if this object and the specified object are in the same place, or
  false otherwise. Always false if the object is destroyed, or if one
  object is in the bizarro world and the other one isn't.

,Coloc  ( obj1 obj2 -- bool )
  True if the two specified objects are in the same place, or false
  otherwise. Always false if the object is destroyed, or if one object
  is in the bizarro world and the other one isn't.

Create  ( class x y image dir -- obj ) **
  Creates a new object at the specified location, and returns it. The
  result is zero if the class is zero, the coordinates are out of range,
  the object cannot be created due to the CollisionLayers, or if the new
  object is destroyed before its CREATE message returns.

cz?  ( any -- bool )
1168
1169
1170
1171
1172
1173
1174




1175
1176
1177
1178
1179
1180
1181
eq  ( in1 in2 -- bool )
  Test if they are equal. Sounds cannot be compared, but you can compare
  values of any other type. Strings compare as equal if they contain the
  same text. Object references are only equal if they refer to the same
  object; objects which no longer exist still compare correctly. Values
  of two different types are never equal to each other.





Finished  ( -- number )
  Returns the value of an internal flag which tells it that the beginning
  and ending phases should be skipped. This is a 8-bit number; zero means
  don't skip them, and any other number means it does. When the game engine
  sets this automatically, it normally sets it to 1, but "-1 FlushClass"
  during the input phase sets it to 255. When you set this value by
  yourself, you can use any 8-bit number.







>
>
>
>







1178
1179
1180
1181
1182
1183
1184
1185
1186
1187
1188
1189
1190
1191
1192
1193
1194
1195
eq  ( in1 in2 -- bool )
  Test if they are equal. Sounds cannot be compared, but you can compare
  values of any other type. Strings compare as equal if they contain the
  same text. Object references are only equal if they refer to the same
  object; objects which no longer exist still compare correctly. Values
  of two different types are never equal to each other.

eq2  ( in1 in2 in3 in4 -- bool )
  Test if in1 is equal to in3 and in2 is equal to in4. Comparison works
  the same way as the "eq" instruction.

Finished  ( -- number )
  Returns the value of an internal flag which tells it that the beginning
  and ending phases should be skipped. This is a 8-bit number; zero means
  don't skip them, and any other number means it does. When the game engine
  sets this automatically, it normally sets it to 1, but "-1 FlushClass"
  during the input phase sets it to 255. When you set this value by
  yourself, you can use any 8-bit number.
1327
1328
1329
1330
1331
1332
1333






1334
1335
1336
1337






1338
1339
1340
1341
1342
1343
1344
  Calculate the Manhattan distance between this object and the specified
  object. If the specified object is zero, then the result is also zero.

,Manhattan  ( obj1 obj2 -- number )
  Calculate the Manhattan distance between thie two specified objects. If
  either specified object is zero, then the result is also zero.







MaxInventory  ( number -- )
  Results in an error and loss of game if the number of different
  inventory items exceeds the given number, otherwise no effect.







mod  ( in1 in2 -- out )
  Unsigned divide in1 by in2 producing the remainder.

,mod  ( in1 in2 -- out )
  Signed divide in1 by in2 producing the remander.

Move  ( dir -- bool ) **







>
>
>
>
>
>




>
>
>
>
>
>







1341
1342
1343
1344
1345
1346
1347
1348
1349
1350
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1367
1368
1369
1370
  Calculate the Manhattan distance between this object and the specified
  object. If the specified object is zero, then the result is also zero.

,Manhattan  ( obj1 obj2 -- number )
  Calculate the Manhattan distance between thie two specified objects. If
  either specified object is zero, then the result is also zero.

max  ( in1 in2 -- out )
  Whichever input number is greater (unsigned).

,max  ( in1 in2 -- out )
  Whichever input number is greater (signed).

MaxInventory  ( number -- )
  Results in an error and loss of game if the number of different
  inventory items exceeds the given number, otherwise no effect.

min  ( in1 in2 -- out )
  Whichever input number is lesser (unsigned).

,min  ( in1 in2 -- out )
  Whichever input number is lesser (signed).

mod  ( in1 in2 -- out )
  Unsigned divide in1 by in2 producing the remainder.

,mod  ( in1 in2 -- out )
  Signed divide in1 by in2 producing the remander.

Move  ( dir -- bool ) **
1575
1576
1577
1578
1579
1580
1581








1582
1583
1584
1585
1586
1587
1588
swap  ( x y -- y x )

Synchronize  ( slot startimage -- ) **
  Start a synchronized animation. Give the slot number of the animation,
  and the starting image number. The length and speed are defined in a
  global definition, and the animation is always a non-oscillating loop.









tmark  ( any -- any true | false )
  If the input is a mark, then it is removed and the result is false.
  Otherwise, the value remains and true is added above it on the stack.

Trace  ( obj arg1 arg2 -- )
  If tracing is enabled, sends the three values and some other information
  on stdout. If tracing is disabled, does nothing. This is intended to be







>
>
>
>
>
>
>
>







1601
1602
1603
1604
1605
1606
1607
1608
1609
1610
1611
1612
1613
1614
1615
1616
1617
1618
1619
1620
1621
1622
swap  ( x y -- y x )

Synchronize  ( slot startimage -- ) **
  Start a synchronized animation. Give the slot number of the animation,
  and the starting image number. The length and speed are defined in a
  global definition, and the animation is always a non-oscillating loop.

Target  ( -- bool )
  Check if Arg1 and Arg2 are the coordinates of this object. It is an
  error if either Arg1 or Arg2 are not numbers.

,Target  ( obj -- bool )
  Check if Arg1 and Arg2 are the coordinates of the specified object. It
  is an error if either Arg1 or Arg2 are not numbers.

tmark  ( any -- any true | false )
  If the input is a mark, then it is removed and the result is false.
  Otherwise, the value remains and true is added above it on the stack.

Trace  ( obj arg1 arg2 -- )
  If tracing is enabled, sends the three values and some other information
  on stdout. If tracing is disabled, does nothing. This is intended to be

Modified exec.c from [d7feec84d8] to [866b9c6f26].

1495
1496
1497
1498
1499
1500
1501













1502
1503
1504
1505
1506
1507
1508
        if(vstackptr>=VSTACKSIZE-2) Throw("Stack overflow");
        Push(OVALUE(n));
      }
      n=o->up;
    }
  }
}














// Here is where the execution of a Free Hero Mesh bytecode subroutine is executed.
#define NoIgnore() do{ changed=1; }while(0)
#define GetVariableOf(a,b) (i=v_object(Pop()),i==VOIDLINK?NVALUE(0):b(objects[i]->a))
#define GetVariableOrAttributeOf(a,b) (t2=Pop(),t2.t==TY_CLASS?NVALUE(classes[t2.u]->a):(i=v_object(t2),i==VOIDLINK?NVALUE(0):b(objects[i]->a)))
#define Numeric(a) do{ if((a).t!=TY_NUMBER) Throw("Type mismatch"); }while(0)
#define DivideBy(a) do{ Numeric(a); if(!(a).u) Throw("Division by zero"); }while(0)







>
>
>
>
>
>
>
>
>
>
>
>
>







1495
1496
1497
1498
1499
1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
        if(vstackptr>=VSTACKSIZE-2) Throw("Stack overflow");
        Push(OVALUE(n));
      }
      n=o->up;
    }
  }
}

static inline int v_target(Uint32 n) {
  if(n==VOIDLINK) return 0;
  if(msgvars.arg1.t || msgvars.arg2.t) Throw("Type mismatch");
  return (objects[n]->x==msgvars.arg1.u && objects[n]->y==msgvars.arg2.u);
}

static int colocation(Uint32 a,Uint32 b) {
  if(a==VOIDLINK || b==VOIDLINK) return 0;
  if((objects[a]->oflags|objects[b]->oflags)&OF_DESTROYED) return 0;
  if((objects[a]->oflags^objects[b]->oflags)&OF_BIZARRO) return 0;
  return (objects[a]->x==objects[b]->x && objects[a]->y==objects[b]->y);
}

// Here is where the execution of a Free Hero Mesh bytecode subroutine is executed.
#define NoIgnore() do{ changed=1; }while(0)
#define GetVariableOf(a,b) (i=v_object(Pop()),i==VOIDLINK?NVALUE(0):b(objects[i]->a))
#define GetVariableOrAttributeOf(a,b) (t2=Pop(),t2.t==TY_CLASS?NVALUE(classes[t2.u]->a):(i=v_object(t2),i==VOIDLINK?NVALUE(0):b(objects[i]->a)))
#define Numeric(a) do{ if((a).t!=TY_NUMBER) Throw("Type mismatch"); }while(0)
#define DivideBy(a) do{ Numeric(a); if(!(a).u) Throw("Division by zero"); }while(0)
1604
1605
1606
1607
1608
1609
1610


1611
1612
1613
1614
1615
1616
1617
    case OP_CLIMB_C: StackReq(1,1); Push(GetVariableOrAttributeOf(climb,NVALUE)); break;
    case OP_CLIMB_E: NoIgnore(); StackReq(1,0); t1=Pop(); Numeric(t1); o->climb=t1.u; break;
    case OP_CLIMB_E16: NoIgnore(); StackReq(1,0); t1=Pop(); Numeric(t1); o->climb=t1.u&0xFFFF; break;
    case OP_CLIMB_EC: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) o->climb=t1.u; break;
    case OP_CLIMB_EC16: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) o->climb=t1.u&0xFFFF; break;
    case OP_COLLISIONLAYERS: StackReq(0,1); Push(NVALUE(classes[o->class]->collisionLayers)); break;
    case OP_COLLISIONLAYERS_C: StackReq(1,1); i=v_object(Pop()); if(i==VOIDLINK) Push(NVALUE(0)); else Push(NVALUE(classes[objects[i]->class]->collisionLayers)); break;


    case OP_COMPATIBLE: StackReq(0,1); if(classes[o->class]->cflags&CF_COMPATIBLE) Push(NVALUE(1)); else Push(NVALUE(0)); break;
    case OP_COMPATIBLE_C: StackReq(1,1); GetClassFlagOf(CF_COMPATIBLE); break;
    case OP_CREATE: NoIgnore(); StackReq(5,1); t5=Pop(); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); Push(v_create(obj,t1,t2,t3,t4,t5)); break;
    case OP_CREATE_D: NoIgnore(); StackReq(5,0); t5=Pop(); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); v_create(obj,t1,t2,t3,t4,t5); break;
    case OP_DELINVENTORY: StackReq(2,0); t2=Pop(); t1=Pop(); v_delete_inventory(t1,t2); break;
    case OP_DELTA: StackReq(2,1); t2=Pop(); Numeric(t2); t1=Pop(); Numeric(t1); Push(NVALUE(t1.u>t2.u?t1.u-t2.u:t2.u-t1.u)); break;
    case OP_DENSITY: StackReq(0,1); Push(NVALUE(o->density)); break;







>
>







1617
1618
1619
1620
1621
1622
1623
1624
1625
1626
1627
1628
1629
1630
1631
1632
    case OP_CLIMB_C: StackReq(1,1); Push(GetVariableOrAttributeOf(climb,NVALUE)); break;
    case OP_CLIMB_E: NoIgnore(); StackReq(1,0); t1=Pop(); Numeric(t1); o->climb=t1.u; break;
    case OP_CLIMB_E16: NoIgnore(); StackReq(1,0); t1=Pop(); Numeric(t1); o->climb=t1.u&0xFFFF; break;
    case OP_CLIMB_EC: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) o->climb=t1.u; break;
    case OP_CLIMB_EC16: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) o->climb=t1.u&0xFFFF; break;
    case OP_COLLISIONLAYERS: StackReq(0,1); Push(NVALUE(classes[o->class]->collisionLayers)); break;
    case OP_COLLISIONLAYERS_C: StackReq(1,1); i=v_object(Pop()); if(i==VOIDLINK) Push(NVALUE(0)); else Push(NVALUE(classes[objects[i]->class]->collisionLayers)); break;
    case OP_COLOC: StackReq(1,1); t1=Pop(); i=colocation(obj,v_object(t2)); Push(NVALUE(i)); break;
    case OP_COLOC_C: StackReq(2,1); t1=Pop(); t2=Pop(); i=colocation(v_object(t1),v_object(t2)); Push(NVALUE(i)); break;
    case OP_COMPATIBLE: StackReq(0,1); if(classes[o->class]->cflags&CF_COMPATIBLE) Push(NVALUE(1)); else Push(NVALUE(0)); break;
    case OP_COMPATIBLE_C: StackReq(1,1); GetClassFlagOf(CF_COMPATIBLE); break;
    case OP_CREATE: NoIgnore(); StackReq(5,1); t5=Pop(); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); Push(v_create(obj,t1,t2,t3,t4,t5)); break;
    case OP_CREATE_D: NoIgnore(); StackReq(5,0); t5=Pop(); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); v_create(obj,t1,t2,t3,t4,t5); break;
    case OP_DELINVENTORY: StackReq(2,0); t2=Pop(); t1=Pop(); v_delete_inventory(t1,t2); break;
    case OP_DELTA: StackReq(2,1); t2=Pop(); Numeric(t2); t1=Pop(); Numeric(t1); Push(NVALUE(t1.u>t2.u?t1.u-t2.u:t2.u-t1.u)); break;
    case OP_DENSITY: StackReq(0,1); Push(NVALUE(o->density)); break;
1649
1650
1651
1652
1653
1654
1655

1656
1657
1658
1659
1660
1661
1662
    case OP_DONE_C: StackReq(1,1); GetFlagOf(OF_DONE); break;
    case OP_DONE_E: StackReq(1,0); if(v_bool(Pop())) o->oflags|=OF_DONE; else o->oflags&=~OF_DONE; break;
    case OP_DONE_EC: StackReq(2,0); SetFlagOf(OF_DONE); break;
    case OP_DROP: StackReq(1,0); Pop(); break;
    case OP_DROP_D: StackReq(2,0); Pop(); Pop(); break;
    case OP_DUP: StackReq(1,2); t1=Pop(); Push(t1); Push(t1); break;
    case OP_EQ: StackReq(2,1); t2=Pop(); t1=Pop(); Push(NVALUE(v_equal(t1,t2)?1:0)); break;

    case OP_FINISHED: StackReq(0,1); Push(NVALUE(all_flushed)); break;
    case OP_FINISHED_E: StackReq(1,0); t1=Pop(); Numeric(t1); all_flushed=t1.u; break;
    case OP_FLIP: v_flip(); break;
    case OP_FLUSHCLASS: NoIgnore(); StackReq(1,0); t1=Pop(); if(t1.t==TY_CLASS) flush_class(t1.u); else if(t1.t==TY_NUMBER && t1.s==-1) flush_all(); else if(t1.t) Throw("Type mismatch"); break;
    case OP_FLUSHOBJ: NoIgnore(); flush_object(obj); break;
    case OP_FLUSHOBJ_C: NoIgnore(); StackReq(1,0); i=v_object(Pop()); if(i!=VOIDLINK) flush_object(i); break;
    case OP_FOR: NoIgnore(); StackReq(3,1); t3=Pop(); t2=Pop(); t1=Pop(); ptr=v_for(code,ptr,t1,t2,t3); break;







>







1664
1665
1666
1667
1668
1669
1670
1671
1672
1673
1674
1675
1676
1677
1678
    case OP_DONE_C: StackReq(1,1); GetFlagOf(OF_DONE); break;
    case OP_DONE_E: StackReq(1,0); if(v_bool(Pop())) o->oflags|=OF_DONE; else o->oflags&=~OF_DONE; break;
    case OP_DONE_EC: StackReq(2,0); SetFlagOf(OF_DONE); break;
    case OP_DROP: StackReq(1,0); Pop(); break;
    case OP_DROP_D: StackReq(2,0); Pop(); Pop(); break;
    case OP_DUP: StackReq(1,2); t1=Pop(); Push(t1); Push(t1); break;
    case OP_EQ: StackReq(2,1); t2=Pop(); t1=Pop(); Push(NVALUE(v_equal(t1,t2)?1:0)); break;
    case OP_EQ2: StackReq(4,1); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); Push(NVALUE(v_equal(t1,t3)?(v_equal(t2,t4)?1:0):0)); break;
    case OP_FINISHED: StackReq(0,1); Push(NVALUE(all_flushed)); break;
    case OP_FINISHED_E: StackReq(1,0); t1=Pop(); Numeric(t1); all_flushed=t1.u; break;
    case OP_FLIP: v_flip(); break;
    case OP_FLUSHCLASS: NoIgnore(); StackReq(1,0); t1=Pop(); if(t1.t==TY_CLASS) flush_class(t1.u); else if(t1.t==TY_NUMBER && t1.s==-1) flush_all(); else if(t1.t) Throw("Type mismatch"); break;
    case OP_FLUSHOBJ: NoIgnore(); flush_object(obj); break;
    case OP_FLUSHOBJ_C: NoIgnore(); StackReq(1,0); i=v_object(Pop()); if(i!=VOIDLINK) flush_object(i); break;
    case OP_FOR: NoIgnore(); StackReq(3,1); t3=Pop(); t2=Pop(); t1=Pop(); ptr=v_for(code,ptr,t1,t2,t3); break;
1727
1728
1729
1730
1731
1732
1733


1734


1735
1736
1737
1738
1739
1740
1741
    case OP_LSH: StackReq(2,1); t2=Pop(); Numeric(t2); t1=Pop(); Numeric(t1); Push(NVALUE(t2.u&~31?0:t1.u<<t2.u)); break;
    case OP_LT: StackReq(2,1); t2=Pop(); t1=Pop(); Push(NVALUE(v_unsigned_greater(t2,t1)?1:0)); break;
    case OP_LT_C: StackReq(2,1); t2=Pop(); t1=Pop(); Push(NVALUE(v_signed_greater(t2,t1)?1:0)); break;
    case OP_LXOR: StackReq(2,1); t1=Pop(); t2=Pop(); if(v_bool(t1)?!v_bool(t2):v_bool(t2)) Push(NVALUE(1)); else Push(NVALUE(0)); break;
    case OP_MANHATTAN: StackReq(1,1); t1=Pop(); i=manhattan(obj,v_object(t1)); Push(NVALUE(i)); break;
    case OP_MANHATTAN_C: StackReq(2,1); t2=Pop(); t1=Pop(); i=manhattan(v_object(t1),v_object(t2)); Push(NVALUE(i)); break;
    case OP_MARK: StackReq(0,1); Push(UVALUE(0,TY_MARK)); break;


    case OP_MAXINVENTORY: StackReq(1,0); t1=Pop(); Numeric(t1); if(ninventory>t1.u) Throw("Inventory overflow"); break;


    case OP_MINUSMOVE: StackReq(1,1); t1=Pop(); Numeric(t1); i=defer_move(obj,t1.u,0); Push(NVALUE(i)); break;
    case OP_MINUSMOVE_C: StackReq(2,1); t1=Pop(); Numeric(t1); i=v_object(Pop()); i=defer_move(i,t1.u,0); Push(NVALUE(i)); break;
    case OP_MINUSMOVE_D: StackReq(1,0); t1=Pop(); Numeric(t1); defer_move(obj,t1.u,0); break;
    case OP_MINUSMOVE_CD: StackReq(2,1); t1=Pop(); Numeric(t1); i=v_object(Pop()); defer_move(i,t1.u,0); break;
    case OP_MOD: StackReq(2,1); t2=Pop(); DivideBy(t2); t1=Pop(); Numeric(t1); Push(NVALUE(t1.u%t2.u)); break;
    case OP_MOD_C: StackReq(2,1); t2=Pop(); DivideBy(t2); t1=Pop(); Numeric(t1); Push(NVALUE(t1.s%t2.s)); break;
    case OP_MOVE: NoIgnore(); StackReq(1,1); t1=Pop(); Numeric(t1); o->inertia=o->strength; Push(NVALUE(move_dir(obj,obj,t1.u))); break;







>
>

>
>







1743
1744
1745
1746
1747
1748
1749
1750
1751
1752
1753
1754
1755
1756
1757
1758
1759
1760
1761
    case OP_LSH: StackReq(2,1); t2=Pop(); Numeric(t2); t1=Pop(); Numeric(t1); Push(NVALUE(t2.u&~31?0:t1.u<<t2.u)); break;
    case OP_LT: StackReq(2,1); t2=Pop(); t1=Pop(); Push(NVALUE(v_unsigned_greater(t2,t1)?1:0)); break;
    case OP_LT_C: StackReq(2,1); t2=Pop(); t1=Pop(); Push(NVALUE(v_signed_greater(t2,t1)?1:0)); break;
    case OP_LXOR: StackReq(2,1); t1=Pop(); t2=Pop(); if(v_bool(t1)?!v_bool(t2):v_bool(t2)) Push(NVALUE(1)); else Push(NVALUE(0)); break;
    case OP_MANHATTAN: StackReq(1,1); t1=Pop(); i=manhattan(obj,v_object(t1)); Push(NVALUE(i)); break;
    case OP_MANHATTAN_C: StackReq(2,1); t2=Pop(); t1=Pop(); i=manhattan(v_object(t1),v_object(t2)); Push(NVALUE(i)); break;
    case OP_MARK: StackReq(0,1); Push(UVALUE(0,TY_MARK)); break;
    case OP_MAX: StackReq(2,1); t1=Pop(); Numeric(t1); t2=Pop(); Numeric(t2); if(t1.u>t2.u) Push(t1); else Push(t2); break;
    case OP_MAX_C: StackReq(2,1); t1=Pop(); Numeric(t1); t2=Pop(); Numeric(t2); if(t1.s>t2.s) Push(t1); else Push(t2); break;
    case OP_MAXINVENTORY: StackReq(1,0); t1=Pop(); Numeric(t1); if(ninventory>t1.u) Throw("Inventory overflow"); break;
    case OP_MIN: StackReq(2,1); t1=Pop(); Numeric(t1); t2=Pop(); Numeric(t2); if(t1.u<t2.u) Push(t1); else Push(t2); break;
    case OP_MIN_C: StackReq(2,1); t1=Pop(); Numeric(t1); t2=Pop(); Numeric(t2); if(t1.s<t2.s) Push(t1); else Push(t2); break;
    case OP_MINUSMOVE: StackReq(1,1); t1=Pop(); Numeric(t1); i=defer_move(obj,t1.u,0); Push(NVALUE(i)); break;
    case OP_MINUSMOVE_C: StackReq(2,1); t1=Pop(); Numeric(t1); i=v_object(Pop()); i=defer_move(i,t1.u,0); Push(NVALUE(i)); break;
    case OP_MINUSMOVE_D: StackReq(1,0); t1=Pop(); Numeric(t1); defer_move(obj,t1.u,0); break;
    case OP_MINUSMOVE_CD: StackReq(2,1); t1=Pop(); Numeric(t1); i=v_object(Pop()); defer_move(i,t1.u,0); break;
    case OP_MOD: StackReq(2,1); t2=Pop(); DivideBy(t2); t1=Pop(); Numeric(t1); Push(NVALUE(t1.u%t2.u)); break;
    case OP_MOD_C: StackReq(2,1); t2=Pop(); DivideBy(t2); t1=Pop(); Numeric(t1); Push(NVALUE(t1.s%t2.s)); break;
    case OP_MOVE: NoIgnore(); StackReq(1,1); t1=Pop(); Numeric(t1); o->inertia=o->strength; Push(NVALUE(move_dir(obj,obj,t1.u))); break;
1846
1847
1848
1849
1850
1851
1852


1853
1854
1855
1856
1857
1858
1859
    case OP_STRENGTH_EC: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) objects[i]->strength=t1.u; break;
    case OP_STRENGTH_EC16: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) objects[i]->strength=t1.u&0xFFFF; break;
    case OP_STRING: StackReq(0,1); Push(UVALUE(code[ptr++],TY_STRING)); break;
    case OP_SOUND: StackReq(2,0); t2=Pop(); t1=Pop(); break; // Sound not implemented at this time
    case OP_SUB: StackReq(2,1); t2=Pop(); Numeric(t2); t1=Pop(); Numeric(t1); Push(NVALUE(t1.u-t2.u)); break;
    case OP_SWAP: StackReq(2,2); t1=Pop(); t2=Pop(); Push(t1); Push(t2); break;
    case OP_SYNCHRONIZE: StackReq(2,0); t2=Pop(); Numeric(t2); t1=Pop(); Numeric(t1); animate_sync(obj,t1.u,t2.u); break;


    case OP_TEMPERATURE: StackReq(0,1); Push(NVALUE(o->temperature)); break;
    case OP_TEMPERATURE_C: StackReq(1,1); Push(GetVariableOrAttributeOf(temperature,NVALUE)); break;
    case OP_TEMPERATURE_E: NoIgnore(); StackReq(1,0); t1=Pop(); Numeric(t1); o->temperature=t1.u; break;
    case OP_TEMPERATURE_E16: NoIgnore(); StackReq(1,0); t1=Pop(); Numeric(t1); o->temperature=t1.u&0xFFFF; break;
    case OP_TEMPERATURE_EC: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) objects[i]->temperature=t1.u; break;
    case OP_TEMPERATURE_EC16: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) objects[i]->temperature=t1.u&0xFFFF; break;
    case OP_TMARK: StackReq(1,2); t1=Pop(); if(t1.t==TY_MARK) { Push(NVALUE(0)); } else { Push(t1); Push(NVALUE(1)); } break;







>
>







1866
1867
1868
1869
1870
1871
1872
1873
1874
1875
1876
1877
1878
1879
1880
1881
    case OP_STRENGTH_EC: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) objects[i]->strength=t1.u; break;
    case OP_STRENGTH_EC16: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) objects[i]->strength=t1.u&0xFFFF; break;
    case OP_STRING: StackReq(0,1); Push(UVALUE(code[ptr++],TY_STRING)); break;
    case OP_SOUND: StackReq(2,0); t2=Pop(); t1=Pop(); break; // Sound not implemented at this time
    case OP_SUB: StackReq(2,1); t2=Pop(); Numeric(t2); t1=Pop(); Numeric(t1); Push(NVALUE(t1.u-t2.u)); break;
    case OP_SWAP: StackReq(2,2); t1=Pop(); t2=Pop(); Push(t1); Push(t2); break;
    case OP_SYNCHRONIZE: StackReq(2,0); t2=Pop(); Numeric(t2); t1=Pop(); Numeric(t1); animate_sync(obj,t1.u,t2.u); break;
    case OP_TARGET: StackReq(0,1); Push(NVALUE(v_target(obj)?1:0)); break;
    case OP_TARGET_C: StackReq(1,1); i=v_object(Pop()); Push(NVALUE(v_target(i)?1:0)); break;
    case OP_TEMPERATURE: StackReq(0,1); Push(NVALUE(o->temperature)); break;
    case OP_TEMPERATURE_C: StackReq(1,1); Push(GetVariableOrAttributeOf(temperature,NVALUE)); break;
    case OP_TEMPERATURE_E: NoIgnore(); StackReq(1,0); t1=Pop(); Numeric(t1); o->temperature=t1.u; break;
    case OP_TEMPERATURE_E16: NoIgnore(); StackReq(1,0); t1=Pop(); Numeric(t1); o->temperature=t1.u&0xFFFF; break;
    case OP_TEMPERATURE_EC: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) objects[i]->temperature=t1.u; break;
    case OP_TEMPERATURE_EC16: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) objects[i]->temperature=t1.u&0xFFFF; break;
    case OP_TMARK: StackReq(1,2); t1=Pop(); if(t1.t==TY_MARK) { Push(NVALUE(0)); } else { Push(t1); Push(NVALUE(1)); } break;

Modified instruc from [e27eafbe67] to [3d7b149248].

96
97
98
99
100
101
102


103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120

121
122
123
124
125
126
127
; Arithmetic
add "+"
sub "-"
,mul "*"
,div "/"
,mod
neg



; Bitwise
lsh
,rsh
band
bor
bxor
bnot
-bit

; Logical
land
lor
lxor
lnot

; Comparison
eq

ne
,gt
,lt
,ge
,le
is








>
>


















>







96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
; Arithmetic
add "+"
sub "-"
,mul "*"
,div "/"
,mod
neg
,min
,max

; Bitwise
lsh
,rsh
band
bor
bxor
bnot
-bit

; Logical
land
lor
lxor
lnot

; Comparison
eq
eq2
ne
,gt
,lt
,ge
,le
is

208
209
210
211
212
213
214

215
216
217
218
219
220
221
.Broadcast
*BroadcastClass ; for (Broadcast [class])
.BroadcastEx ; broadcast with three arguments
BroadcastSum ; Broadcast, but result is sum of return values
BroadcastSumEx
chain
,Chebyshev

.Create
DelInventory
Delta
.,Destroy
FlushClass
,FlushObj
GetInventory







>







211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
.Broadcast
*BroadcastClass ; for (Broadcast [class])
.BroadcastEx ; broadcast with three arguments
BroadcastSum ; Broadcast, but result is sum of return values
BroadcastSumEx
chain
,Chebyshev
,Coloc
.Create
DelInventory
Delta
.,Destroy
FlushClass
,FlushObj
GetInventory
249
250
251
252
253
254
255

256
257
258
259
260
261
262
,Rel
,Seek
.,Send
.,SendEx ; send with three arguments
SetInventory
Sound
Synchronize

Trace
VolumeAt
WinLevel
,XDir
XYDir
,YDir








>







253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
,Rel
,Seek
.,Send
.,SendEx ; send with three arguments
SetInventory
Sound
Synchronize
,Target
Trace
VolumeAt
WinLevel
,XDir
XYDir
,YDir

Modified instruc.h from [9467248115] to [caec67b4a9].

34
35
36
37
38
39
40




41
42
43
44
45
46
47
48
49
50
51
52
53

54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269

270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301


302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381


382
383
384
385

386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461

462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611

612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
#define OP_MUL 32793
#define OP_MUL_C 34841
#define OP_DIV 32794
#define OP_DIV_C 34842
#define OP_MOD 32795
#define OP_MOD_C 34843
#define OP_NEG 32796




#define OP_LSH 32797
#define OP_RSH 32798
#define OP_RSH_C 34846
#define OP_BAND 32799
#define OP_BOR 32800
#define OP_BXOR 32801
#define OP_BNOT 32802
#define OP_BIT 32803
#define OP_LAND 32804
#define OP_LOR 32805
#define OP_LXOR 32806
#define OP_LNOT 32807
#define OP_EQ 32808

#define OP_NE 32809
#define OP_GT 32810
#define OP_GT_C 34858
#define OP_LT 32811
#define OP_LT_C 34859
#define OP_GE 32812
#define OP_GE_C 34860
#define OP_LE 32813
#define OP_LE_C 34861
#define OP_IS 32814
#define OP_QN 32815
#define OP_QC 32816
#define OP_QCZ 32817
#define OP_QM 32818
#define OP_QS 32819
#define OP_QO 32820
#define OP_QOZ 32821
#define OP_QA 32822
#define OP_CLASS 32823
#define OP_CLASS_C 34871
#define OP_TEMPERATURE 32824
#define OP_TEMPERATURE_C 34872
#define OP_TEMPERATURE_E 36920
#define OP_TEMPERATURE_EC 38968
#define OP_TEMPERATURE_EC16 38969
#define OP_TEMPERATURE_E16 36921
#define OP_SHAPE 32826
#define OP_SHAPE_C 34874
#define OP_SHAPE_E 36922
#define OP_SHAPE_EC 38970
#define OP_XLOC 32827
#define OP_XLOC_C 34875
#define OP_YLOC 32828
#define OP_YLOC_C 34876
#define OP_DIR 32829
#define OP_DIR_C 34877
#define OP_DIR_E 36925
#define OP_DIR_EC 38973
#define OP_IMAGE 32830
#define OP_IMAGE_C 34878
#define OP_IMAGE_E 36926
#define OP_IMAGE_EC 38974
#define OP_INERTIA 32831
#define OP_INERTIA_C 34879
#define OP_INERTIA_E 36927
#define OP_INERTIA_EC 38975
#define OP_INERTIA_EC16 38976
#define OP_INERTIA_E16 36928
#define OP_DISTANCE 32833
#define OP_DISTANCE_C 34881
#define OP_DISTANCE_E 36929
#define OP_DISTANCE_EC 38977
#define OP_DISTANCE_EC16 38978
#define OP_DISTANCE_E16 36930
#define OP_DENSITY 32835
#define OP_DENSITY_C 34883
#define OP_DENSITY_E 36931
#define OP_DENSITY_EC 38979
#define OP_DENSITY_EC16 38980
#define OP_DENSITY_E16 36932
#define OP_VOLUME 32837
#define OP_VOLUME_C 34885
#define OP_VOLUME_E 36933
#define OP_VOLUME_EC 38981
#define OP_VOLUME_EC16 38982
#define OP_VOLUME_E16 36934
#define OP_WEIGHT 32839
#define OP_WEIGHT_C 34887
#define OP_WEIGHT_E 36935
#define OP_WEIGHT_EC 38983
#define OP_WEIGHT_EC16 38984
#define OP_WEIGHT_E16 36936
#define OP_HEIGHT 32841
#define OP_HEIGHT_C 34889
#define OP_HEIGHT_E 36937
#define OP_HEIGHT_EC 38985
#define OP_HEIGHT_EC16 38986
#define OP_HEIGHT_E16 36938
#define OP_CLIMB 32843
#define OP_CLIMB_C 34891
#define OP_CLIMB_E 36939
#define OP_CLIMB_EC 38987
#define OP_CLIMB_EC16 38988
#define OP_CLIMB_E16 36940
#define OP_STRENGTH 32845
#define OP_STRENGTH_C 34893
#define OP_STRENGTH_E 36941
#define OP_STRENGTH_EC 38989
#define OP_STRENGTH_EC16 38990
#define OP_STRENGTH_E16 36942
#define OP_HARD 32847
#define OP_HARD_C 34895
#define OP_HARD_E 36943
#define OP_HARD_EC 38991
#define OP_SHARP 32848
#define OP_SHARP_C 34896
#define OP_SHARP_E 36944
#define OP_SHARP_EC 38992
#define OP_SHAPEDIR 32849
#define OP_SHAPEDIR_C 34897
#define OP_SHAPEDIR_E 36945
#define OP_SHAPEDIR_EC 38993
#define OP_SHOVABLE 32850
#define OP_SHOVABLE_C 34898
#define OP_SHOVABLE_E 36946
#define OP_SHOVABLE_EC 38994
#define OP_MISC1 32851
#define OP_MISC1_C 34899
#define OP_MISC1_E 36947
#define OP_MISC1_EC 38995
#define OP_MISC1_EC16 38996
#define OP_MISC1_E16 36948
#define OP_MISC2 32853
#define OP_MISC2_C 34901
#define OP_MISC2_E 36949
#define OP_MISC2_EC 38997
#define OP_MISC2_EC16 38998
#define OP_MISC2_E16 36950
#define OP_MISC3 32855
#define OP_MISC3_C 34903
#define OP_MISC3_E 36951
#define OP_MISC3_EC 38999
#define OP_MISC3_EC16 39000
#define OP_MISC3_E16 36952
#define OP_MISC4 32857
#define OP_MISC4_C 34905
#define OP_MISC4_E 36953
#define OP_MISC4_EC 39001
#define OP_MISC4_EC16 39002
#define OP_MISC4_E16 36954
#define OP_MISC5 32859
#define OP_MISC5_C 34907
#define OP_MISC5_E 36955
#define OP_MISC5_EC 39003
#define OP_MISC5_EC16 39004
#define OP_MISC5_E16 36956
#define OP_MISC6 32861
#define OP_MISC6_C 34909
#define OP_MISC6_E 36957
#define OP_MISC6_EC 39005
#define OP_MISC6_EC16 39006
#define OP_MISC6_E16 36958
#define OP_MISC7 32863
#define OP_MISC7_C 34911
#define OP_MISC7_E 36959
#define OP_MISC7_EC 39007
#define OP_MISC7_EC16 39008
#define OP_MISC7_E16 36960
#define OP_ARRIVED 32865
#define OP_ARRIVED_C 34913
#define OP_ARRIVED_E 36961
#define OP_ARRIVED_EC 39009
#define OP_DEPARTED 32866
#define OP_DEPARTED_C 34914
#define OP_DEPARTED_E 36962
#define OP_DEPARTED_EC 39010
#define OP_ARRIVALS 32867
#define OP_ARRIVALS_C 34915
#define OP_ARRIVALS_E 36963
#define OP_ARRIVALS_EC 39011
#define OP_DEPARTURES 32868
#define OP_DEPARTURES_C 34916
#define OP_DEPARTURES_E 36964
#define OP_DEPARTURES_EC 39012
#define OP_BUSY 32869
#define OP_BUSY_C 34917
#define OP_BUSY_E 36965
#define OP_BUSY_EC 39013
#define OP_INVISIBLE 32870
#define OP_INVISIBLE_C 34918
#define OP_INVISIBLE_E 36966
#define OP_INVISIBLE_EC 39014
#define OP_KEYCLEARED 32871
#define OP_KEYCLEARED_C 34919
#define OP_KEYCLEARED_E 36967
#define OP_KEYCLEARED_EC 39015
#define OP_USERSIGNAL 32872
#define OP_USERSIGNAL_C 34920
#define OP_USERSIGNAL_E 36968
#define OP_USERSIGNAL_EC 39016
#define OP_USERSTATE 32873
#define OP_USERSTATE_C 34921
#define OP_USERSTATE_E 36969
#define OP_USERSTATE_EC 39017
#define OP_VISUALONLY 32874
#define OP_VISUALONLY_C 34922
#define OP_VISUALONLY_E 36970
#define OP_VISUALONLY_EC 39018
#define OP_STEALTHY 32875
#define OP_STEALTHY_C 34923
#define OP_STEALTHY_E 36971
#define OP_STEALTHY_EC 39019
#define OP_MOVED 32876
#define OP_MOVED_C 34924
#define OP_MOVED_E 36972
#define OP_MOVED_EC 39020
#define OP_MOVING 32877
#define OP_MOVING_C 34925
#define OP_MOVING_E 36973
#define OP_MOVING_EC 39021
#define OP_DONE 32878
#define OP_DONE_C 34926
#define OP_DONE_E 36974
#define OP_DONE_EC 39022
#define OP_DESTROYED 32879
#define OP_DESTROYED_C 34927
#define OP_PLAYER 32880
#define OP_PLAYER_C 34928
#define OP_COMPATIBLE 32881
#define OP_COMPATIBLE_C 34929
#define OP_COLLISIONLAYERS 32882
#define OP_COLLISIONLAYERS_C 34930
#define OP_SELF 32883
#define OP_MSG 32884
#define OP_FROM 32885
#define OP_ARG1 32886

#define OP_ARG1_E 36982
#define OP_ARG2 32887
#define OP_ARG2_E 36983
#define OP_ARG3 32888
#define OP_ARG3_E 36984
#define OP_MOVENUMBER 32889
#define OP_LEVEL 32890
#define OP_KEY 32891
#define OP_FINISHED 32892
#define OP_FINISHED_E 36988
#define OP_BACKGROUND 32893
#define OP_INPUT 32894
#define OP_QUIZ 32895
#define OP_INPLACE 32896
#define OP_DEFAULTIMAGE 32897
#define OP_HELP 32898
#define OP_EDITORHELP 32899
#define OP_SUBS 32900
#define OP_ANIMATE 32901
#define OP_ANIMATEDEAD 32902
#define OP_ASSASSINATE 32903
#define OP_ASSASSINATE_C 34951
#define OP_BROADCAST 32904
#define OP_BROADCAST_D 41096
#define OP_BROADCASTCLASS 32905
#define OP_BROADCASTEX 32906
#define OP_BROADCASTEX_D 41098
#define OP_BROADCASTSUM 32907
#define OP_BROADCASTSUMEX 32908
#define OP_CHAIN 32909
#define OP_CHEBYSHEV 32910
#define OP_CHEBYSHEV_C 34958


#define OP_CREATE 32911
#define OP_CREATE_D 41103
#define OP_DELINVENTORY 32912
#define OP_DELTA 32913
#define OP_DESTROY 32914
#define OP_DESTROY_C 34962
#define OP_DESTROY_D 41106
#define OP_DESTROY_CD 43154
#define OP_FLUSHCLASS 32915
#define OP_FLUSHOBJ 32916
#define OP_FLUSHOBJ_C 34964
#define OP_GETINVENTORY 32917
#define OP_HEIGHTAT 32918
#define OP_IGNOREKEY 32919
#define OP_INTMOVE 32920
#define OP_INTMOVE_C 34968
#define OP_INTMOVE_D 41112
#define OP_INTMOVE_CD 43160
#define OP_JUMPTO 32921
#define OP_JUMPTO_C 34969
#define OP_JUMPTO_D 41113
#define OP_JUMPTO_CD 43161
#define OP_LOC 32922
#define OP_LOC_C 34970
#define OP_LOCATEME 32923
#define OP_LOSELEVEL 32924
#define OP_MANHATTAN 32925
#define OP_MANHATTAN_C 34973
#define OP_MAXINVENTORY 32926
#define OP_MOVE 32927
#define OP_MOVE_C 34975
#define OP_MOVE_D 41119
#define OP_MOVE_CD 43167
#define OP_MOVEPLUS 32928
#define OP_MOVEPLUS_C 34976
#define OP_MOVEPLUS_D 41120
#define OP_MOVEPLUS_CD 43168
#define OP_MOVETO 32929
#define OP_MOVETO_C 34977
#define OP_MOVETO_D 41121
#define OP_MOVETO_CD 43169
#define OP_PLUSMOVE 32930
#define OP_PLUSMOVE_C 34978
#define OP_PLUSMOVE_D 41122
#define OP_PLUSMOVE_CD 43170
#define OP_MINUSMOVE 32931
#define OP_MINUSMOVE_C 34979
#define OP_MINUSMOVE_D 41123
#define OP_MINUSMOVE_CD 43171
#define OP_NEWX 32932
#define OP_NEWXY 32933
#define OP_NEWY 32934
#define OP_OBJABOVE 32935
#define OP_OBJABOVE_C 34983
#define OP_OBJBELOW 32936
#define OP_OBJBELOW_C 34984
#define OP_OBJBOTTOMAT 32937
#define OP_OBJCLASSAT 32938
#define OP_OBJDIR 32939
#define OP_OBJDIR_C 34987
#define OP_OBJLAYERAT 32940
#define OP_OBJMOVINGTO 32941
#define OP_OBJTOPAT 32942
#define OP_POPUP 32943
#define OP_POPUPARGS 32944
#define OP_REL 32945
#define OP_REL_C 34993
#define OP_SEEK 32946
#define OP_SEEK_C 34994
#define OP_SEND 32947
#define OP_SEND_C 34995
#define OP_SEND_D 41139
#define OP_SEND_CD 43187
#define OP_SENDEX 32948
#define OP_SENDEX_C 34996
#define OP_SENDEX_D 41140
#define OP_SENDEX_CD 43188
#define OP_SETINVENTORY 32949
#define OP_SOUND 32950
#define OP_SYNCHRONIZE 32951


#define OP_TRACE 32952
#define OP_VOLUMEAT 32953
#define OP_WINLEVEL 32954
#define OP_XDIR 32955

#define OP_XDIR_C 35003
#define OP_XYDIR 32956
#define OP_YDIR 32957
#define OP_YDIR_C 35005
#define OP_MARK 32958
#define OP_TMARK 32959
#define OP_IN 32960
#define OP_NIN 32961
#define OP_MBEGIN 32962
#define OP_FLIP 32963
#define OP_ARRAY 32964
#define OP_GETARRAY 32965
#define OP_INITARRAY 32966
#define OP_SETARRAY 32967
#define OP_ARRAYCELL 32968
#define OP_FUNCTION 32969
#define OP_LOCAL 32970
#define OP_LABEL 32971
#define OP_STRING 32972
#define OP_INT16 32973
#define OP_INT32 32974
#define OP_DISPATCH 32975
#define OP_USERFLAG 32976
#ifdef HEROMESH_CLASS
static const Op_Names op_names[]={
{"*",8486937},
{"+",8421399},
{"+Move",10584226},
{"-",8421400},
{"-Move",10584227},
{"-rot",8421382},
{".",10518528},
{"/",8486938},
{"ANHH",8389394},
{"ARRIVED",8389124},
{"Animate",8421509},
{"AnimateDead",8421510},
{"Arg1",8552566},
{"Arg2",8552567},
{"Arg3",8552568},
{"Array",8683716},
{"ArrayCell",8421576},
{"Arrivals",8618083},
{"Arrived",8618081},
{"Assassinate",8487047},
{"B",9437196},
{"BANG",8389380},
{"BEDOINGNG",8389406},
{"BEEDEEP",8389404},
{"BEGIN_TURN",8389123},
{"BLOCKED",8389144},
{"BOOOM",8389410},
{"BOUNCE",8389415},
{"BRRREEET",8389396},
{"BRRRT",8389395},
{"BUZZER",8389420},
{"BWEEP",8389397},
{"Background",8683645},
{"Broadcast",10518664},
{"BroadcastEx",10518666},
{"BroadcastSum",8421515},
{"BroadcastSumEx",8421516},
{"Busy",8618085},
{"CHEEP",8389393},
{"CHYEW",8389392},
{"CLICK",8389388},
{"COLLIDE",8389142},
{"COLLIDEBY",8389141},
{"COLLIDING",8389143},
{"CONFLICT",8389140},
{"CREATE",8389121},
{"CREATED",8389137},
{"Chebyshev",8487054},
{"Class",8486967},
{"Climb",9142347},
{"CollisionLayers",8487026},

{"Compatible",8487025},
{"Create",10518671},
{"DEEP_POP",8389417},
{"DEPARTED",8389125},
{"DESTROY",8389122},
{"DESTROYED",8389136},
{"DINK",8389390},
{"DOOR",8389378},
{"DRLRLRINK",8389398},
{"DYUPE",8389413},
{"DefaultImage",8683649},
{"DelInventory",8421520},
{"Delta",8421521},
{"Density",9142339},
{"Departed",8618082},
{"Departures",8618084},
{"Destroy",10584210},
{"Destroyed",8487023},
{"Dir",8618045},
{"Distance",9142337},
{"Done",8618094},
{"E",9437184},
{"END_TURN",8389139},
{"EditorHelp",8683651},
{"F",9437192},
{"FAROUT",8389421},
{"FFFFTT",8389399},
{"FLOATED",8389132},
{"FROG",8389383},
{"Finished",8552572},
{"FlushClass",8421523},
{"FlushObj",8487060},
{"From",8421493},
{"GLASS",8389379},
{"GLISSANT",8389419},
{"GetArray",8421573},
{"GetInventory",8421525},
{"HAWK",8389425},
{"HEARTBEAT",8389407},
{"HIT",8389134},
{"HITBY",8389135},
{"Hard",8618063},
{"Height",9142345},
{"HeightAt",8421526},
{"Help",8683650},
{"INIT",8389120},
{"IgnoreKey",8421527},
{"Image",8618046},
{"InPlace",8683648},
{"Inertia",9142335},
{"InitArray",8421574},
{"Input",8683646},
{"IntMove",10584216},
{"Invisible",8618086},
{"JAYAYAYNG",8389416},
{"JUMPED",8389128},
{"JumpTo",10584217},
{"KEWEL",8389422},
{"KEY",8389129},
{"KLECK",8389387},
{"KLINKK",8389385},
{"Key",8421499},
{"KeyCleared",8618087},
{"L",9437194},
{"LASTIMAGE",8389126},
{"LB",9437195},
{"LF",9437193},
{"LOCK",8389408},
{"LOOP",8388610},
{"Level",8421498},
{"Loc",8487066},
{"LocateMe",8421531},
{"LoseLevel",8421532},
{"MOVED",8389127},
{"MOVING",8389130},
{"Manhattan",8487069},
{"MaxInventory",8421534},
{"Misc1",9142355},
{"Misc2",9142357},
{"Misc3",9142359},
{"Misc4",9142361},
{"Misc5",9142363},
{"Misc6",9142365},
{"Misc7",9142367},
{"Move",10584223},
{"Move+",10584224},
{"MoveNumber",8421497},
{"MoveTo",10584225},
{"Moved",8618092},
{"Moving",8618093},
{"Msg",8421492},
{"N",9437186},
{"NE",9437185},
{"NW",9437187},
{"NewX",8421540},
{"NewXY",8421541},
{"NewY",8421542},
{"OLDPHONE",8389402},
{"ONCE",8388609},
{"OSC",8388616},
{"OSCLOOP",8388618},
{"ObjAbove",8487079},
{"ObjBelow",8487080},
{"ObjBottomAt",8421545},
{"ObjClassAt",8421546},
{"ObjDir",8487083},
{"ObjLayerAt",8421548},
{"ObjMovingTo",8421549},
{"ObjTopAt",8421550},
{"PLAYERMOVING",8389133},
{"POSTINIT",8389138},
{"POUR",8389377},
{"POWER",8389386},
{"Player",8487024},
{"PopUp",8421551},
{"Quiz",8683647},
{"R",9437198},
{"RATCHET1",8389418},
{"RATCHET2",8389412},
{"RATTLE",8389403},
{"RB",9437197},
{"RF",9437199},
{"Rel",8487089},
{"S",9437190},
{"SE",9437191},
{"SMALL_POP",8389389},
{"SPLASH",8389376},
{"STEAM",8389424},
{"STOP",8388608},
{"SUBS",8683652},
{"SUNK",8389131},
{"SW",9437189},
{"Seek",8487090},
{"Self",8421491},
{"Send",10584243},
{"SendEx",10584244},
{"SetArray",8421575},
{"SetInventory",8421557},
{"Shape",8618042},
{"ShapeDir",8618065},
{"Sharp",8618064},
{"Shovable",8618066},
{"Sound",8421558},
{"Stealthy",8618091},
{"Strength",9142349},
{"Synchronize",8421559},
{"TAHTASHH",8389409},
{"THMP_thmp",8389405},
{"THWIT",8389384},
{"TICK",8389391},

{"Temperature",9142328},
{"Trace",8421560},
{"UH_OH",8389382},
{"UNCORK",8389414},
{"UNHH",8389381},
{"UserSignal",8618088},
{"UserState",8618089},
{"VACUUM",8389411},
{"VisualOnly",8618090},
{"Volume",9142341},
{"VolumeAt",8421561},
{"W",9437188},
{"WAHOO",8389400},
{"WHACK",8389423},
{"Weight",9142343},
{"WinLevel",8421562},
{"XDir",8487099},
{"XYDir",8421564},
{"Xloc",8486971},
{"YDir",8487101},
{"YEEHAW",8389401},
{"Yloc",8486972},
{"_",8421566},
{"a?",8421430},
{"again",8683534},
{"band",8421407},
{"begin",8683533},
{"bit",8683555},
{"bit0",8388609},
{"bit1",8388610},
{"bit10",8423402},
{"bit11",8423403},
{"bit12",8423404},
{"bit13",8423405},
{"bit14",8423406},







>
>
>
>
|
|
|
|
|
|
|
|
|
|
|
|
|
>
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
>
|
<
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
>
>
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
>
>
|
|
|
<
>
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|




|

|





|
|
|
|
|
|
|
|
|
|












|
|
|
|
|
|









|
|
|
|
>
|
|








|
|
|
|
|
|
|
|
|
|
|


|





|
|
|
|


|
|




|
|
|
|

|
|
|
|
|
|
|
|


|




|
|






|
|
|
|


|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|



|
|
|




|
|
|
|
|
|
|
|




|
|
|






|






|


|
|
|
|
|
|
|
|
|
|
|
|
|
|




>
|
|



|
|

|
|
|



|
|
|
|
|
|

|
|
|

|

|







34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276

277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393

394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
#define OP_MUL 32793
#define OP_MUL_C 34841
#define OP_DIV 32794
#define OP_DIV_C 34842
#define OP_MOD 32795
#define OP_MOD_C 34843
#define OP_NEG 32796
#define OP_MIN 32797
#define OP_MIN_C 34845
#define OP_MAX 32798
#define OP_MAX_C 34846
#define OP_LSH 32799
#define OP_RSH 32800
#define OP_RSH_C 34848
#define OP_BAND 32801
#define OP_BOR 32802
#define OP_BXOR 32803
#define OP_BNOT 32804
#define OP_BIT 32805
#define OP_LAND 32806
#define OP_LOR 32807
#define OP_LXOR 32808
#define OP_LNOT 32809
#define OP_EQ 32810
#define OP_EQ2 32811
#define OP_NE 32812
#define OP_GT 32813
#define OP_GT_C 34861
#define OP_LT 32814
#define OP_LT_C 34862
#define OP_GE 32815
#define OP_GE_C 34863
#define OP_LE 32816
#define OP_LE_C 34864
#define OP_IS 32817
#define OP_QN 32818
#define OP_QC 32819
#define OP_QCZ 32820
#define OP_QM 32821
#define OP_QS 32822
#define OP_QO 32823
#define OP_QOZ 32824
#define OP_QA 32825
#define OP_CLASS 32826
#define OP_CLASS_C 34874
#define OP_TEMPERATURE 32827
#define OP_TEMPERATURE_C 34875
#define OP_TEMPERATURE_E 36923
#define OP_TEMPERATURE_EC 38971
#define OP_TEMPERATURE_EC16 38972
#define OP_TEMPERATURE_E16 36924
#define OP_SHAPE 32829
#define OP_SHAPE_C 34877
#define OP_SHAPE_E 36925
#define OP_SHAPE_EC 38973
#define OP_XLOC 32830
#define OP_XLOC_C 34878
#define OP_YLOC 32831
#define OP_YLOC_C 34879
#define OP_DIR 32832
#define OP_DIR_C 34880
#define OP_DIR_E 36928
#define OP_DIR_EC 38976
#define OP_IMAGE 32833
#define OP_IMAGE_C 34881
#define OP_IMAGE_E 36929
#define OP_IMAGE_EC 38977
#define OP_INERTIA 32834
#define OP_INERTIA_C 34882
#define OP_INERTIA_E 36930
#define OP_INERTIA_EC 38978
#define OP_INERTIA_EC16 38979
#define OP_INERTIA_E16 36931
#define OP_DISTANCE 32836
#define OP_DISTANCE_C 34884
#define OP_DISTANCE_E 36932
#define OP_DISTANCE_EC 38980
#define OP_DISTANCE_EC16 38981
#define OP_DISTANCE_E16 36933
#define OP_DENSITY 32838
#define OP_DENSITY_C 34886
#define OP_DENSITY_E 36934
#define OP_DENSITY_EC 38982
#define OP_DENSITY_EC16 38983
#define OP_DENSITY_E16 36935
#define OP_VOLUME 32840
#define OP_VOLUME_C 34888
#define OP_VOLUME_E 36936
#define OP_VOLUME_EC 38984
#define OP_VOLUME_EC16 38985
#define OP_VOLUME_E16 36937
#define OP_WEIGHT 32842
#define OP_WEIGHT_C 34890
#define OP_WEIGHT_E 36938
#define OP_WEIGHT_EC 38986
#define OP_WEIGHT_EC16 38987
#define OP_WEIGHT_E16 36939
#define OP_HEIGHT 32844
#define OP_HEIGHT_C 34892
#define OP_HEIGHT_E 36940
#define OP_HEIGHT_EC 38988
#define OP_HEIGHT_EC16 38989
#define OP_HEIGHT_E16 36941
#define OP_CLIMB 32846
#define OP_CLIMB_C 34894
#define OP_CLIMB_E 36942
#define OP_CLIMB_EC 38990
#define OP_CLIMB_EC16 38991
#define OP_CLIMB_E16 36943
#define OP_STRENGTH 32848
#define OP_STRENGTH_C 34896
#define OP_STRENGTH_E 36944
#define OP_STRENGTH_EC 38992
#define OP_STRENGTH_EC16 38993
#define OP_STRENGTH_E16 36945
#define OP_HARD 32850
#define OP_HARD_C 34898
#define OP_HARD_E 36946
#define OP_HARD_EC 38994
#define OP_SHARP 32851
#define OP_SHARP_C 34899
#define OP_SHARP_E 36947
#define OP_SHARP_EC 38995
#define OP_SHAPEDIR 32852
#define OP_SHAPEDIR_C 34900
#define OP_SHAPEDIR_E 36948
#define OP_SHAPEDIR_EC 38996
#define OP_SHOVABLE 32853
#define OP_SHOVABLE_C 34901
#define OP_SHOVABLE_E 36949
#define OP_SHOVABLE_EC 38997
#define OP_MISC1 32854
#define OP_MISC1_C 34902
#define OP_MISC1_E 36950
#define OP_MISC1_EC 38998
#define OP_MISC1_EC16 38999
#define OP_MISC1_E16 36951
#define OP_MISC2 32856
#define OP_MISC2_C 34904
#define OP_MISC2_E 36952
#define OP_MISC2_EC 39000
#define OP_MISC2_EC16 39001
#define OP_MISC2_E16 36953
#define OP_MISC3 32858
#define OP_MISC3_C 34906
#define OP_MISC3_E 36954
#define OP_MISC3_EC 39002
#define OP_MISC3_EC16 39003
#define OP_MISC3_E16 36955
#define OP_MISC4 32860
#define OP_MISC4_C 34908
#define OP_MISC4_E 36956
#define OP_MISC4_EC 39004
#define OP_MISC4_EC16 39005
#define OP_MISC4_E16 36957
#define OP_MISC5 32862
#define OP_MISC5_C 34910
#define OP_MISC5_E 36958
#define OP_MISC5_EC 39006
#define OP_MISC5_EC16 39007
#define OP_MISC5_E16 36959
#define OP_MISC6 32864
#define OP_MISC6_C 34912
#define OP_MISC6_E 36960
#define OP_MISC6_EC 39008
#define OP_MISC6_EC16 39009
#define OP_MISC6_E16 36961
#define OP_MISC7 32866
#define OP_MISC7_C 34914
#define OP_MISC7_E 36962
#define OP_MISC7_EC 39010
#define OP_MISC7_EC16 39011
#define OP_MISC7_E16 36963
#define OP_ARRIVED 32868
#define OP_ARRIVED_C 34916
#define OP_ARRIVED_E 36964
#define OP_ARRIVED_EC 39012
#define OP_DEPARTED 32869
#define OP_DEPARTED_C 34917
#define OP_DEPARTED_E 36965
#define OP_DEPARTED_EC 39013
#define OP_ARRIVALS 32870
#define OP_ARRIVALS_C 34918
#define OP_ARRIVALS_E 36966
#define OP_ARRIVALS_EC 39014
#define OP_DEPARTURES 32871
#define OP_DEPARTURES_C 34919
#define OP_DEPARTURES_E 36967
#define OP_DEPARTURES_EC 39015
#define OP_BUSY 32872
#define OP_BUSY_C 34920
#define OP_BUSY_E 36968
#define OP_BUSY_EC 39016
#define OP_INVISIBLE 32873
#define OP_INVISIBLE_C 34921
#define OP_INVISIBLE_E 36969
#define OP_INVISIBLE_EC 39017
#define OP_KEYCLEARED 32874
#define OP_KEYCLEARED_C 34922
#define OP_KEYCLEARED_E 36970
#define OP_KEYCLEARED_EC 39018
#define OP_USERSIGNAL 32875
#define OP_USERSIGNAL_C 34923
#define OP_USERSIGNAL_E 36971
#define OP_USERSIGNAL_EC 39019
#define OP_USERSTATE 32876
#define OP_USERSTATE_C 34924
#define OP_USERSTATE_E 36972
#define OP_USERSTATE_EC 39020
#define OP_VISUALONLY 32877
#define OP_VISUALONLY_C 34925
#define OP_VISUALONLY_E 36973
#define OP_VISUALONLY_EC 39021
#define OP_STEALTHY 32878
#define OP_STEALTHY_C 34926
#define OP_STEALTHY_E 36974
#define OP_STEALTHY_EC 39022
#define OP_MOVED 32879
#define OP_MOVED_C 34927
#define OP_MOVED_E 36975
#define OP_MOVED_EC 39023
#define OP_MOVING 32880
#define OP_MOVING_C 34928
#define OP_MOVING_E 36976
#define OP_MOVING_EC 39024
#define OP_DONE 32881
#define OP_DONE_C 34929
#define OP_DONE_E 36977
#define OP_DONE_EC 39025
#define OP_DESTROYED 32882
#define OP_DESTROYED_C 34930
#define OP_PLAYER 32883
#define OP_PLAYER_C 34931
#define OP_COMPATIBLE 32884
#define OP_COMPATIBLE_C 34932
#define OP_COLLISIONLAYERS 32885
#define OP_COLLISIONLAYERS_C 34933
#define OP_SELF 32886
#define OP_MSG 32887
#define OP_FROM 32888
#define OP_ARG1 32889
#define OP_ARG1_E 36985
#define OP_ARG2 32890

#define OP_ARG2_E 36986
#define OP_ARG3 32891
#define OP_ARG3_E 36987
#define OP_MOVENUMBER 32892
#define OP_LEVEL 32893
#define OP_KEY 32894
#define OP_FINISHED 32895
#define OP_FINISHED_E 36991
#define OP_BACKGROUND 32896
#define OP_INPUT 32897
#define OP_QUIZ 32898
#define OP_INPLACE 32899
#define OP_DEFAULTIMAGE 32900
#define OP_HELP 32901
#define OP_EDITORHELP 32902
#define OP_SUBS 32903
#define OP_ANIMATE 32904
#define OP_ANIMATEDEAD 32905
#define OP_ASSASSINATE 32906
#define OP_ASSASSINATE_C 34954
#define OP_BROADCAST 32907
#define OP_BROADCAST_D 41099
#define OP_BROADCASTCLASS 32908
#define OP_BROADCASTEX 32909
#define OP_BROADCASTEX_D 41101
#define OP_BROADCASTSUM 32910
#define OP_BROADCASTSUMEX 32911
#define OP_CHAIN 32912
#define OP_CHEBYSHEV 32913
#define OP_CHEBYSHEV_C 34961
#define OP_COLOC 32914
#define OP_COLOC_C 34962
#define OP_CREATE 32915
#define OP_CREATE_D 41107
#define OP_DELINVENTORY 32916
#define OP_DELTA 32917
#define OP_DESTROY 32918
#define OP_DESTROY_C 34966
#define OP_DESTROY_D 41110
#define OP_DESTROY_CD 43158
#define OP_FLUSHCLASS 32919
#define OP_FLUSHOBJ 32920
#define OP_FLUSHOBJ_C 34968
#define OP_GETINVENTORY 32921
#define OP_HEIGHTAT 32922
#define OP_IGNOREKEY 32923
#define OP_INTMOVE 32924
#define OP_INTMOVE_C 34972
#define OP_INTMOVE_D 41116
#define OP_INTMOVE_CD 43164
#define OP_JUMPTO 32925
#define OP_JUMPTO_C 34973
#define OP_JUMPTO_D 41117
#define OP_JUMPTO_CD 43165
#define OP_LOC 32926
#define OP_LOC_C 34974
#define OP_LOCATEME 32927
#define OP_LOSELEVEL 32928
#define OP_MANHATTAN 32929
#define OP_MANHATTAN_C 34977
#define OP_MAXINVENTORY 32930
#define OP_MOVE 32931
#define OP_MOVE_C 34979
#define OP_MOVE_D 41123
#define OP_MOVE_CD 43171
#define OP_MOVEPLUS 32932
#define OP_MOVEPLUS_C 34980
#define OP_MOVEPLUS_D 41124
#define OP_MOVEPLUS_CD 43172
#define OP_MOVETO 32933
#define OP_MOVETO_C 34981
#define OP_MOVETO_D 41125
#define OP_MOVETO_CD 43173
#define OP_PLUSMOVE 32934
#define OP_PLUSMOVE_C 34982
#define OP_PLUSMOVE_D 41126
#define OP_PLUSMOVE_CD 43174
#define OP_MINUSMOVE 32935
#define OP_MINUSMOVE_C 34983
#define OP_MINUSMOVE_D 41127
#define OP_MINUSMOVE_CD 43175
#define OP_NEWX 32936
#define OP_NEWXY 32937
#define OP_NEWY 32938
#define OP_OBJABOVE 32939
#define OP_OBJABOVE_C 34987
#define OP_OBJBELOW 32940
#define OP_OBJBELOW_C 34988
#define OP_OBJBOTTOMAT 32941
#define OP_OBJCLASSAT 32942
#define OP_OBJDIR 32943
#define OP_OBJDIR_C 34991
#define OP_OBJLAYERAT 32944
#define OP_OBJMOVINGTO 32945
#define OP_OBJTOPAT 32946
#define OP_POPUP 32947
#define OP_POPUPARGS 32948
#define OP_REL 32949
#define OP_REL_C 34997
#define OP_SEEK 32950
#define OP_SEEK_C 34998
#define OP_SEND 32951
#define OP_SEND_C 34999
#define OP_SEND_D 41143
#define OP_SEND_CD 43191
#define OP_SENDEX 32952
#define OP_SENDEX_C 35000
#define OP_SENDEX_D 41144
#define OP_SENDEX_CD 43192
#define OP_SETINVENTORY 32953
#define OP_SOUND 32954
#define OP_SYNCHRONIZE 32955
#define OP_TARGET 32956
#define OP_TARGET_C 35004
#define OP_TRACE 32957
#define OP_VOLUMEAT 32958
#define OP_WINLEVEL 32959

#define OP_XDIR 32960
#define OP_XDIR_C 35008
#define OP_XYDIR 32961
#define OP_YDIR 32962
#define OP_YDIR_C 35010
#define OP_MARK 32963
#define OP_TMARK 32964
#define OP_IN 32965
#define OP_NIN 32966
#define OP_MBEGIN 32967
#define OP_FLIP 32968
#define OP_ARRAY 32969
#define OP_GETARRAY 32970
#define OP_INITARRAY 32971
#define OP_SETARRAY 32972
#define OP_ARRAYCELL 32973
#define OP_FUNCTION 32974
#define OP_LOCAL 32975
#define OP_LABEL 32976
#define OP_STRING 32977
#define OP_INT16 32978
#define OP_INT32 32979
#define OP_DISPATCH 32980
#define OP_USERFLAG 32981
#ifdef HEROMESH_CLASS
static const Op_Names op_names[]={
{"*",8486937},
{"+",8421399},
{"+Move",10584230},
{"-",8421400},
{"-Move",10584231},
{"-rot",8421382},
{".",10518528},
{"/",8486938},
{"ANHH",8389394},
{"ARRIVED",8389124},
{"Animate",8421512},
{"AnimateDead",8421513},
{"Arg1",8552569},
{"Arg2",8552570},
{"Arg3",8552571},
{"Array",8683721},
{"ArrayCell",8421581},
{"Arrivals",8618086},
{"Arrived",8618084},
{"Assassinate",8487050},
{"B",9437196},
{"BANG",8389380},
{"BEDOINGNG",8389406},
{"BEEDEEP",8389404},
{"BEGIN_TURN",8389123},
{"BLOCKED",8389144},
{"BOOOM",8389410},
{"BOUNCE",8389415},
{"BRRREEET",8389396},
{"BRRRT",8389395},
{"BUZZER",8389420},
{"BWEEP",8389397},
{"Background",8683648},
{"Broadcast",10518667},
{"BroadcastEx",10518669},
{"BroadcastSum",8421518},
{"BroadcastSumEx",8421519},
{"Busy",8618088},
{"CHEEP",8389393},
{"CHYEW",8389392},
{"CLICK",8389388},
{"COLLIDE",8389142},
{"COLLIDEBY",8389141},
{"COLLIDING",8389143},
{"CONFLICT",8389140},
{"CREATE",8389121},
{"CREATED",8389137},
{"Chebyshev",8487057},
{"Class",8486970},
{"Climb",9142350},
{"CollisionLayers",8487029},
{"Coloc",8487058},
{"Compatible",8487028},
{"Create",10518675},
{"DEEP_POP",8389417},
{"DEPARTED",8389125},
{"DESTROY",8389122},
{"DESTROYED",8389136},
{"DINK",8389390},
{"DOOR",8389378},
{"DRLRLRINK",8389398},
{"DYUPE",8389413},
{"DefaultImage",8683652},
{"DelInventory",8421524},
{"Delta",8421525},
{"Density",9142342},
{"Departed",8618085},
{"Departures",8618087},
{"Destroy",10584214},
{"Destroyed",8487026},
{"Dir",8618048},
{"Distance",9142340},
{"Done",8618097},
{"E",9437184},
{"END_TURN",8389139},
{"EditorHelp",8683654},
{"F",9437192},
{"FAROUT",8389421},
{"FFFFTT",8389399},
{"FLOATED",8389132},
{"FROG",8389383},
{"Finished",8552575},
{"FlushClass",8421527},
{"FlushObj",8487064},
{"From",8421496},
{"GLASS",8389379},
{"GLISSANT",8389419},
{"GetArray",8421578},
{"GetInventory",8421529},
{"HAWK",8389425},
{"HEARTBEAT",8389407},
{"HIT",8389134},
{"HITBY",8389135},
{"Hard",8618066},
{"Height",9142348},
{"HeightAt",8421530},
{"Help",8683653},
{"INIT",8389120},
{"IgnoreKey",8421531},
{"Image",8618049},
{"InPlace",8683651},
{"Inertia",9142338},
{"InitArray",8421579},
{"Input",8683649},
{"IntMove",10584220},
{"Invisible",8618089},
{"JAYAYAYNG",8389416},
{"JUMPED",8389128},
{"JumpTo",10584221},
{"KEWEL",8389422},
{"KEY",8389129},
{"KLECK",8389387},
{"KLINKK",8389385},
{"Key",8421502},
{"KeyCleared",8618090},
{"L",9437194},
{"LASTIMAGE",8389126},
{"LB",9437195},
{"LF",9437193},
{"LOCK",8389408},
{"LOOP",8388610},
{"Level",8421501},
{"Loc",8487070},
{"LocateMe",8421535},
{"LoseLevel",8421536},
{"MOVED",8389127},
{"MOVING",8389130},
{"Manhattan",8487073},
{"MaxInventory",8421538},
{"Misc1",9142358},
{"Misc2",9142360},
{"Misc3",9142362},
{"Misc4",9142364},
{"Misc5",9142366},
{"Misc6",9142368},
{"Misc7",9142370},
{"Move",10584227},
{"Move+",10584228},
{"MoveNumber",8421500},
{"MoveTo",10584229},
{"Moved",8618095},
{"Moving",8618096},
{"Msg",8421495},
{"N",9437186},
{"NE",9437185},
{"NW",9437187},
{"NewX",8421544},
{"NewXY",8421545},
{"NewY",8421546},
{"OLDPHONE",8389402},
{"ONCE",8388609},
{"OSC",8388616},
{"OSCLOOP",8388618},
{"ObjAbove",8487083},
{"ObjBelow",8487084},
{"ObjBottomAt",8421549},
{"ObjClassAt",8421550},
{"ObjDir",8487087},
{"ObjLayerAt",8421552},
{"ObjMovingTo",8421553},
{"ObjTopAt",8421554},
{"PLAYERMOVING",8389133},
{"POSTINIT",8389138},
{"POUR",8389377},
{"POWER",8389386},
{"Player",8487027},
{"PopUp",8421555},
{"Quiz",8683650},
{"R",9437198},
{"RATCHET1",8389418},
{"RATCHET2",8389412},
{"RATTLE",8389403},
{"RB",9437197},
{"RF",9437199},
{"Rel",8487093},
{"S",9437190},
{"SE",9437191},
{"SMALL_POP",8389389},
{"SPLASH",8389376},
{"STEAM",8389424},
{"STOP",8388608},
{"SUBS",8683655},
{"SUNK",8389131},
{"SW",9437189},
{"Seek",8487094},
{"Self",8421494},
{"Send",10584247},
{"SendEx",10584248},
{"SetArray",8421580},
{"SetInventory",8421561},
{"Shape",8618045},
{"ShapeDir",8618068},
{"Sharp",8618067},
{"Shovable",8618069},
{"Sound",8421562},
{"Stealthy",8618094},
{"Strength",9142352},
{"Synchronize",8421563},
{"TAHTASHH",8389409},
{"THMP_thmp",8389405},
{"THWIT",8389384},
{"TICK",8389391},
{"Target",8487100},
{"Temperature",9142331},
{"Trace",8421565},
{"UH_OH",8389382},
{"UNCORK",8389414},
{"UNHH",8389381},
{"UserSignal",8618091},
{"UserState",8618092},
{"VACUUM",8389411},
{"VisualOnly",8618093},
{"Volume",9142344},
{"VolumeAt",8421566},
{"W",9437188},
{"WAHOO",8389400},
{"WHACK",8389423},
{"Weight",9142346},
{"WinLevel",8421567},
{"XDir",8487104},
{"XYDir",8421569},
{"Xloc",8486974},
{"YDir",8487106},
{"YEEHAW",8389401},
{"Yloc",8486975},
{"_",8421571},
{"a?",8421433},
{"again",8683534},
{"band",8421409},
{"begin",8683533},
{"bit",8683557},
{"bit0",8388609},
{"bit1",8388610},
{"bit10",8423402},
{"bit11",8423403},
{"bit12",8423404},
{"bit13",8423405},
{"bit14",8423406},
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681

682
683
684
685
686
687
688
689
690
691
692
693
694
695
696

697

698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
{"bit31",8423423},
{"bit4",8388624},
{"bit5",8388640},
{"bit6",8388672},
{"bit7",8388736},
{"bit8",8423400},
{"bit9",8423401},
{"bnot",8421410},
{"bor",8421408},
{"bxor",8421409},
{"c?",8421424},
{"chain",8421517},
{"cz?",8421425},
{"dup",8421377},
{"el",8683532},
{"else",8683530},
{"eq",8421416},

{"flip",8421571},
{"for",8683538},
{"ge",8486956},
{"gt",8486954},
{"if",8683529},
{"in",8421568},
{"is",8421422},
{"land",8421412},
{"le",8486957},
{"lnot",8421415},
{"lor",8421413},
{"lsh",8421405},
{"lt",8486955},
{"lxor",8421414},
{"m?",8421426},

{"mbegin",8683714},

{"mod",8486939},
{"n?",8421423},
{"ne",8421417},
{"neg",8421404},
{"next",8683539},
{"nin",8421569},
{"nip",8421379},
{"o?",8421428},
{"over",8421384},
{"oz?",8421429},
{"pick",8421383},
{"repeat",8683537},
{"ret",8421398},
{"rot",8421381},
{"rsh",8486942},
{"s?",8421427},
{"swap",8421378},
{"then",8683531},
{"tmark",8421567},
{"tuck",8421380},
{"until",8683535},
{"while",8683536},
};
#define N_OP_NAMES 309
#endif







|
|
|
|
|
|



|
>
|

|
|

|
|
|
|
|
|
|
|
|
|
>
|
>

|
|


|

|

|




|
|


|




|

676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
{"bit31",8423423},
{"bit4",8388624},
{"bit5",8388640},
{"bit6",8388672},
{"bit7",8388736},
{"bit8",8423400},
{"bit9",8423401},
{"bnot",8421412},
{"bor",8421410},
{"bxor",8421411},
{"c?",8421427},
{"chain",8421520},
{"cz?",8421428},
{"dup",8421377},
{"el",8683532},
{"else",8683530},
{"eq",8421418},
{"eq2",8421419},
{"flip",8421576},
{"for",8683538},
{"ge",8486959},
{"gt",8486957},
{"if",8683529},
{"in",8421573},
{"is",8421425},
{"land",8421414},
{"le",8486960},
{"lnot",8421417},
{"lor",8421415},
{"lsh",8421407},
{"lt",8486958},
{"lxor",8421416},
{"m?",8421429},
{"max",8486942},
{"mbegin",8683719},
{"min",8486941},
{"mod",8486939},
{"n?",8421426},
{"ne",8421420},
{"neg",8421404},
{"next",8683539},
{"nin",8421574},
{"nip",8421379},
{"o?",8421431},
{"over",8421384},
{"oz?",8421432},
{"pick",8421383},
{"repeat",8683537},
{"ret",8421398},
{"rot",8421381},
{"rsh",8486944},
{"s?",8421430},
{"swap",8421378},
{"then",8683531},
{"tmark",8421572},
{"tuck",8421380},
{"until",8683535},
{"while",8683536},
};
#define N_OP_NAMES 314
#endif