Free Hero Mesh

Check-in [3532fea858]
Login
Home Timeline Files Branches Tags Tickets Wiki Sitemap
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:Implement the Morton and ,Morton instructions. (On some computers it may be possible to optimize this better; this optimization is not currently implemented.)
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 3532fea85828a5e263234ce2b4a1f5053d05d662
User & Date: user on 2022-02-16 07:09:32
Other Links: manifest | tags
Context
2022-02-22
02:35
Implement FindConnection instruction. check-in: c49ea7253d user: user tags: trunk
2022-02-16
07:09
Implement the Morton and ,Morton instructions. (On some computers it may be possible to optimize this better; this optimization is not currently implemented.) check-in: 3532fea858 user: user tags: trunk
03:49
Implement the high 8-bits of Shovable variable. check-in: df0b4678c0 user: user tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified class.doc from [5e0bfb99d0] to [e1fcb10826].

︙︙
1651
1652
1653
1654
1655
1656
1657









1658
1659
1660
1661
1662
1663
1664


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

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










Move  ( dir -- bool ) **
  Move this object in the given direction (which may be absolute or
  relative to the current direction). The result will be true if the
  move is successful or false if it failed. See the section about
  movement for details.

,Move  ( obj dir -- bool ) **








>
>
>
>
>
>
>
>
>








1651
1652
1653
1654
1655
1656
1657
1658
1659
1660
1661
1662
1663
1664
1665
1666
1667
1668
1669
1670
1671
1672
1673


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

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

Morton  ( in -- out )
  Like ,Morton but the first input is always zero.

,Morton  ( in1 in2 -- out )
  Interleave bits of two 16-bit numbers to make a 32-bit number, like the
  mingle operator of INTERCAL. (One use of this is if you have a class
  with images for each combination of E/N/W/S directions and will want
  to convert them to make the appropriate Shovable value.)

Move  ( dir -- bool ) **
  Move this object in the given direction (which may be absolute or
  relative to the current direction). The result will be true if the
  move is successful or false if it failed. See the section about
  movement for details.

,Move  ( obj dir -- bool ) **
︙︙

Modified exec.c from [b4fc39460c] to [3521db691c].

︙︙
2674
2675
2676
2677
2678
2679
2680









2681
2682
2683
2684
2685
2686
2687

    case TY_CODE:
      i=v.u>>16;
      if(i==objects[obj]->class || !i || code==classes[i]->codes) return v.u;
      Throw("Link mismatch");
    default: Throw("Type mismatch");
  }
}










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








>
>
>
>
>
>
>
>
>








2674
2675
2676
2677
2678
2679
2680
2681
2682
2683
2684
2685
2686
2687
2688
2689
2690
2691
2692
2693
2694
2695
2696

    case TY_CODE:
      i=v.u>>16;
      if(i==objects[obj]->class || !i || code==classes[i]->codes) return v.u;
      Throw("Link mismatch");
    default: Throw("Type mismatch");
  }
}

static Uint32 morton(Uint32 x) {
  x&=0xFFFF;
  x|=x<<8; x&=0x00FF00FF;
  x|=x<<4; x&=0x0F0F0F0F;
  x|=x<<2; x&=0x33333333;
  x|=x<<1; x&=0x55555555;
  return x;
}

// 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)
︙︙
2955
2956
2957
2958
2959
2960
2961


2962
2963
2964
2965
2966
2967
2968

    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;
    case OP_MOVE_C: NoIgnore(); StackReq(2,1); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i==VOIDLINK) Push(NVALUE(0)); else { objects[i]->inertia=o->strength; Push(NVALUE(move_dir(obj,i,t1.u))); } break;
    case OP_MOVE_D: NoIgnore(); StackReq(1,0); t1=Pop(); Numeric(t1); o->inertia=o->strength; move_dir(obj,obj,t1.u); break;
    case OP_MOVE_CD: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) { objects[i]->inertia=o->strength; move_dir(obj,i,t1.u); } break;
    case OP_MOVED: StackReq(0,1); if(o->oflags&OF_MOVED) Push(NVALUE(1)); else Push(NVALUE(0)); break;
    case OP_MOVED_C: StackReq(1,1); GetFlagOf(OF_MOVED); break;
    case OP_MOVED_E: NoIgnore(); StackReq(1,0); if(v_bool(Pop())) o->oflags|=OF_MOVED; else o->oflags&=~OF_MOVED; break;








>
>








2964
2965
2966
2967
2968
2969
2970
2971
2972
2973
2974
2975
2976
2977
2978
2979

    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_MORTON: StackReq(1,1); t1=Pop(); Numeric(t1); Push(NVALUE(morton(t1.u))); break;
    case OP_MORTON_C: StackReq(2,1); t2=Pop(); Numeric(t2); t1=Pop(); Numeric(t1); Push(NVALUE(morton(t2.u)|(morton(t1.u)<<1))); 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;
    case OP_MOVE_C: NoIgnore(); StackReq(2,1); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i==VOIDLINK) Push(NVALUE(0)); else { objects[i]->inertia=o->strength; Push(NVALUE(move_dir(obj,i,t1.u))); } break;
    case OP_MOVE_D: NoIgnore(); StackReq(1,0); t1=Pop(); Numeric(t1); o->inertia=o->strength; move_dir(obj,obj,t1.u); break;
    case OP_MOVE_CD: NoIgnore(); StackReq(2,0); t1=Pop(); Numeric(t1); i=v_object(Pop()); if(i!=VOIDLINK) { objects[i]->inertia=o->strength; move_dir(obj,i,t1.u); } break;
    case OP_MOVED: StackReq(0,1); if(o->oflags&OF_MOVED) Push(NVALUE(1)); else Push(NVALUE(0)); break;
    case OP_MOVED_C: StackReq(1,1); GetFlagOf(OF_MOVED); break;
    case OP_MOVED_E: NoIgnore(); StackReq(1,0); if(v_bool(Pop())) o->oflags|=OF_MOVED; else o->oflags&=~OF_MOVED; break;
︙︙

Modified instruc from [67de8ba826] to [e91542e6fc].

︙︙
250
251
252
253
254
255
256

257
258
259
260
261
262
263

.,IntMove ; move without initializing Inertia
.,JumpTo
,Loc ; same as: Xloc Yloc
,LocateMe
LoseLevel
,Manhattan
MaxInventory ; error if more than that many slots in inventory

.,Move
.,MovePlus "Move+" ; obj.Inertia+=Strength instead of obj.Inertia=Strength
.,MoveTo ; the internal MoveTo() function
.,PlusMove "+Move"
.,MinusMove "-Move"
NewX
NewXY








>








250
251
252
253
254
255
256
257
258
259
260
261
262
263
264

.,IntMove ; move without initializing Inertia
.,JumpTo
,Loc ; same as: Xloc Yloc
,LocateMe
LoseLevel
,Manhattan
MaxInventory ; error if more than that many slots in inventory
,Morton
.,Move
.,MovePlus "Move+" ; obj.Inertia+=Strength instead of obj.Inertia=Strength
.,MoveTo ; the internal MoveTo() function
.,PlusMove "+Move"
.,MinusMove "-Move"
NewX
NewXY
︙︙

Modified instruc.h from [c6eaacfc4c] to [0651293b43].

︙︙
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

#define OP_LOC_C 34994
#define OP_LOCATEME 32947
#define OP_LOCATEME_C 34995
#define OP_LOSELEVEL 32948
#define OP_MANHATTAN 32949
#define OP_MANHATTAN_C 34997
#define OP_MAXINVENTORY 32950


#define OP_MOVE 32951
#define OP_MOVE_C 34999
#define OP_MOVE_D 41143
#define OP_MOVE_CD 43191
#define OP_MOVEPLUS 32952
#define OP_MOVEPLUS_C 35000
#define OP_MOVEPLUS_D 41144
#define OP_MOVEPLUS_CD 43192
#define OP_MOVETO 32953
#define OP_MOVETO_C 35001
#define OP_MOVETO_D 41145
#define OP_MOVETO_CD 43193
#define OP_PLUSMOVE 32954
#define OP_PLUSMOVE_C 35002
#define OP_PLUSMOVE_D 41146
#define OP_PLUSMOVE_CD 43194
#define OP_MINUSMOVE 32955
#define OP_MINUSMOVE_C 35003
#define OP_MINUSMOVE_D 41147
#define OP_MINUSMOVE_CD 43195
#define OP_NEWX 32956
#define OP_NEWXY 32957
#define OP_NEWY 32958
#define OP_OBJABOVE 32959
#define OP_OBJABOVE_C 35007
#define OP_OBJBELOW 32960
#define OP_OBJBELOW_C 35008
#define OP_OBJBOTTOMAT 32961
#define OP_OBJCLASSAT 32962
#define OP_OBJDIR 32963
#define OP_OBJDIR_C 35011
#define OP_OBJLAYERAT 32964
#define OP_OBJMOVINGTO 32965
#define OP_OBJTOPAT 32966
#define OP_POPUP 32967
#define OP_POPUPARGS 32968
#define OP_REL 32969
#define OP_REL_C 35017
#define OP_SEEK 32970
#define OP_SEEK_C 35018
#define OP_SEND 32971
#define OP_SEND_C 35019
#define OP_SEND_D 41163
#define OP_SEND_CD 43211
#define OP_SENDEX 32972
#define OP_SENDEX_C 35020
#define OP_SENDEX_D 41164
#define OP_SENDEX_CD 43212
#define OP_SETINVENTORY 32973
#define OP_SOUND 32974
#define OP_SWEEP 32975
#define OP_SWEEPEX 32976
#define OP_SYNCHRONIZE 32977
#define OP_TARGET 32978
#define OP_TARGET_C 35026
#define OP_TRACE 32979
#define OP_TRIGGER 32980
#define OP_TRIGGERAT 32981
#define OP_VOLUMEAT 32982
#define OP_WINLEVEL 32983
#define OP_XDIR 32984
#define OP_XDIR_C 35032
#define OP_XSTEP 32985
#define OP_XSTEP_C 35033
#define OP_XYDIR 32986
#define OP_YDIR 32987
#define OP_YDIR_C 35035
#define OP_YSTEP 32988
#define OP_YSTEP_C 35036
#define OP_MARK 32989
#define OP_TMARK 32990
#define OP_IN 32991
#define OP_NIN 32992
#define OP_MBEGIN 32993
#define OP_FLIP 32994
#define OP_COUNT 32995
#define OP_CLEAR 32996
#define OP_UNIQ 32997
#define OP_ARRAY 32998
#define OP_GETARRAY 32999
#define OP_INITARRAY 33000
#define OP_SETARRAY 33001
#define OP_ARRAYCELL 33002
#define OP_ARRAYSLICE 33003
#define OP_COPYARRAY 33004
#define OP_DOTPRODUCT 33005
#define OP_PATTERN 33006
#define OP_PATTERN_C 35054
#define OP_PATTERN_E 37102
#define OP_PATTERN_EC 39150
#define OP_PATTERNS 33007
#define OP_PATTERNS_C 35055
#define OP_PATTERNS_E 37103
#define OP_PATTERNS_EC 39151
#define OP_ROOK 33008
#define OP_BISHOP 33009
#define OP_QUEEN 33010
#define OP_CUT 33011
#define OP_BIZARRO 33012
#define OP_BIZARRO_C 35060
#define OP_BIZARRO_E 37108
#define OP_BIZARRO_EC 39156
#define OP_BIZARROSWAP 33013
#define OP_BIZARROSWAP_D 41205
#define OP_SWAPWORLD 33014
#define OP_ABSTRACT 33015
#define OP_SUPER 33016
#define OP_SUPER_C 35064
#define OP_FUNCTION 33017
#define OP_LOCAL 33018
#define OP_LABEL 33019
#define OP_STRING 33020
#define OP_INT16 33021
#define OP_INT32 33022
#define OP_DISPATCH 33023
#define OP_USERFLAG 33024
#ifdef HEROMESH_CLASS
static const Op_Names op_names[]={
{"*",8486943},
{"+",8421405},
{"+Move",10584250},
{"-",8421406},
{"-Move",10584251},
{"-rot",8421382},
{".",10518528},
{"/",8486944},
{"ANHH",8389394},
{"ARRIVED",8389124},
{"Abstract",8683767},
{"Animate",8552596},
{"AnimateDead",8552597},
{"Arg1",8552576},
{"Arg2",8552577},
{"Arg3",8552578},
{"Array",8683750},
{"ArrayCell",8421610},
{"ArraySlice",8421611},
{"Arrivals",8618092},
{"Arrived",8618090},
{"Assassinate",8487062},
{"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",8683655},
{"Bishop",8683761},
{"Bizarro",8618228},
{"BizarroSwap",10518773},
{"Broadcast",10518679},
{"BroadcastAnd",8421528},
{"BroadcastAndEx",8421529},
{"BroadcastEx",10518683},
{"BroadcastList",8421532},
{"BroadcastListEx",8421533},
{"BroadcastSum",8421534},








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




|

|





|





|
|
|
















|
|
|








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

#define OP_LOC_C 34994
#define OP_LOCATEME 32947
#define OP_LOCATEME_C 34995
#define OP_LOSELEVEL 32948
#define OP_MANHATTAN 32949
#define OP_MANHATTAN_C 34997
#define OP_MAXINVENTORY 32950
#define OP_MORTON 32951
#define OP_MORTON_C 34999
#define OP_MOVE 32952
#define OP_MOVE_C 35000
#define OP_MOVE_D 41144
#define OP_MOVE_CD 43192
#define OP_MOVEPLUS 32953
#define OP_MOVEPLUS_C 35001
#define OP_MOVEPLUS_D 41145
#define OP_MOVEPLUS_CD 43193
#define OP_MOVETO 32954
#define OP_MOVETO_C 35002
#define OP_MOVETO_D 41146
#define OP_MOVETO_CD 43194
#define OP_PLUSMOVE 32955
#define OP_PLUSMOVE_C 35003
#define OP_PLUSMOVE_D 41147
#define OP_PLUSMOVE_CD 43195
#define OP_MINUSMOVE 32956
#define OP_MINUSMOVE_C 35004
#define OP_MINUSMOVE_D 41148
#define OP_MINUSMOVE_CD 43196
#define OP_NEWX 32957
#define OP_NEWXY 32958
#define OP_NEWY 32959
#define OP_OBJABOVE 32960
#define OP_OBJABOVE_C 35008
#define OP_OBJBELOW 32961
#define OP_OBJBELOW_C 35009
#define OP_OBJBOTTOMAT 32962
#define OP_OBJCLASSAT 32963
#define OP_OBJDIR 32964
#define OP_OBJDIR_C 35012
#define OP_OBJLAYERAT 32965
#define OP_OBJMOVINGTO 32966
#define OP_OBJTOPAT 32967
#define OP_POPUP 32968
#define OP_POPUPARGS 32969
#define OP_REL 32970
#define OP_REL_C 35018
#define OP_SEEK 32971
#define OP_SEEK_C 35019
#define OP_SEND 32972
#define OP_SEND_C 35020
#define OP_SEND_D 41164
#define OP_SEND_CD 43212
#define OP_SENDEX 32973
#define OP_SENDEX_C 35021
#define OP_SENDEX_D 41165
#define OP_SENDEX_CD 43213
#define OP_SETINVENTORY 32974
#define OP_SOUND 32975
#define OP_SWEEP 32976
#define OP_SWEEPEX 32977
#define OP_SYNCHRONIZE 32978
#define OP_TARGET 32979
#define OP_TARGET_C 35027
#define OP_TRACE 32980
#define OP_TRIGGER 32981
#define OP_TRIGGERAT 32982
#define OP_VOLUMEAT 32983
#define OP_WINLEVEL 32984
#define OP_XDIR 32985
#define OP_XDIR_C 35033
#define OP_XSTEP 32986
#define OP_XSTEP_C 35034
#define OP_XYDIR 32987
#define OP_YDIR 32988
#define OP_YDIR_C 35036
#define OP_YSTEP 32989
#define OP_YSTEP_C 35037
#define OP_MARK 32990
#define OP_TMARK 32991
#define OP_IN 32992
#define OP_NIN 32993
#define OP_MBEGIN 32994
#define OP_FLIP 32995
#define OP_COUNT 32996
#define OP_CLEAR 32997
#define OP_UNIQ 32998
#define OP_ARRAY 32999
#define OP_GETARRAY 33000
#define OP_INITARRAY 33001
#define OP_SETARRAY 33002
#define OP_ARRAYCELL 33003
#define OP_ARRAYSLICE 33004
#define OP_COPYARRAY 33005
#define OP_DOTPRODUCT 33006
#define OP_PATTERN 33007
#define OP_PATTERN_C 35055
#define OP_PATTERN_E 37103
#define OP_PATTERN_EC 39151
#define OP_PATTERNS 33008
#define OP_PATTERNS_C 35056
#define OP_PATTERNS_E 37104
#define OP_PATTERNS_EC 39152
#define OP_ROOK 33009
#define OP_BISHOP 33010
#define OP_QUEEN 33011
#define OP_CUT 33012
#define OP_BIZARRO 33013
#define OP_BIZARRO_C 35061
#define OP_BIZARRO_E 37109
#define OP_BIZARRO_EC 39157
#define OP_BIZARROSWAP 33014
#define OP_BIZARROSWAP_D 41206
#define OP_SWAPWORLD 33015
#define OP_ABSTRACT 33016
#define OP_SUPER 33017
#define OP_SUPER_C 35065
#define OP_FUNCTION 33018
#define OP_LOCAL 33019
#define OP_LABEL 33020
#define OP_STRING 33021
#define OP_INT16 33022
#define OP_INT32 33023
#define OP_DISPATCH 33024
#define OP_USERFLAG 33025
#ifdef HEROMESH_CLASS
static const Op_Names op_names[]={
{"*",8486943},
{"+",8421405},
{"+Move",10584251},
{"-",8421406},
{"-Move",10584252},
{"-rot",8421382},
{".",10518528},
{"/",8486944},
{"ANHH",8389394},
{"ARRIVED",8389124},
{"Abstract",8683768},
{"Animate",8552596},
{"AnimateDead",8552597},
{"Arg1",8552576},
{"Arg2",8552577},
{"Arg3",8552578},
{"Array",8683751},
{"ArrayCell",8421611},
{"ArraySlice",8421612},
{"Arrivals",8618092},
{"Arrived",8618090},
{"Assassinate",8487062},
{"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",8683655},
{"Bishop",8683762},
{"Bizarro",8618229},
{"BizarroSwap",10518774},
{"Broadcast",10518679},
{"BroadcastAnd",8421528},
{"BroadcastAndEx",8421529},
{"BroadcastEx",10518683},
{"BroadcastList",8421532},
{"BroadcastListEx",8421533},
{"BroadcastSum",8421534},
︙︙
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560

{"CodePage",8683656},
{"CollisionLayers",8487036},
{"Coloc",8487074},
{"Compatible",8487035},
{"Connect",8487075},
{"Connection",8618104},
{"Control",8421514},
{"CopyArray",8421612},
{"Create",10518692},
{"DEEP_POP",8389417},
{"DEPARTED",8389125},
{"DESTROY",8389122},
{"DESTROYED",8389136},
{"DINK",8389390},
{"DOOR",8389378},








|








548
549
550
551
552
553
554
555
556
557
558
559
560
561
562

{"CodePage",8683656},
{"CollisionLayers",8487036},
{"Coloc",8487074},
{"Compatible",8487035},
{"Connect",8487075},
{"Connection",8618104},
{"Control",8421514},
{"CopyArray",8421613},
{"Create",10518692},
{"DEEP_POP",8389417},
{"DEPARTED",8389125},
{"DESTROY",8389122},
{"DESTROYED",8389136},
{"DINK",8389390},
{"DOOR",8389378},
︙︙
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

{"Departed",8618091},
{"Departures",8618093},
{"Destroy",10584232},
{"Destroyed",8487033},
{"Dir",8618054},
{"Distance",9142346},
{"Done",8618103},
{"DotProduct",8421613},
{"E",9437184},
{"END_TURN",8389139},
{"EditorHelp",8683665},
{"F",9437192},
{"FAROUT",8389421},
{"FFFFTT",8389399},
{"FLOATED",8389132},
{"FROG",8389383},
{"FakeMove",8487081},
{"Finished",8552582},
{"FlushClass",8421546},
{"FlushObj",8487083},
{"From",8421503},
{"GLASS",8389379},
{"GLISSANT",8389419},
{"GetArray",8421607},
{"GetInventory",8421548},
{"HAWK",8389425},
{"HEARTBEAT",8389407},
{"HIT",8389134},
{"HITBY",8389135},
{"Hard",8618072},
{"Height",9142354},
{"HeightAt",8421549},
{"Help",8683664},
{"HitMe",8421550},
{"INIT",8389120},
{"IgnoreKey",8421551},
{"Image",8618055},
{"InPlace",8683662},
{"Inertia",9142344},
{"InitArray",8421608},
{"Input",8683660},
{"IntMove",10584240},
{"Invisible",8618095},
{"JAYAYAYNG",8389416},
{"JUMPED",8389128},
{"JumpTo",10584241},
{"KEWEL",8389422},








|















|















|








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

{"Departed",8618091},
{"Departures",8618093},
{"Destroy",10584232},
{"Destroyed",8487033},
{"Dir",8618054},
{"Distance",9142346},
{"Done",8618103},
{"DotProduct",8421614},
{"E",9437184},
{"END_TURN",8389139},
{"EditorHelp",8683665},
{"F",9437192},
{"FAROUT",8389421},
{"FFFFTT",8389399},
{"FLOATED",8389132},
{"FROG",8389383},
{"FakeMove",8487081},
{"Finished",8552582},
{"FlushClass",8421546},
{"FlushObj",8487083},
{"From",8421503},
{"GLASS",8389379},
{"GLISSANT",8389419},
{"GetArray",8421608},
{"GetInventory",8421548},
{"HAWK",8389425},
{"HEARTBEAT",8389407},
{"HIT",8389134},
{"HITBY",8389135},
{"Hard",8618072},
{"Height",9142354},
{"HeightAt",8421549},
{"Help",8683664},
{"HitMe",8421550},
{"INIT",8389120},
{"IgnoreKey",8421551},
{"Image",8618055},
{"InPlace",8683662},
{"Inertia",9142344},
{"InitArray",8421609},
{"Input",8683660},
{"IntMove",10584240},
{"Invisible",8618095},
{"JAYAYAYNG",8389416},
{"JUMPED",8389128},
{"JumpTo",10584241},
{"KEWEL",8389422},
︙︙
635
636
637
638
639
640
641

642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
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
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752

{"Misc1",9142364},
{"Misc2",9142366},
{"Misc3",9142368},
{"Misc4",9142370},
{"Misc5",9142372},
{"Misc6",9142374},
{"Misc7",9142376},

{"Move",10584247},
{"Move+",10584248},
{"MoveNumber",8552579},
{"MoveTo",10584249},
{"Moved",8618101},
{"Moving",8618102},
{"Msg",8421502},
{"N",9437186},
{"NE",9437185},
{"NW",9437187},
{"NewX",8421564},
{"NewXY",8421565},
{"NewY",8421566},
{"OLDPHONE",8389402},
{"ONCE",8388609},
{"OSC",8388616},
{"OSCLOOP",8388618},
{"ObjAbove",8487103},
{"ObjBelow",8487104},
{"ObjBottomAt",8421569},
{"ObjClassAt",8421570},
{"ObjDir",8487107},
{"ObjLayerAt",8421572},
{"ObjMovingTo",8421573},
{"ObjTopAt",8421574},
{"Order",8683657},
{"Others",8683666},
{"P",8880366},
{"P*",8880367},
{"PLAYERMOVING",8389133},
{"POSTINIT",8389138},
{"POUR",8389377},
{"POWER",8389386},
{"Player",8487034},
{"PopUp",8421575},
{"Queen",8683762},
{"Quiz",8683661},
{"R",9437198},
{"RATCHET1",8389418},
{"RATCHET2",8389412},
{"RATTLE",8389403},
{"RB",9437197},
{"RF",9437199},
{"Rel",8487113},
{"Rook",8683760},
{"S",9437190},
{"SE",9437191},
{"SMALL_POP",8389389},
{"SPLASH",8389376},
{"STEAM",8389424},
{"STOP",8388608},
{"SUBS",8683667},
{"SUNK",8389131},
{"SW",9437189},
{"Seek",8487114},
{"Self",8421501},
{"Send",10584267},
{"SendEx",10584268},
{"SetArray",8421609},
{"SetInventory",8421581},
{"Shape",8618051},
{"ShapeDir",8618074},
{"Sharp",8618073},
{"Shovable",8618075},
{"Sound",8421582},
{"Stealthy",8618100},
{"Strength",9142358},
{"Super",8487160},
{"SwapWorld",8421622},
{"Sweep",8421583},
{"SweepEx",8421584},
{"Synchronize",8421585},
{"TAHTASHH",8389409},
{"THMP_thmp",8389405},
{"THWIT",8389384},
{"TICK",8389391},
{"Target",8487122},
{"Temperature",9142337},
{"Trace",8421587},
{"Trigger",8421588},
{"TriggerAt",8421589},
{"UH_OH",8389382},
{"UNCORK",8389414},
{"UNHH",8389381},
{"UserSignal",8618097},
{"UserState",8618098},
{"VACUUM",8389411},
{"VisualOnly",8618099},
{"Volume",9142350},
{"VolumeAt",8421590},
{"W",9437188},
{"WAHOO",8389400},
{"WHACK",8389423},
{"Weight",9142352},
{"WinLevel",8421591},
{"XDir",8487128},
{"XStep",8487129},
{"XYDir",8421594},
{"Xloc",8486980},
{"YDir",8487131},
{"YEEHAW",8389401},
{"YStep",8487132},
{"Yloc",8486981},
{"_",8421597},
{"a?",8421439},
{"again",8683533},
{"and",8683544},
{"band",8421415},
{"begin",8683532},
{"bit",8683563},
{"bit0",8388609},








>
|
|

|






|
|
|




|
|
|
|
|
|
|
|


|
|





|
|







|
|









|

|
|
|
|




|


|
|
|
|
|




|

|
|
|








|




|
|
|
|

|

|

|








637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
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
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755

{"Misc1",9142364},
{"Misc2",9142366},
{"Misc3",9142368},
{"Misc4",9142370},
{"Misc5",9142372},
{"Misc6",9142374},
{"Misc7",9142376},
{"Morton",8487095},
{"Move",10584248},
{"Move+",10584249},
{"MoveNumber",8552579},
{"MoveTo",10584250},
{"Moved",8618101},
{"Moving",8618102},
{"Msg",8421502},
{"N",9437186},
{"NE",9437185},
{"NW",9437187},
{"NewX",8421565},
{"NewXY",8421566},
{"NewY",8421567},
{"OLDPHONE",8389402},
{"ONCE",8388609},
{"OSC",8388616},
{"OSCLOOP",8388618},
{"ObjAbove",8487104},
{"ObjBelow",8487105},
{"ObjBottomAt",8421570},
{"ObjClassAt",8421571},
{"ObjDir",8487108},
{"ObjLayerAt",8421573},
{"ObjMovingTo",8421574},
{"ObjTopAt",8421575},
{"Order",8683657},
{"Others",8683666},
{"P",8880367},
{"P*",8880368},
{"PLAYERMOVING",8389133},
{"POSTINIT",8389138},
{"POUR",8389377},
{"POWER",8389386},
{"Player",8487034},
{"PopUp",8421576},
{"Queen",8683763},
{"Quiz",8683661},
{"R",9437198},
{"RATCHET1",8389418},
{"RATCHET2",8389412},
{"RATTLE",8389403},
{"RB",9437197},
{"RF",9437199},
{"Rel",8487114},
{"Rook",8683761},
{"S",9437190},
{"SE",9437191},
{"SMALL_POP",8389389},
{"SPLASH",8389376},
{"STEAM",8389424},
{"STOP",8388608},
{"SUBS",8683667},
{"SUNK",8389131},
{"SW",9437189},
{"Seek",8487115},
{"Self",8421501},
{"Send",10584268},
{"SendEx",10584269},
{"SetArray",8421610},
{"SetInventory",8421582},
{"Shape",8618051},
{"ShapeDir",8618074},
{"Sharp",8618073},
{"Shovable",8618075},
{"Sound",8421583},
{"Stealthy",8618100},
{"Strength",9142358},
{"Super",8487161},
{"SwapWorld",8421623},
{"Sweep",8421584},
{"SweepEx",8421585},
{"Synchronize",8421586},
{"TAHTASHH",8389409},
{"THMP_thmp",8389405},
{"THWIT",8389384},
{"TICK",8389391},
{"Target",8487123},
{"Temperature",9142337},
{"Trace",8421588},
{"Trigger",8421589},
{"TriggerAt",8421590},
{"UH_OH",8389382},
{"UNCORK",8389414},
{"UNHH",8389381},
{"UserSignal",8618097},
{"UserState",8618098},
{"VACUUM",8389411},
{"VisualOnly",8618099},
{"Volume",9142350},
{"VolumeAt",8421591},
{"W",9437188},
{"WAHOO",8389400},
{"WHACK",8389423},
{"Weight",9142352},
{"WinLevel",8421592},
{"XDir",8487129},
{"XStep",8487130},
{"XYDir",8421595},
{"Xloc",8486980},
{"YDir",8487132},
{"YEEHAW",8389401},
{"YStep",8487133},
{"Yloc",8486981},
{"_",8421598},
{"a?",8421439},
{"again",8683533},
{"and",8683544},
{"band",8421415},
{"begin",8683532},
{"bit",8683563},
{"bit0",8388609},
︙︙
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846

{"bit9",8423401},
{"bnot",8421418},
{"bor",8421416},
{"bxor",8421417},
{"c?",8421433},
{"case",8683542},
{"chain",8421536},
{"clear",8421604},
{"count",8421603},
{"cut",8683763},
{"cz?",8421434},
{"dup",8421377},
{"else",8683530},
{"eq",8421424},
{"eq2",8421425},
{"exec",8486940},
{"flip",8421602},
{"for",8683537},
{"fork",8683545},
{"ge",8486965},
{"gt",8486963},
{"if",8683529},
{"in",8421599},
{"is",8421431},
{"land",8421420},
{"le",8486966},
{"link",8683547},
{"lnot",8421423},
{"lor",8421421},
{"lsh",8421413},
{"lt",8486964},
{"lxor",8421422},
{"m?",8421435},
{"max",8486948},
{"mbegin",8683745},
{"min",8486947},
{"mod",8486945},
{"n?",8421432},
{"ne",8421426},
{"neg",8421410},
{"next",8683538},
{"nin",8421600},
{"nip",8421379},
{"o?",8421437},
{"or",8683543},
{"over",8421384},
{"oz?",8421438},
{"pick",8421383},
{"repeat",8683536},
{"ret",8421397},
{"rot",8421381},
{"rsh",8486950},
{"rtn",8683546},
{"s?",8421436},
{"swap",8421378},
{"then",8683531},
{"tmark",8421598},
{"tuck",8421380},
{"uniq",8421605},
{"until",8683534},
{"while",8683535},
};
#define N_OP_NAMES 358
#endif








|
|
|






|





|











|






|














|

|



|


786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849

{"bit9",8423401},
{"bnot",8421418},
{"bor",8421416},
{"bxor",8421417},
{"c?",8421433},
{"case",8683542},
{"chain",8421536},
{"clear",8421605},
{"count",8421604},
{"cut",8683764},
{"cz?",8421434},
{"dup",8421377},
{"else",8683530},
{"eq",8421424},
{"eq2",8421425},
{"exec",8486940},
{"flip",8421603},
{"for",8683537},
{"fork",8683545},
{"ge",8486965},
{"gt",8486963},
{"if",8683529},
{"in",8421600},
{"is",8421431},
{"land",8421420},
{"le",8486966},
{"link",8683547},
{"lnot",8421423},
{"lor",8421421},
{"lsh",8421413},
{"lt",8486964},
{"lxor",8421422},
{"m?",8421435},
{"max",8486948},
{"mbegin",8683746},
{"min",8486947},
{"mod",8486945},
{"n?",8421432},
{"ne",8421426},
{"neg",8421410},
{"next",8683538},
{"nin",8421601},
{"nip",8421379},
{"o?",8421437},
{"or",8683543},
{"over",8421384},
{"oz?",8421438},
{"pick",8421383},
{"repeat",8683536},
{"ret",8421397},
{"rot",8421381},
{"rsh",8486950},
{"rtn",8683546},
{"s?",8421436},
{"swap",8421378},
{"then",8683531},
{"tmark",8421599},
{"tuck",8421380},
{"uniq",8421606},
{"until",8683534},
{"while",8683535},
};
#define N_OP_NAMES 359
#endif

This page was generated in about 0.032s by Fossil version [8be0372c10] 2024-04-23 13:25:26