Free Hero Mesh

Check-in [a833709837]
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:Implement BroadcastAnd and BroadcastList instructions.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: a8337098374328fd654ef3a3e3a11ed7fd8a88c7
User & Date: user on 2021-04-24 19:09:08
Other Links: manifest | tags
Context
2021-04-25
02:39
Implement the other kinds of pattern matching (=P) (P*) (,P*) (=P*) but it is untested so far. check-in: c0f558d8e6 user: user tags: trunk
2021-04-24
19:09
Implement BroadcastAnd and BroadcastList instructions. check-in: a833709837 user: user tags: trunk
2021-04-22
03:00
Add possibility of additional code pages. check-in: 9959860889 user: user tags: trunk
Changes

Modified class.doc from [1c976b6d38] to [f8fa26ffcf].

1107
1108
1109
1110
1111
1112
1113








1114
1115
1116







1117
1118
1119
1120
1121
1122
1123
1107
1108
1109
1110
1111
1112
1113
1114
1115
1116
1117
1118
1119
1120
1121
1122
1123
1124
1125
1126
1127
1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
1138







+
+
+
+
+
+
+
+



+
+
+
+
+
+
+







  the creation of the objects. The result value is the number of objects
  of that class.

(Broadcast <class>)  ( message arg1 arg2 -- count )
  An alternative syntax for Broadcast (needed only for compatibility with
  EKS Hero Mesh).

BroadcastAnd  ( class message arg1 arg2 -- bool )
  As Broadcast but the result is 1 if all results are true, or 0 if at
  least one result is zero. If any result is zero, it doesn't send the
  message to the rest.

BroadcastAndEx  ( class message arg1 arg2 arg3 -- bool )
  As BroadcastSum but with three message arguments.

BroadcastEx  ( class message arg1 arg2 arg3 -- count )
  As Broadcast but with three message arguments.

BroadcastList  ( class message arg1 arg2 -- ... )
  As Broadcast but push all results to the stack. If any result is a mark,
  it is not pushed to the stack.

BroadcastListEx  ( class message arg1 arg2 arg3 -- ... )
  As BroadcastList but with three message arguments.

BroadcastSum  ( class message arg1 arg2 -- total )
  As Broadcast but the result is the sum of the return values rather than
  the number of objects. If a return value is a class or object, it is
  treated as 1. Other non-numeric return values are errors.

BroadcastSumEx  ( class message arg1 arg2 arg3 -- total )
  As BroadcastSum but with three message arguments.

Modified exec.c from [bb04a03311] to [6dbd0b402f].

65
66
67
68
69
70
71
72

73
74
75
76
77
78
79
65
66
67
68
69
70
71

72
73
74
75
76
77
78
79







-
+







#define Pop() (vstack[--vstackptr])

// For arrival/departure masks
#define Xbit(a) ((a)%5-2)
#define Ybit(a) (2-(a)/5)

static Value send_message(Uint32 from,Uint32 to,Uint16 msg,Value arg1,Value arg2,Value arg3);
static Uint32 broadcast(Uint32 from,int c,Uint16 msg,Value arg1,Value arg2,Value arg3,int s);
static Uint32 broadcast(Uint32 from,int c,Uint16 msg,Value arg1,Value arg2,Value arg3,Uint8 s);
static Value destroy(Uint32 from,Uint32 to,Uint32 why);

static const Sint8 x_delta[8]={1,1,0,-1,-1,-1,0,1};
static const Sint8 y_delta[8]={0,-1,-1,-1,0,1,1,1};

const unsigned char*value_string_ptr(Value v) {
  switch(v.t) {
1899
1900
1901
1902
1903
1904
1905


1906
1907
1908


1909
1910
1911
1912
1913
1914
1915
1899
1900
1901
1902
1903
1904
1905
1906
1907
1908
1909
1910
1911
1912
1913
1914
1915
1916
1917
1918
1919







+
+



+
+







    case OP_ASSASSINATE: NoIgnore(); destroy(obj,obj,8); break;
    case OP_ASSASSINATE_C: NoIgnore(); StackReq(1,0); i=v_object(Pop()); destroy(obj,i,8); break;
    case OP_BAND: StackReq(2,1); t2=Pop(); Numeric(t2); t1=Pop(); Numeric(t1); Push(NVALUE(t1.u&t2.u)); break;
    case OP_BNOT: StackReq(1,1); t1=Pop(); Numeric(t1); Push(NVALUE(~t1.u)); break;
    case OP_BOR: StackReq(2,1); t2=Pop(); Numeric(t2); t1=Pop(); Numeric(t1); Push(NVALUE(t1.u|t2.u)); break;
    case OP_BROADCAST: StackReq(4,1); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); Push(v_broadcast(obj,t1,t2,t3,t4,NVALUE(0),0)); break;
    case OP_BROADCAST_D: StackReq(4,0); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); v_broadcast(obj,t1,t2,t3,t4,NVALUE(0),0); break;
    case OP_BROADCASTAND: StackReq(4,1); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); Push(v_broadcast(obj,t1,t2,t3,t4,NVALUE(0),2)); break;
    case OP_BROADCASTANDEX: StackReq(5,1); t5=Pop(); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); Push(v_broadcast(obj,t1,t2,t3,t4,t5,2)); break;
    case OP_BROADCASTCLASS: StackReq(3,1); t4=Pop(); t3=Pop(); t2=Pop(); Push(v_broadcast(obj,CVALUE(code[ptr++]),t2,t3,t4,NVALUE(0),0)); break;
    case OP_BROADCASTEX: StackReq(5,1); t5=Pop(); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); Push(v_broadcast(obj,t1,t2,t3,t4,t5,0)); break;
    case OP_BROADCASTEX_D: StackReq(5,0); t5=Pop(); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); v_broadcast(obj,t1,t2,t3,t4,t5,0); break;
    case OP_BROADCASTLIST: StackReq(4,0); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); v_broadcast(obj,t1,t2,t3,t4,NVALUE(0),3); break;
    case OP_BROADCASTLISTEX: StackReq(5,0); t5=Pop(); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); v_broadcast(obj,t1,t2,t3,t4,t5,3); break;
    case OP_BROADCASTSUM: StackReq(4,1); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); Push(v_broadcast(obj,t1,t2,t3,t4,NVALUE(0),1)); break;
    case OP_BROADCASTSUMEX: StackReq(5,1); t5=Pop(); t4=Pop(); t3=Pop(); t2=Pop(); t1=Pop(); Push(v_broadcast(obj,t1,t2,t3,t4,t5,1)); break;
    case OP_BUSY: StackReq(0,1); if(o->oflags&OF_BUSY) Push(NVALUE(1)); else Push(NVALUE(0)); break;
    case OP_BUSY_C: StackReq(1,1); GetFlagOf(OF_BUSY); break;
    case OP_BUSY_E: NoIgnore(); StackReq(1,0); if(v_bool(Pop())) o->oflags|=OF_BUSY; else o->oflags&=~OF_BUSY; break;
    case OP_BUSY_EC: NoIgnore(); StackReq(2,0); SetFlagOf(OF_BUSY); break;
    case OP_BXOR: StackReq(2,1); t2=Pop(); Numeric(t2); t1=Pop(); Numeric(t1); Push(NVALUE(t1.u^t2.u)); break;
2287
2288
2289
2290
2291
2292
2293
2294

2295
2296
2297
2298

2299

2300
2301
2302
2303
2304
2305
2306
2307
2308
2309
2310
2311
2312
2313























2314
2315
2316
2317
2318
2319
2320
2291
2292
2293
2294
2295
2296
2297

2298
2299
2300
2301
2302
2303

2304
2305
2306
2307
2308










2309
2310
2311
2312
2313
2314
2315
2316
2317
2318
2319
2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
2330
2331
2332
2333
2334
2335
2336
2337
2338







-
+




+
-
+




-
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+







  if(vstackptr==stackptr) {
    return NVALUE(0);
  } else {
    return Pop();
  }
}

static Uint32 broadcast(Uint32 from,int c,Uint16 msg,Value arg1,Value arg2,Value arg3,int s) {
static Uint32 broadcast(Uint32 from,int c,Uint16 msg,Value arg1,Value arg2,Value arg3,Uint8 s) {
  Uint32 t=0;
  Uint32 n;
  Object*o;
  Value v;
  if(s==2) t=0xFFFFFFFFULL;
  if(lastobj==VOIDLINK) return;
  if(lastobj==VOIDLINK) return t;
  n=lastobj;
  while(o=objects[n]) {
    if(!c || o->class==c) {
      v=send_message(from,n,msg,arg1,arg2,arg3);
      if(s) {
        switch(v.t) {
          case TY_NUMBER: t+=v.u; break;
          case TY_CLASS: t++; break;
          default:
            if(v.t<=TY_MAXTYPE) Throw("Invalid return type for BroadcastSum");
            t++;
        }
      } else {
        t++;
      switch(s) {
        case 0:
          t++;
          break;
        case 1:
          switch(v.t) {
            case TY_NUMBER: t+=v.u; break;
            case TY_CLASS: t++; break;
            default:
              if(v.t<=TY_MAXTYPE) Throw("Invalid return type for BroadcastSum");
              t++;
          }
          break;
        case 2:
          switch(v.t) {
            case TY_NUMBER: if(!v.u) return 0;
            case TY_SOUND: case TY_USOUND: Throw("Invalid return type for BroadcastAnd");
          }
          break;
        case 3:
          StackReq(0,1);
          if(v.t!=TY_MARK) Push(v);
          break;
      }
    }
    n=o->prev;
    if(n==VOIDLINK) break;
  }
  return t;
}

Modified instruc from [271efa52f9] to [869360b1b5].

206
207
208
209
210
211
212


213
214


215
216
217
218
219
220
221
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225







+
+


+
+







-SUBS

; Main operations
Animate
AnimateDead
,Assassinate ; destroy without sending any messages
.Broadcast
BroadcastAnd ; Broadcast, but result is AND of return values
BroadcastAndEx
*BroadcastClass ; for (Broadcast [class])
.BroadcastEx ; broadcast with three arguments
BroadcastList ; Broadcast, pushing results to stack
BroadcastListEx
BroadcastSum ; Broadcast, but result is sum of return values
BroadcastSumEx
chain
,Chebyshev
,Coloc
.Create
DelInventory

Modified instruc.h from [53b9bd40aa] to [184c39d2de].

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
658
659
660
661
662
663



664
665

666
667
668

669
670
671
672
673
674
675
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
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







-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+




-
+

-
+










-
-
-
+
+
+

















+
+
-
-
-
+
+
+
+
+










-
+




-
+

-
-
+
+









-
-
+
+



-
+




-
+



-
+






-
-
-
+
+
+



-
-
+
+






-
+


-
+



-
+

-
+



-
+













-
-
-
+
+
+


-
-
+
+







-
-
+
+

-
+






-
-
-
+
+
+




-
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+





-
+







-
+









-
+

-
-
-
-
+
+
+
+




-
+


-
+




-
+

-
+








-
+




-
-
-
+
+
+

-
+


-
+







#define OP_SUBS 32904
#define OP_ANIMATE 32905
#define OP_ANIMATEDEAD 32906
#define OP_ASSASSINATE 32907
#define OP_ASSASSINATE_C 34955
#define OP_BROADCAST 32908
#define OP_BROADCAST_D 41100
#define OP_BROADCASTCLASS 32909
#define OP_BROADCASTEX 32910
#define OP_BROADCASTEX_D 41102
#define OP_BROADCASTSUM 32911
#define OP_BROADCASTSUMEX 32912
#define OP_CHAIN 32913
#define OP_CHEBYSHEV 32914
#define OP_CHEBYSHEV_C 34962
#define OP_COLOC 32915
#define OP_COLOC_C 34963
#define OP_CREATE 32916
#define OP_CREATE_D 41108
#define OP_DELINVENTORY 32917
#define OP_DELTA 32918
#define OP_DESTROY 32919
#define OP_DESTROY_C 34967
#define OP_DESTROY_D 41111
#define OP_DESTROY_CD 43159
#define OP_FLUSHCLASS 32920
#define OP_FLUSHOBJ 32921
#define OP_FLUSHOBJ_C 34969
#define OP_GETINVENTORY 32922
#define OP_HEIGHTAT 32923
#define OP_IGNOREKEY 32924
#define OP_INTMOVE 32925
#define OP_INTMOVE_C 34973
#define OP_INTMOVE_D 41117
#define OP_INTMOVE_CD 43165
#define OP_JUMPTO 32926
#define OP_JUMPTO_C 34974
#define OP_BROADCASTAND 32909
#define OP_BROADCASTANDEX 32910
#define OP_BROADCASTCLASS 32911
#define OP_BROADCASTEX 32912
#define OP_BROADCASTEX_D 41104
#define OP_BROADCASTLIST 32913
#define OP_BROADCASTLISTEX 32914
#define OP_BROADCASTSUM 32915
#define OP_BROADCASTSUMEX 32916
#define OP_CHAIN 32917
#define OP_CHEBYSHEV 32918
#define OP_CHEBYSHEV_C 34966
#define OP_COLOC 32919
#define OP_COLOC_C 34967
#define OP_CREATE 32920
#define OP_CREATE_D 41112
#define OP_DELINVENTORY 32921
#define OP_DELTA 32922
#define OP_DESTROY 32923
#define OP_DESTROY_C 34971
#define OP_DESTROY_D 41115
#define OP_DESTROY_CD 43163
#define OP_FLUSHCLASS 32924
#define OP_FLUSHOBJ 32925
#define OP_FLUSHOBJ_C 34973
#define OP_GETINVENTORY 32926
#define OP_HEIGHTAT 32927
#define OP_IGNOREKEY 32928
#define OP_INTMOVE 32929
#define OP_INTMOVE_C 34977
#define OP_INTMOVE_D 41121
#define OP_INTMOVE_CD 43169
#define OP_JUMPTO 32930
#define OP_JUMPTO_C 34978
#define OP_JUMPTO_D 41118
#define OP_JUMPTO_CD 43166
#define OP_LOC 32927
#define OP_LOC_C 34975
#define OP_LOCATEME 32928
#define OP_LOSELEVEL 32929
#define OP_MANHATTAN 32930
#define OP_MANHATTAN_C 34978
#define OP_MAXINVENTORY 32931
#define OP_MOVE 32932
#define OP_MOVE_C 34980
#define OP_MOVE_D 41124
#define OP_MOVE_CD 43172
#define OP_MOVEPLUS 32933
#define OP_MOVEPLUS_C 34981
#define OP_MOVEPLUS_D 41125
#define OP_MOVEPLUS_CD 43173
#define OP_MOVETO 32934
#define OP_MOVETO_C 34982
#define OP_MOVETO_D 41126
#define OP_MOVETO_CD 43174
#define OP_PLUSMOVE 32935
#define OP_PLUSMOVE_C 34983
#define OP_PLUSMOVE_D 41127
#define OP_PLUSMOVE_CD 43175
#define OP_MINUSMOVE 32936
#define OP_MINUSMOVE_C 34984
#define OP_MINUSMOVE_D 41128
#define OP_MINUSMOVE_CD 43176
#define OP_NEWX 32937
#define OP_NEWXY 32938
#define OP_NEWY 32939
#define OP_OBJABOVE 32940
#define OP_OBJABOVE_C 34988
#define OP_OBJBELOW 32941
#define OP_OBJBELOW_C 34989
#define OP_OBJBOTTOMAT 32942
#define OP_OBJCLASSAT 32943
#define OP_OBJDIR 32944
#define OP_OBJDIR_C 34992
#define OP_OBJLAYERAT 32945
#define OP_OBJMOVINGTO 32946
#define OP_OBJTOPAT 32947
#define OP_POPUP 32948
#define OP_POPUPARGS 32949
#define OP_REL 32950
#define OP_REL_C 34998
#define OP_SEEK 32951
#define OP_SEEK_C 34999
#define OP_SEND 32952
#define OP_SEND_C 35000
#define OP_SEND_D 41144
#define OP_SEND_CD 43192
#define OP_SENDEX 32953
#define OP_SENDEX_C 35001
#define OP_SENDEX_D 41145
#define OP_SENDEX_CD 43193
#define OP_SETINVENTORY 32954
#define OP_SOUND 32955
#define OP_SYNCHRONIZE 32956
#define OP_TARGET 32957
#define OP_TARGET_C 35005
#define OP_TRACE 32958
#define OP_VOLUMEAT 32959
#define OP_WINLEVEL 32960
#define OP_XDIR 32961
#define OP_XDIR_C 35009
#define OP_XYDIR 32962
#define OP_YDIR 32963
#define OP_YDIR_C 35011
#define OP_MARK 32964
#define OP_TMARK 32965
#define OP_IN 32966
#define OP_NIN 32967
#define OP_MBEGIN 32968
#define OP_FLIP 32969
#define OP_ARRAY 32970
#define OP_GETARRAY 32971
#define OP_INITARRAY 32972
#define OP_SETARRAY 32973
#define OP_ARRAYCELL 32974
#define OP_ARRAYSLICE 32975
#define OP_COPYARRAY 32976
#define OP_DOTPRODUCT 32977
#define OP_PATTERN 32978
#define OP_PATTERN_C 35026
#define OP_PATTERN_E 37074
#define OP_PATTERN_EC 39122
#define OP_PATTERNS 32979
#define OP_PATTERNS_C 35027
#define OP_PATTERNS_E 37075
#define OP_PATTERNS_EC 39123
#define OP_FOUR 32980
#define OP_EIGHT 32981
#define OP_CUT 32982
#define OP_FUNCTION 32983
#define OP_LOCAL 32984
#define OP_LABEL 32985
#define OP_STRING 32986
#define OP_INT16 32987
#define OP_INT32 32988
#define OP_DISPATCH 32989
#define OP_USERFLAG 32990
#define OP_JUMPTO_D 41122
#define OP_JUMPTO_CD 43170
#define OP_LOC 32931
#define OP_LOC_C 34979
#define OP_LOCATEME 32932
#define OP_LOSELEVEL 32933
#define OP_MANHATTAN 32934
#define OP_MANHATTAN_C 34982
#define OP_MAXINVENTORY 32935
#define OP_MOVE 32936
#define OP_MOVE_C 34984
#define OP_MOVE_D 41128
#define OP_MOVE_CD 43176
#define OP_MOVEPLUS 32937
#define OP_MOVEPLUS_C 34985
#define OP_MOVEPLUS_D 41129
#define OP_MOVEPLUS_CD 43177
#define OP_MOVETO 32938
#define OP_MOVETO_C 34986
#define OP_MOVETO_D 41130
#define OP_MOVETO_CD 43178
#define OP_PLUSMOVE 32939
#define OP_PLUSMOVE_C 34987
#define OP_PLUSMOVE_D 41131
#define OP_PLUSMOVE_CD 43179
#define OP_MINUSMOVE 32940
#define OP_MINUSMOVE_C 34988
#define OP_MINUSMOVE_D 41132
#define OP_MINUSMOVE_CD 43180
#define OP_NEWX 32941
#define OP_NEWXY 32942
#define OP_NEWY 32943
#define OP_OBJABOVE 32944
#define OP_OBJABOVE_C 34992
#define OP_OBJBELOW 32945
#define OP_OBJBELOW_C 34993
#define OP_OBJBOTTOMAT 32946
#define OP_OBJCLASSAT 32947
#define OP_OBJDIR 32948
#define OP_OBJDIR_C 34996
#define OP_OBJLAYERAT 32949
#define OP_OBJMOVINGTO 32950
#define OP_OBJTOPAT 32951
#define OP_POPUP 32952
#define OP_POPUPARGS 32953
#define OP_REL 32954
#define OP_REL_C 35002
#define OP_SEEK 32955
#define OP_SEEK_C 35003
#define OP_SEND 32956
#define OP_SEND_C 35004
#define OP_SEND_D 41148
#define OP_SEND_CD 43196
#define OP_SENDEX 32957
#define OP_SENDEX_C 35005
#define OP_SENDEX_D 41149
#define OP_SENDEX_CD 43197
#define OP_SETINVENTORY 32958
#define OP_SOUND 32959
#define OP_SYNCHRONIZE 32960
#define OP_TARGET 32961
#define OP_TARGET_C 35009
#define OP_TRACE 32962
#define OP_VOLUMEAT 32963
#define OP_WINLEVEL 32964
#define OP_XDIR 32965
#define OP_XDIR_C 35013
#define OP_XYDIR 32966
#define OP_YDIR 32967
#define OP_YDIR_C 35015
#define OP_MARK 32968
#define OP_TMARK 32969
#define OP_IN 32970
#define OP_NIN 32971
#define OP_MBEGIN 32972
#define OP_FLIP 32973
#define OP_ARRAY 32974
#define OP_GETARRAY 32975
#define OP_INITARRAY 32976
#define OP_SETARRAY 32977
#define OP_ARRAYCELL 32978
#define OP_ARRAYSLICE 32979
#define OP_COPYARRAY 32980
#define OP_DOTPRODUCT 32981
#define OP_PATTERN 32982
#define OP_PATTERN_C 35030
#define OP_PATTERN_E 37078
#define OP_PATTERN_EC 39126
#define OP_PATTERNS 32983
#define OP_PATTERNS_C 35031
#define OP_PATTERNS_E 37079
#define OP_PATTERNS_EC 39127
#define OP_FOUR 32984
#define OP_EIGHT 32985
#define OP_CUT 32986
#define OP_FUNCTION 32987
#define OP_LOCAL 32988
#define OP_LABEL 32989
#define OP_STRING 32990
#define OP_INT16 32991
#define OP_INT32 32992
#define OP_DISPATCH 32993
#define OP_USERFLAG 32994
#ifdef HEROMESH_CLASS
static const Op_Names op_names[]={
{"*",8486937},
{"+",8421399},
{"+Move",10584231},
{"+Move",10584235},
{"-",8421400},
{"-Move",10584232},
{"-Move",10584236},
{"-rot",8421382},
{".",10518528},
{"/",8486938},
{"ANHH",8389394},
{"ARRIVED",8389124},
{"Animate",8421513},
{"AnimateDead",8421514},
{"Arg1",8552569},
{"Arg2",8552570},
{"Arg3",8552571},
{"Array",8683722},
{"ArrayCell",8421582},
{"ArraySlice",8421583},
{"Array",8683726},
{"ArrayCell",8421586},
{"ArraySlice",8421587},
{"Arrivals",8618086},
{"Arrived",8618084},
{"Assassinate",8487051},
{"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",10518668},
{"BroadcastAnd",8421517},
{"BroadcastAndEx",8421518},
{"BroadcastEx",10518670},
{"BroadcastSum",8421519},
{"BroadcastSumEx",8421520},
{"BroadcastEx",10518672},
{"BroadcastList",8421521},
{"BroadcastListEx",8421522},
{"BroadcastSum",8421523},
{"BroadcastSumEx",8421524},
{"Busy",8618088},
{"CHEEP",8389393},
{"CHYEW",8389392},
{"CLICK",8389388},
{"COLLIDE",8389142},
{"COLLIDEBY",8389141},
{"COLLIDING",8389143},
{"CONFLICT",8389140},
{"CREATE",8389121},
{"CREATED",8389137},
{"Chebyshev",8487058},
{"Chebyshev",8487062},
{"Class",8486970},
{"Climb",9142350},
{"CodePage",8683649},
{"CollisionLayers",8487029},
{"Coloc",8487059},
{"Coloc",8487063},
{"Compatible",8487028},
{"CopyArray",8421584},
{"Create",10518676},
{"CopyArray",8421588},
{"Create",10518680},
{"DEEP_POP",8389417},
{"DEPARTED",8389125},
{"DESTROY",8389122},
{"DESTROYED",8389136},
{"DINK",8389390},
{"DOOR",8389378},
{"DRLRLRINK",8389398},
{"DYUPE",8389413},
{"DefaultImage",8683653},
{"DelInventory",8421525},
{"Delta",8421526},
{"DelInventory",8421529},
{"Delta",8421530},
{"Density",9142342},
{"Departed",8618085},
{"Departures",8618087},
{"Destroy",10584215},
{"Destroy",10584219},
{"Destroyed",8487026},
{"Dir",8618048},
{"Distance",9142340},
{"Done",8618097},
{"DotProduct",8421585},
{"DotProduct",8421589},
{"E",9437184},
{"END_TURN",8389139},
{"EditorHelp",8683655},
{"Eight",8683733},
{"Eight",8683737},
{"F",9437192},
{"FAROUT",8389421},
{"FFFFTT",8389399},
{"FLOATED",8389132},
{"FROG",8389383},
{"Finished",8552575},
{"FlushClass",8421528},
{"FlushObj",8487065},
{"Four",8683732},
{"FlushClass",8421532},
{"FlushObj",8487069},
{"Four",8683736},
{"From",8421496},
{"GLASS",8389379},
{"GLISSANT",8389419},
{"GetArray",8421579},
{"GetInventory",8421530},
{"GetArray",8421583},
{"GetInventory",8421534},
{"HAWK",8389425},
{"HEARTBEAT",8389407},
{"HIT",8389134},
{"HITBY",8389135},
{"Hard",8618066},
{"Height",9142348},
{"HeightAt",8421531},
{"HeightAt",8421535},
{"Help",8683654},
{"INIT",8389120},
{"IgnoreKey",8421532},
{"IgnoreKey",8421536},
{"Image",8618049},
{"InPlace",8683652},
{"Inertia",9142338},
{"InitArray",8421580},
{"InitArray",8421584},
{"Input",8683650},
{"IntMove",10584221},
{"IntMove",10584225},
{"Invisible",8618089},
{"JAYAYAYNG",8389416},
{"JUMPED",8389128},
{"JumpTo",10584222},
{"JumpTo",10584226},
{"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",8487071},
{"LocateMe",8421536},
{"LoseLevel",8421537},
{"Loc",8487075},
{"LocateMe",8421540},
{"LoseLevel",8421541},
{"MOVED",8389127},
{"MOVING",8389130},
{"Manhattan",8487074},
{"MaxInventory",8421539},
{"Manhattan",8487078},
{"MaxInventory",8421543},
{"Misc1",9142358},
{"Misc2",9142360},
{"Misc3",9142362},
{"Misc4",9142364},
{"Misc5",9142366},
{"Misc6",9142368},
{"Misc7",9142370},
{"Move",10584228},
{"Move+",10584229},
{"Move",10584232},
{"Move+",10584233},
{"MoveNumber",8421500},
{"MoveTo",10584230},
{"MoveTo",10584234},
{"Moved",8618095},
{"Moving",8618096},
{"Msg",8421495},
{"N",9437186},
{"NE",9437185},
{"NW",9437187},
{"NewX",8421545},
{"NewXY",8421546},
{"NewY",8421547},
{"NewX",8421549},
{"NewXY",8421550},
{"NewY",8421551},
{"OLDPHONE",8389402},
{"ONCE",8388609},
{"OSC",8388616},
{"OSCLOOP",8388618},
{"ObjAbove",8487084},
{"ObjBelow",8487085},
{"ObjBottomAt",8421550},
{"ObjClassAt",8421551},
{"ObjDir",8487088},
{"ObjLayerAt",8421553},
{"ObjMovingTo",8421554},
{"ObjTopAt",8421555},
{"P",8880338},
{"P*",8880339},
{"ObjAbove",8487088},
{"ObjBelow",8487089},
{"ObjBottomAt",8421554},
{"ObjClassAt",8421555},
{"ObjDir",8487092},
{"ObjLayerAt",8421557},
{"ObjMovingTo",8421558},
{"ObjTopAt",8421559},
{"P",8880342},
{"P*",8880343},
{"PLAYERMOVING",8389133},
{"POSTINIT",8389138},
{"POUR",8389377},
{"POWER",8389386},
{"Player",8487027},
{"PopUp",8421556},
{"PopUp",8421560},
{"Quiz",8683651},
{"R",9437198},
{"RATCHET1",8389418},
{"RATCHET2",8389412},
{"RATTLE",8389403},
{"RB",9437197},
{"RF",9437199},
{"Rel",8487094},
{"Rel",8487098},
{"S",9437190},
{"SE",9437191},
{"SMALL_POP",8389389},
{"SPLASH",8389376},
{"STEAM",8389424},
{"STOP",8388608},
{"SUBS",8683656},
{"SUNK",8389131},
{"SW",9437189},
{"Seek",8487095},
{"Seek",8487099},
{"Self",8421494},
{"Send",10584248},
{"SendEx",10584249},
{"SetArray",8421581},
{"SetInventory",8421562},
{"Send",10584252},
{"SendEx",10584253},
{"SetArray",8421585},
{"SetInventory",8421566},
{"Shape",8618045},
{"ShapeDir",8618068},
{"Sharp",8618067},
{"Shovable",8618069},
{"Sound",8421563},
{"Sound",8421567},
{"Stealthy",8618094},
{"Strength",9142352},
{"Synchronize",8421564},
{"Synchronize",8421568},
{"TAHTASHH",8389409},
{"THMP_thmp",8389405},
{"THWIT",8389384},
{"TICK",8389391},
{"Target",8487101},
{"Target",8487105},
{"Temperature",9142331},
{"Trace",8421566},
{"Trace",8421570},
{"UH_OH",8389382},
{"UNCORK",8389414},
{"UNHH",8389381},
{"UserSignal",8618091},
{"UserState",8618092},
{"VACUUM",8389411},
{"VisualOnly",8618093},
{"Volume",9142344},
{"VolumeAt",8421567},
{"VolumeAt",8421571},
{"W",9437188},
{"WAHOO",8389400},
{"WHACK",8389423},
{"Weight",9142346},
{"WinLevel",8421568},
{"XDir",8487105},
{"XYDir",8421570},
{"WinLevel",8421572},
{"XDir",8487109},
{"XYDir",8421574},
{"Xloc",8486974},
{"YDir",8487107},
{"YDir",8487111},
{"YEEHAW",8389401},
{"Yloc",8486975},
{"_",8421572},
{"_",8421576},
{"a?",8421433},
{"again",8683534},
{"band",8421409},
{"begin",8683533},
{"bit",8683557},
{"bit0",8388609},
{"bit1",8388610},
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
756
757
758
759

760
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
756
757
758
759
760
761

762
763
764
765
766

767
768







-
-
+
+






-
+




-
+










-
+






-
+












-
+




-
+

{"bit7",8388736},
{"bit8",8423400},
{"bit9",8423401},
{"bnot",8421412},
{"bor",8421410},
{"bxor",8421411},
{"c?",8421427},
{"chain",8421521},
{"cut",8683734},
{"chain",8421525},
{"cut",8683738},
{"cz?",8421428},
{"dup",8421377},
{"el",8683532},
{"else",8683530},
{"eq",8421418},
{"eq2",8421419},
{"flip",8421577},
{"flip",8421581},
{"for",8683538},
{"ge",8486959},
{"gt",8486957},
{"if",8683529},
{"in",8421574},
{"in",8421578},
{"is",8421425},
{"land",8421414},
{"le",8486960},
{"lnot",8421417},
{"lor",8421415},
{"lsh",8421407},
{"lt",8486958},
{"lxor",8421416},
{"m?",8421429},
{"max",8486942},
{"mbegin",8683720},
{"mbegin",8683724},
{"min",8486941},
{"mod",8486939},
{"n?",8421426},
{"ne",8421420},
{"neg",8421404},
{"next",8683539},
{"nin",8421575},
{"nin",8421579},
{"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",8421573},
{"tmark",8421577},
{"tuck",8421380},
{"until",8683535},
{"while",8683536},
};
#define N_OP_NAMES 323
#define N_OP_NAMES 327
#endif