home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1997 March / VPR9703A.ISO / VPR_DATA / DOGA / SOURCES / POLYEDIT.LZH / MACRO / KEYBIND.M < prev    next >
Text File  |  1996-07-02  |  2KB  |  109 lines
  1. function private KeyNextWide()
  2. {
  3.     if(( ShiftStat() & 1 ) == 1 )
  4.         SelectWide();
  5.     else
  6.         SelectNext();
  7. }
  8.  
  9. function private KeyPrevNarrow()
  10. {
  11.     if(( ShiftStat() & 1 ) == 1 )
  12.         SelectNarrow();
  13.     else
  14.         SelectPrev();
  15. }
  16.  
  17. function private PersorAll()
  18. {
  19.     if(( ShiftStat() & 1 ) == 1 )
  20.         AllInit();
  21.     else
  22.         PersInit();
  23. }
  24.  
  25. //
  26. //    ファイルメニューのショートカットキー
  27. //
  28. KeyEvent( Quit, "\x3" );
  29. //KeyEvent( Save, "" );
  30. //KeyEvent( SaveAll, "\x13" );
  31.  
  32. //
  33. //    面選択メニューのショートカットキー
  34. //
  35. KeyEvent( _SelectAll, "S" );
  36. KeyEvent( DeselectAll, "D" );
  37. KeyEvent( _SelectArea, "s" );
  38. KeyEvent( DeselectArea, "d" );
  39. KeyEvent( SelectInv, "n" );
  40. KeyEvent( _SelectAtr, "a" );
  41. KeyEvent( _SelectAtr, "A" );
  42. KeyEvent( _SelectObj, "o" );
  43. KeyEvent( _SelectObj, "O" );
  44. KeyEvent( KeyNextWide, KEY_ROLLUP );
  45. KeyEvent( KeyPrevNarrow, KEY_ROLLDOWN );
  46.  
  47. //
  48. //    作成メニューのショートカットキー
  49. //
  50. KeyEvent( _InputVertex, KEY_CLR );
  51. KeyEvent( Polygon, "p" );
  52. KeyEvent( EquilateralPolygon, "e" );
  53. KeyEvent( Rectangle, "h" );
  54. KeyEvent( Ball, "g" );
  55. KeyEvent( RotationBody, "r" );
  56. KeyEvent( Pyramid, "k" );
  57. KeyEvent( StandUp, "u" );
  58. KeyEvent( MakeTube, "T" );
  59.  
  60. //
  61. //    編集メニューのショートカットキー
  62. //
  63. KeyEvent( Move, "m" );
  64. KeyEvent( Delete, KEY_DEL );
  65. KeyEvent( Separate, "b" );
  66. KeyEvent( Joint, "j" );
  67.  
  68. //
  69. //    変形のショートカットキー
  70. //
  71. KeyEvent( MoveVertex, "1" );
  72. KeyEvent( AddVertex, "2" );
  73. KeyEvent( DelVertex, "3" );
  74. KeyEvent( MoveEdge, "4" );
  75. KeyEvent( RotateEdge, "5" );
  76. KeyEvent( ScaleEdge, "6" );
  77. KeyEvent( MoveSelect, "7" );
  78. KeyEvent( RotateSelect, "8" );
  79. KeyEvent( ScaleSelect, "9" );
  80.  
  81. //
  82. //    表示メニューのショートカットキー
  83. //
  84. KeyEvent( SelectZoom, "z" );
  85. KeyEvent( Invisible, "i" );
  86. KeyEvent( Visible, "I" );
  87. KeyEvent( PersorAll, KEY_HOME );
  88.  
  89. //
  90. //    操作設定のショートカットキー
  91. //
  92. KeyEvent( ChangeSelectMode, "c" );
  93.  
  94. //
  95. //    その他のショートカットキー
  96. //
  97. KeyEvent( _Vertex, "v" );
  98. KeyEvent( BoxNearVertex, "V" );
  99. KeyEvent( _Vertex2, "\x16" );
  100. KeyEvent( ChangeAtr, "\x1" );
  101. KeyEvent( ChangeObj, "\xf" );
  102. KeyEvent( FixVertex, "f" );
  103.  
  104. KeyEvent(KeyProcess, KEY_NUMPAD_PLUS );
  105. KeyEvent(KeyProcess, KEY_NUMPAD_1, KEY_NUMPAD_2, KEY_NUMPAD_3, KEY_NUMPAD_4);
  106. KeyEvent(KeyProcess, KEY_NUMPAD_6, KEY_NUMPAD_7, KEY_NUMPAD_8, KEY_NUMPAD_9);
  107. KeyEvent(KeyProcess, KEY_UP, KEY_LEFT, KEY_RIGHT, KEY_DOWN);
  108. KeyEvent( Rend, KEY_NUMPAD_EQUAL );
  109.