@@ -448,88 +448,6 @@ void MCDo::compile(MCSyntaxFactoryRef ctxt)
448448 MCSyntaxFactoryEndStatement (ctxt);
449449}
450450
451- typedef struct
452- {
453- const char *token;
454- const char *command;
455- }
456- DT;
457-
458- static DT domenu_table[] = {
459- {" new stack..." , " create stack\n \
460- set the mainStack of the topStack to \" Home\"\n \
461- modal \" Stack Properties\" " },
462- {" open stack..." , " answer file \" Choose a stack to open...\"\n \
463- if it is not empty then\n \
464- set the cursor to watch\n \
465- topLevel it\n \
466- end if" },
467- {" close stack" , " close this stack" },
468- {" compact stack" , " compact stack" },
469- {" print card" , " print this card" },
470- {" print stack..." , " print this stack" },
471- {" quit hypercard" , " quit" },
472- {" quit" , " quit" },
473- {" undo" , " undo" },
474- {" cut" , " cut" },
475- {" copy" , " copy" },
476- {" paste" , " paste" },
477- {" new card" , " create card" },
478- {" delete card" , " delete this card" },
479- {" cut card" , " cut this card" },
480- {" copy card" , " copy this card" },
481- {" background" , " edit background" },
482- {" back" , " go back" },
483- {" home" , " go home" },
484- {" help" , " help" },
485- {" recent" , " go recent" },
486- {" first" , " go to first card" },
487- {" prev" , " go to prev card" },
488- {" next" , " go to next card" },
489- {" last" , " go to last card" },
490- {" find..." , " modeless \" Find\" " },
491- {" message" , " modeless \" Message Box\" " },
492- {" bring closer" , " set the layer of the selobj to the layer of the selobj+1" },
493- {" send farther" , " set the layer of the selobj to the layer of the selobj-1" },
494- {" new button" , " create button" },
495- {" new field" , " create field" },
496- {" new background" , " create background" },
497- };
498-
499- /* doMenu items
500- About Hypercard..., New Stack..., Open Stack..., Close Stack, Save A
501- Copy..., Compact Stack, Protect Stack..., Delete Stack..., Page
502- Setup..., Print Field..., Print Card, Print Stack..., Print Report...,
503- Quit Hypercard, Undo, Cut, Copy, Paste, New Card, Delete Card, Cut
504- Card, Copy Card, Text Style..., Background, Icon..., Back, Home, Help,
505- recent, First, Prev, Next, Last, Find..., Message, Scroll, Next
506- Window, Button Info..., Field Info..., Card Info..., Bkgnd Info...,
507- Stack Info..., Bring Closer, Send Farther, New Button, New Field, New
508- Background, Plain, Bold, Italic, Underline, Outline, Shadow, Condense,
509- Extend, Group, Other..., Select, Select All, Fill, Invert, Pickup,
510- Darken, Lighten, Trace Edges, Rotate Left, Rotate Right, Flip
511- Vertical, Flip Horizontal, Opaque, Transparent, Keep, Revert, grid,
512- Fatbits, Power Keys, Line Size..., brush Shape..., Edit pattern...,
513- Polygon Sides..., Draw filled, Draw centered, Draw multiple, Rotate,
514- Slant, distort, Perspective, Import Paint..., Export Paint..., New
515- Icon, Close Icon Editor, Duplicate Icon, Cut Icon, Copy Icon, Erase,
516- Frame, Gray, Mirror Horizontal, Mirror Vertical, Rotate 90, Shadow,
517- Delete Report, Cut Report, Copy Report, Report Items..., Report
518- Name..., New Report, New Item, Item Info..., Close Script, Save
519- Script, Revert To Saved, Print Script, Find Again, Find Selection,
520- Scroll To Selection, Replace..., Replace Again, Comment, Uncomment,
521- Set Checkpoint, Step, Step Into, Trace, Go, Trace Delay..., Abort,
522- Variable Watcher, Message Watcher
523- */
524- const char *MCDoMenu::lookup (MCStringRef s)
525- {
526- uint2 size = ELEMENTS (domenu_table);
527- while (size--)
528- if (MCStringIsEqualToCString (s, domenu_table[size].token , kMCCompareCaseless ))
529- return domenu_table[size].command ;
530- return NULL ;
531- }
532-
533451MCDoMenu::~MCDoMenu ()
534452{
535453 delete source;
0 commit comments