Free Hero Mesh

,gt  ( in1 in2 -- bool )
  Test if first input is greater than second input (signed).

HeightAt  ( x y -- height )
  Finds the greatest height among objects at the specified location.

HitMe  ( dir -- bool ) **
  Checks hardness/sharpness and shoving like is done by Move, subject to
  From and Arg3. The direction is a direction relative to From, not to
  Self. The result is 1 if shoving or sharpness is successful, or 0
  otherwise. This will update Arg3,including at least setting the low
  three bits; the new value of Arg3 may then be used as the return value
  from HITBY. It is intended that this instruction is used inside of a
  HITBY block, in case you want to do some of your own processing. The
  Comaptible and VisualOnly flags of this object are not checked.

IgnoreKey  ( -- )
  There is no effect outside of the input phase. During the input phase,
  indicates that this input is not part of the solution, so it will not
  be entered into the replay. It is an error to ignore inputs which do
  cause state changes. Pop-up messages are still allowed, and unlike in
  EKS Hero Mesh they will not break replayability; the key to dismiss a
  non-quiz popup is not entered into the replay list, and the key to

  Same as Super but return to this code after it is finished.

swap  ( x y -- y x )

SwapWorld  ( -- ) **
  Exchange the entire game with the bizarro world. Sometimes, this might
  fail due to CollisionLayers bits; in this case, it is an error.

Sweep  ( xstart ystart xend yend order msg arg1 arg2 -- )
  Send a message to all objects in the specified rectangle, given its
  corners. The coordinates are treated as signed, so you can safely make
  a surrounding rectangle with a specified radius if wanted. If all of the
  coordinates are out of range and not on opposite sides of the playfield,
  no messages are sent. The order of sending the messages is starting at
  the start coordinates and ending at the end cordinates, regardless of
  which are greater than the others; if the order is true then it does
  vertical movement first and if false then horizontal movement first.

SweepEx  ( xstart ystart xend yend order msg arg1 arg2 arg3 -- )
  Same as Sweep but three message arguments.

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 )

  n=playfield[x+y*64-65];
  while(n!=VOIDLINK) {
    m=objects[n]->up;
    v_trigger(from,n,v);
    n=m;
  }
}

static void v_sweep(Uint32 from,Value arg3) {
  Value arg2=Pop();
  Value arg1=Pop();
  Value v=Pop();
  Uint8 hv=v_bool(Pop());
  Uint16 msg=v.u;
  Uint8 x0,y0,x1,y1,x,y;
  Uint32 m,n;
  if(v.t!=TY_MESSAGE) Throw("Type mismatch");
  v=Pop(); if(v.t) Throw("Type mismatch"); y1=(v.s<0?0:v.s>pfheight?pfheight+1:v.s);
  v=Pop(); if(v.t) Throw("Type mismatch"); x1=(v.s<0?0:v.s>pfheight?pfheight+1:v.s);
  v=Pop(); if(v.t) Throw("Type mismatch"); y0=(v.s<0?0:v.s>pfheight?pfheight+1:v.s);
  v=Pop(); if(v.t) Throw("Type mismatch"); x0=(v.s<0?0:v.s>pfheight?pfheight+1:v.s);
  if((!x0 && !x1) || (!y0 && !y1) || (x0>pfwidth && x1>pfwidth) || (y0>pfheight && y1>pfheight)) return;
  if(!x0) x0=1;
  if(!x1) x1=1;
  if(!y0) y0=1;
  if(!y1) y1=1;
  if(x0>pfwidth) x0=pfwidth;
  if(y0>pfheight) y0=pfheight;
  if(x1>pfwidth) x1=pfwidth;
  if(y1>pfheight) y1=pfheight;
  for(x=x0,y=y0;;) {
    n=playfield[x+y*64-65];
    while(n!=VOIDLINK) {
      m=objects[n]->up;
      send_message(from,n,msg,arg1,arg2,arg3);
      n=m;
    }
    if(x==x1 && y==y1) break;
    if(hv) {
      if(y==y1) y=y0,x+=(x1>x0?1:-1); else y+=(y1>y0?1:-1);
    } else {
      if(x==x1) x=x0,y+=(y1>y0?1:-1); else x+=(x1>x0?1:-1);
    }
  }
}

static Uint32 v_hitme(Uint32 objE,Uint16 dir) {
  Object*o;
  Object*oE=objects[objE];
  Uint32 hit=msgvars.arg3.u&~0x8000;
  if(msgvars.from==VOIDLINK) return 0;
  if(msgvars.arg3.t) Throw("Type mismatch in HitMe");
  o=objects[msgvars.from];
  if(dir>7) dir=(o->dir+dir)&7;
  if(!(dir&1) && !(hit&0x122)) {
    if(o->sharp[dir>>1]>oE->hard[(dir^4)>>1] && !v_bool(destroy(msgvars.from,objE,2))) hit|=0x8004;
    if(oE->sharp[(dir^4)>>1]>o->hard[dir>>1] && !v_bool(destroy(objE,msgvars.from,1))) hit|=0x4C;
  }
  if(!(hit&0x344) && (oE->shovable&(1<<dir)) && o->inertia>=oE->weight) {
    oE->inertia=o->inertia;
    if(move_dir(msgvars.from,objE,dir)) {
      if(!(oE->oflags&OF_DESTROYED)) o->inertia=oE->inertia;
      hit|=0x8000;
    }
  }
  msgvars.arg3.u=hit|7;
  return (hit&0x8008)==0x8000?1:0;
}

// 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)

    case OP_HEIGHT: StackReq(0,1); Push(NVALUE(o->height)); break;
    case OP_HEIGHT_C: StackReq(1,1); Push(GetVariableOrAttributeOf(height,NVALUE)); break;
    case OP_HEIGHT_E: NoIgnore(); StackReq(1,0); t1=Pop(); Numeric(t1); o->height=t1.u; break;
    case OP_HEIGHT_E16: NoIgnore(); StackReq(1,0); t1=Pop(); Numeric(t1); o->height=t1.u&0xFFFF; break;
    case OP_HEIGHT_EC: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) objects[i]->height=t1.u; break;
    case OP_HEIGHT_EC16: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) objects[i]->height=t1.u&0xFFFF; break;
    case OP_HEIGHTAT: StackReq(2,1); t2=Pop(); Numeric(t2); t1=Pop(); Numeric(t1); Push(NVALUE(height_at(t1.u,t2.u))); break;
    case OP_HITME: NoIgnore(); StackReq(1,1); t1=Pop(); Numeric(t1); i=v_hitme(obj,t1.u); break;
    case OP_IF: StackReq(1,0); if(v_bool(Pop())) ptr++; else ptr=code[ptr]; break;
    case OP_IGNOREKEY: if(current_key) key_ignored=all_flushed=1; break;
    case OP_IMAGE: StackReq(0,1); Push(NVALUE(o->image)); break;
    case OP_IMAGE_C: StackReq(1,1); Push(GetVariableOf(image,NVALUE)); break;
    case OP_IMAGE_E: NoIgnore(); StackReq(1,0); t1=Pop(); Numeric(t1); o->image=t1.u; break;
    case OP_IMAGE_EC: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) objects[i]->image=t1.u; break;
    case OP_IN: StackReq(2,1); i=v_in(); Push(NVALUE(i?1:0)); 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_SUPER: i=code[1]; code=classes[i]->codes; ptr=get_message_ptr(i,msgvars.msg); if(ptr==0xFFFF) break; break;
    case OP_SUPER_C: i=code[1]; j=get_message_ptr(i,msgvars.msg); if(j!=0xFFFF) execute_program(classes[i]->codes,j,obj); break;
    case OP_SWAP: StackReq(2,2); t1=Pop(); t2=Pop(); Push(t1); Push(t2); break;
    case OP_SWAPWORLD: NoIgnore(); swap_world(); break;
    case OP_SWEEP: StackReq(8,0); v_sweep(obj,NVALUE(0)); break;
    case OP_SWEEPEX: StackReq(9,0); t1=Pop(); v_sweep(obj,t1); 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;

DelInventory
Delta
.,Destroy
FlushClass
,FlushObj
GetInventory
HeightAt
HitMe
IgnoreKey
.,IntMove ; move without initializing Inertia
.,JumpTo
,Loc ; same as: Xloc Yloc
LocateMe
LoseLevel
,Manhattan

*PopUpArgs ; for (PopUp [number])
,Rel
,Seek
.,Send
.,SendEx ; send with three arguments
SetInventory
Sound
Sweep
SweepEx
Synchronize
,Target
Trace
Trigger
TriggerAt
VolumeAt
WinLevel

#define OP_DESTROY_D 41119
#define OP_DESTROY_CD 43167
#define OP_FLUSHCLASS 32928
#define OP_FLUSHOBJ 32929
#define OP_FLUSHOBJ_C 34977
#define OP_GETINVENTORY 32930
#define OP_HEIGHTAT 32931
#define OP_HITME 32932
#define OP_IGNOREKEY 32933
#define OP_INTMOVE 32934
#define OP_INTMOVE_C 34982
#define OP_INTMOVE_D 41126
#define OP_INTMOVE_CD 43174
#define OP_JUMPTO 32935
#define OP_JUMPTO_C 34983
#define OP_JUMPTO_D 41127
#define OP_JUMPTO_CD 43175
#define OP_LOC 32936
#define OP_LOC_C 34984
#define OP_LOCATEME 32937
#define OP_LOSELEVEL 32938
#define OP_MANHATTAN 32939
#define OP_MANHATTAN_C 34987
#define OP_MAXINVENTORY 32940
#define OP_MOVE 32941
#define OP_MOVE_C 34989
#define OP_MOVE_D 41133
#define OP_MOVE_CD 43181
#define OP_MOVEPLUS 32942
#define OP_MOVEPLUS_C 34990
#define OP_MOVEPLUS_D 41134
#define OP_MOVEPLUS_CD 43182
#define OP_MOVETO 32943
#define OP_MOVETO_C 34991
#define OP_MOVETO_D 41135
#define OP_MOVETO_CD 43183
#define OP_PLUSMOVE 32944
#define OP_PLUSMOVE_C 34992
#define OP_PLUSMOVE_D 41136
#define OP_PLUSMOVE_CD 43184
#define OP_MINUSMOVE 32945
#define OP_MINUSMOVE_C 34993
#define OP_MINUSMOVE_D 41137
#define OP_MINUSMOVE_CD 43185
#define OP_NEWX 32946
#define OP_NEWXY 32947
#define OP_NEWY 32948
#define OP_OBJABOVE 32949
#define OP_OBJABOVE_C 34997
#define OP_OBJBELOW 32950
#define OP_OBJBELOW_C 34998
#define OP_OBJBOTTOMAT 32951
#define OP_OBJCLASSAT 32952
#define OP_OBJDIR 32953
#define OP_OBJDIR_C 35001
#define OP_OBJLAYERAT 32954
#define OP_OBJMOVINGTO 32955
#define OP_OBJTOPAT 32956
#define OP_POPUP 32957
#define OP_POPUPARGS 32958
#define OP_REL 32959
#define OP_REL_C 35007
#define OP_SEEK 32960
#define OP_SEEK_C 35008
#define OP_SEND 32961
#define OP_SEND_C 35009
#define OP_SEND_D 41153
#define OP_SEND_CD 43201
#define OP_SENDEX 32962
#define OP_SENDEX_C 35010
#define OP_SENDEX_D 41154
#define OP_SENDEX_CD 43202
#define OP_SETINVENTORY 32963
#define OP_SOUND 32964
#define OP_SWEEP 32965
#define OP_SWEEPEX 32966
#define OP_SYNCHRONIZE 32967
#define OP_TARGET 32968
#define OP_TARGET_C 35016
#define OP_TRACE 32969
#define OP_TRIGGER 32970
#define OP_TRIGGERAT 32971
#define OP_VOLUMEAT 32972
#define OP_WINLEVEL 32973
#define OP_XDIR 32974
#define OP_XDIR_C 35022
#define OP_XYDIR 32975
#define OP_YDIR 32976
#define OP_YDIR_C 35024
#define OP_MARK 32977
#define OP_TMARK 32978
#define OP_IN 32979
#define OP_NIN 32980
#define OP_MBEGIN 32981
#define OP_FLIP 32982
#define OP_COUNT 32983
#define OP_CLEAR 32984
#define OP_UNIQ 32985
#define OP_ARRAY 32986
#define OP_GETARRAY 32987
#define OP_INITARRAY 32988
#define OP_SETARRAY 32989
#define OP_ARRAYCELL 32990
#define OP_ARRAYSLICE 32991
#define OP_COPYARRAY 32992
#define OP_DOTPRODUCT 32993
#define OP_PATTERN 32994
#define OP_PATTERN_C 35042
#define OP_PATTERN_E 37090
#define OP_PATTERN_EC 39138
#define OP_PATTERNS 32995
#define OP_PATTERNS_C 35043
#define OP_PATTERNS_E 37091
#define OP_PATTERNS_EC 39139
#define OP_ROOK 32996
#define OP_BISHOP 32997
#define OP_QUEEN 32998
#define OP_CUT 32999
#define OP_BIZARRO 33000
#define OP_BIZARRO_C 35048
#define OP_BIZARRO_E 37096
#define OP_BIZARRO_EC 39144
#define OP_BIZARROSWAP 33001
#define OP_BIZARROSWAP_D 41193
#define OP_SWAPWORLD 33002
#define OP_ABSTRACT 33003
#define OP_SUPER 33004
#define OP_SUPER_C 35052
#define OP_FUNCTION 33005
#define OP_LOCAL 33006
#define OP_LABEL 33007
#define OP_STRING 33008
#define OP_INT16 33009
#define OP_INT32 33010
#define OP_DISPATCH 33011
#define OP_USERFLAG 33012
#ifdef HEROMESH_CLASS
static const Op_Names op_names[]={
{"*",8486939},
{"+",8421401},
{"+Move",10584240},
{"-",8421402},
{"-Move",10584241},
{"-rot",8421382},
{".",10518528},
{"/",8486940},
{"ANHH",8389394},
{"ARRIVED",8389124},
{"Abstract",8683755},
{"Animate",8421516},
{"AnimateDead",8421517},
{"Arg1",8552571},
{"Arg2",8552572},
{"Arg3",8552573},
{"Array",8683738},
{"ArrayCell",8421598},
{"ArraySlice",8421599},
{"Arrivals",8618088},
{"Arrived",8618086},
{"Assassinate",8487054},
{"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",8683650},
{"Bishop",8683749},
{"Bizarro",8618216},
{"BizarroSwap",10518761},
{"Broadcast",10518671},
{"BroadcastAnd",8421520},
{"BroadcastAndEx",8421521},
{"BroadcastEx",10518675},
{"BroadcastList",8421524},
{"BroadcastListEx",8421525},
{"BroadcastSum",8421526},

{"Chebyshev",8487065},
{"Class",8486972},
{"Climb",9142352},
{"CodePage",8683651},
{"CollisionLayers",8487031},
{"Coloc",8487066},
{"Compatible",8487030},
{"CopyArray",8421600},
{"Create",10518683},
{"DEEP_POP",8389417},
{"DEPARTED",8389125},
{"DESTROY",8389122},
{"DESTROYED",8389136},
{"DINK",8389390},
{"DOOR",8389378},

{"Departed",8618087},
{"Departures",8618089},
{"Destroy",10584223},
{"Destroyed",8487028},
{"Dir",8618050},
{"Distance",9142342},
{"Done",8618099},
{"DotProduct",8421601},
{"E",9437184},
{"END_TURN",8389139},
{"EditorHelp",8683657},
{"F",9437192},
{"FAROUT",8389421},
{"FFFFTT",8389399},
{"FLOATED",8389132},
{"FROG",8389383},
{"Finished",8552577},
{"FlushClass",8421536},
{"FlushObj",8487073},
{"From",8421498},
{"GLASS",8389379},
{"GLISSANT",8389419},
{"GetArray",8421595},
{"GetInventory",8421538},
{"HAWK",8389425},
{"HEARTBEAT",8389407},
{"HIT",8389134},
{"HITBY",8389135},
{"Hard",8618068},
{"Height",9142350},
{"HeightAt",8421539},
{"Help",8683656},
{"HitMe",8421540},
{"INIT",8389120},
{"IgnoreKey",8421541},
{"Image",8618051},
{"InPlace",8683654},
{"Inertia",9142340},
{"InitArray",8421596},
{"Input",8683652},
{"IntMove",10584230},
{"Invisible",8618091},
{"JAYAYAYNG",8389416},
{"JUMPED",8389128},
{"JumpTo",10584231},
{"KEWEL",8389422},
{"KEY",8389129},
{"KLECK",8389387},
{"KLINKK",8389385},
{"Key",8421504},
{"KeyCleared",8618092},
{"L",9437194},
{"LASTIMAGE",8389126},
{"LB",9437195},
{"LF",9437193},
{"LOCK",8389408},
{"LOOP",8388610},
{"Level",8421503},
{"Loc",8487080},
{"LocateMe",8421545},
{"LoseLevel",8421546},
{"MOVED",8389127},
{"MOVING",8389130},
{"Manhattan",8487083},
{"MaxInventory",8421548},
{"Misc1",9142360},
{"Misc2",9142362},
{"Misc3",9142364},
{"Misc4",9142366},
{"Misc5",9142368},
{"Misc6",9142370},
{"Misc7",9142372},
{"Move",10584237},
{"Move+",10584238},
{"MoveNumber",8421502},
{"MoveTo",10584239},
{"Moved",8618097},
{"Moving",8618098},
{"Msg",8421497},
{"N",9437186},
{"NE",9437185},
{"NW",9437187},
{"NewX",8421554},
{"NewXY",8421555},
{"NewY",8421556},
{"OLDPHONE",8389402},
{"ONCE",8388609},
{"OSC",8388616},
{"OSCLOOP",8388618},
{"ObjAbove",8487093},
{"ObjBelow",8487094},
{"ObjBottomAt",8421559},
{"ObjClassAt",8421560},
{"ObjDir",8487097},
{"ObjLayerAt",8421562},
{"ObjMovingTo",8421563},
{"ObjTopAt",8421564},
{"Others",8683658},
{"P",8880354},
{"P*",8880355},
{"PLAYERMOVING",8389133},
{"POSTINIT",8389138},
{"POUR",8389377},
{"POWER",8389386},
{"Player",8487029},
{"PopUp",8421565},
{"Queen",8683750},
{"Quiz",8683653},
{"R",9437198},
{"RATCHET1",8389418},
{"RATCHET2",8389412},
{"RATTLE",8389403},
{"RB",9437197},
{"RF",9437199},
{"Rel",8487103},
{"Rook",8683748},
{"S",9437190},
{"SE",9437191},
{"SMALL_POP",8389389},
{"SPLASH",8389376},
{"STEAM",8389424},
{"STOP",8388608},
{"SUBS",8683659},
{"SUNK",8389131},
{"SW",9437189},
{"Seek",8487104},
{"Self",8421496},
{"Send",10584257},
{"SendEx",10584258},
{"SetArray",8421597},
{"SetInventory",8421571},
{"Shape",8618047},
{"ShapeDir",8618070},
{"Sharp",8618069},
{"Shovable",8618071},
{"Sound",8421572},
{"Stealthy",8618096},
{"Strength",9142354},
{"Super",8487148},
{"SwapWorld",8421610},
{"Sweep",8421573},
{"SweepEx",8421574},
{"Synchronize",8421575},
{"TAHTASHH",8389409},
{"THMP_thmp",8389405},
{"THWIT",8389384},
{"TICK",8389391},
{"Target",8487112},
{"Temperature",9142333},
{"Trace",8421577},
{"Trigger",8421578},
{"TriggerAt",8421579},
{"UH_OH",8389382},
{"UNCORK",8389414},
{"UNHH",8389381},
{"UserSignal",8618093},
{"UserState",8618094},
{"VACUUM",8389411},
{"VisualOnly",8618095},
{"Volume",9142346},
{"VolumeAt",8421580},
{"W",9437188},
{"WAHOO",8389400},
{"WHACK",8389423},
{"Weight",9142348},
{"WinLevel",8421581},
{"XDir",8487118},
{"XYDir",8421583},
{"Xloc",8486976},
{"YDir",8487120},
{"YEEHAW",8389401},
{"Yloc",8486977},
{"_",8421585},
{"a?",8421435},
{"again",8683533},
{"and",8683544},
{"band",8421411},
{"begin",8683532},
{"bit",8683559},
{"bit0",8388609},

{"bit9",8423401},
{"bnot",8421414},
{"bor",8421412},
{"bxor",8421413},
{"c?",8421429},
{"case",8683542},
{"chain",8421528},
{"clear",8421592},
{"count",8421591},
{"cut",8683751},
{"cz?",8421430},
{"dup",8421377},
{"else",8683530},
{"eq",8421420},
{"eq2",8421421},
{"flip",8421590},
{"for",8683537},
{"ge",8486961},
{"gt",8486959},
{"if",8683529},
{"in",8421587},
{"is",8421427},
{"land",8421416},
{"le",8486962},
{"lnot",8421419},
{"lor",8421417},
{"lsh",8421409},
{"lt",8486960},
{"lxor",8421418},
{"m?",8421431},
{"max",8486944},
{"mbegin",8683733},
{"min",8486943},
{"mod",8486941},
{"n?",8421428},
{"ne",8421422},
{"neg",8421406},
{"next",8683538},
{"nin",8421588},
{"nip",8421379},
{"o?",8421433},
{"or",8683543},
{"over",8421384},
{"oz?",8421434},
{"pick",8421383},
{"repeat",8683536},
{"ret",8421397},
{"rot",8421381},
{"rsh",8486946},
{"s?",8421432},
{"swap",8421378},
{"then",8683531},
{"tmark",8421586},
{"tuck",8421380},
{"uniq",8421593},
{"until",8683534},
{"while",8683535},
};
#define N_OP_NAMES 345
#endif