home *** CD-ROM | disk | FTP | other *** search
/ Software 2000 / Software 2000 Volume 1 (Disc 1 of 2).iso / aga / aga174b.dms / in.adf / MagicExpansion / Include / libraries / muidefs.h
Encoding:
C/C++ Source or Header  |  1994-06-25  |  7.4 KB  |  340 lines
  1. #ifndef MUIFDEFS_H
  2. #define MUIDEFS_H
  3.  
  4. /*
  5.  * $Source: Jojo:Source/C/XMS/include/libraries/muidefs.h,v $
  6.  *
  7.  * $Revision: 1.1 $
  8.  * $Author: Jojo $
  9.  * $Date: 1994/04/17 11:04:00 $
  10.  *
  11.  * $Log: muidefs.h,v $
  12.  * Revision 1.1  1994/04/17  11:04:00  Jojo
  13.  * Initial revision
  14.  *
  15.  */
  16.  
  17.  
  18.  
  19. /*
  20.  * New "gadget type": Integer
  21.  */
  22.  
  23. #define ACCEPTSNUMBERS "0123456789-"
  24. #define ACCEPTUNUMBERS "0123456789"
  25.  
  26. #define SInteger( contents, maxLen )\
  27.  StringObject,\
  28.   StringFrame,\
  29.   MUIA_String_MaxLen, maxLen + 1,\
  30.   MUIA_String_Contents, contents,\
  31.   MUIA_String_Accept, acceptSNumbers,\
  32.   MUIA_String_Format, MUIV_String_Format_Right,\
  33.  End
  34.  
  35. #define UInteger( contents, maxLen )\
  36.  StringObject,\
  37.   StringFrame,\
  38.   MUIA_String_MaxLen, maxLen + 1,\
  39.   MUIA_String_Contents, contents,\
  40.   MUIA_String_Accept, acceptUNumbers,\
  41.   MUIA_String_Format, MUIV_String_Format_Right,\
  42.  End
  43.  
  44. #define KeySInteger( contents, maxLen, ctrlChar )\
  45.  StringObject,\
  46.   StringFrame,\
  47.   MUIA_ControlChar, ctrlChar,\
  48.   MUIA_String_MaxLen, maxLen + 1,\
  49.   MUIA_String_Contents, contents,\
  50.   MUIA_String_Accept, acceptSNumbers,\
  51.   MUIA_String_Format, MUIV_String_Format_Right,\
  52.  End
  53.  
  54. #define KeyUInteger( contents, maxLen, ctrlChar )\
  55.  StringObject,\
  56.   StringFrame,\
  57.   MUIA_ControlChar, ctrlChar,\
  58.   MUIA_String_MaxLen, maxLen + 1,\
  59.   MUIA_String_Contents, contents,\
  60.   MUIA_String_Accept, acceptUNumbers,\
  61.   MUIA_String_Format, MUIV_String_Format_Right,\
  62.  End
  63.  
  64. #define WtSInteger( contents, maxLen, weight )\
  65.  StringObject,\
  66.   StringFrame,\
  67.   MUIA_Weight, weight,\
  68.   MUIA_String_MaxLen, maxLen + 1,\
  69.   MUIA_String_Contents, contents,\
  70.   MUIA_String_Accept, acceptSNumbers,\
  71.   MUIA_String_Format, MUIV_String_Format_Right,\
  72.  End
  73.  
  74. #define WtUInteger( contents, maxLen, weight )\
  75.  StringObject,\
  76.   StringFrame,\
  77.   MUIA_Weight, weight,\
  78.   MUIA_String_MaxLen, maxLen + 1,\
  79.   MUIA_String_Contents, contents,\
  80.   MUIA_String_Accept, acceptUNumbers,\
  81.   MUIA_String_Format, MUIV_String_Format_Right,\
  82.  End
  83.  
  84. #define WtKeySInteger( contents, maxLen, ctrlChar, weight )\
  85.  StringObject,\
  86.   StringFrame,\
  87.   MUIA_Weight, weight,\
  88.   MUIA_ControlChar, ctrlChar,\
  89.   MUIA_String_MaxLen, maxLen + 1,\
  90.   MUIA_String_Contents, contents,\
  91.   MUIA_String_Accept, acceptSNumbers,\
  92.   MUIA_String_Format, MUIV_String_Format_Right,\
  93.  End
  94.  
  95. #define WtKeyUInteger( contents, maxLen, ctrlChar, weight )\
  96.  StringObject,\
  97.   StringFrame,\
  98.   MUIA_Weight, weight,\
  99.   MUIA_ControlChar, ctrlChar,\
  100.   MUIA_String_MaxLen, maxLen + 1,\
  101.   MUIA_String_Contents, contents,\
  102.   MUIA_String_Accept, acceptUNumbers,\
  103.   MUIA_String_Format, MUIV_String_Format_Right,\
  104.  End
  105.  
  106.  
  107. /*
  108.  * New gadget type Note:
  109.  */
  110.  
  111. #define ACCEPTNOTES "CDEFGABH #0123456789"
  112.  
  113. #define Note( contents )\
  114.  StringObject,\
  115.   StringFrame,\
  116.   MUIA_String_MaxLen, 3 + 1,\
  117.   MUIA_String_Contents, contents,\
  118.   MUIA_String_Accept, acceptNotes,\
  119.   MUIA_String_Format, MUIV_String_Format_Right,\
  120.  End
  121.  
  122. #define KeyNote( contents, ctrlChar )\
  123.  StringObject,\
  124.   StringFrame,\
  125.   MUIA_ControlChar, ctrlChar,\
  126.   MUIA_String_MaxLen, 3 + 1,\
  127.   MUIA_String_Contents, contents,\
  128.   MUIA_String_Accept, acceptNotes,\
  129.   MUIA_String_Format, MUIV_String_Format_Right,\
  130.  End
  131.  
  132. #define WtNote( contents, weight )\
  133.  StringObject,\
  134.   StringFrame,\
  135.   MUIA_Weight, weight,\
  136.   MUIA_String_MaxLen, 3 + 1,\
  137.   MUIA_String_Contents, contents,\
  138.   MUIA_String_Accept, acceptNotes,\
  139.   MUIA_String_Format, MUIV_String_Format_Right,\
  140.  End
  141.  
  142. #define WtKeyNote( contents, ctrlChar, weight )\
  143.  StringObject,\
  144.   StringFrame,\
  145.   MUIA_Weight, weight,\
  146.   MUIA_ControlChar, ctrlChar,\
  147.   MUIA_String_MaxLen, 3 + 1,\
  148.   MUIA_String_Contents, contents,\
  149.   MUIA_String_Accept, acceptNotes,\
  150.   MUIA_String_Format, MUIV_String_Format_Right,\
  151.  End
  152.  
  153.  
  154. /*
  155.  * New Label-Macros: ...CLabel...() (centered labels)
  156.  */
  157.  
  158. #define CLabel( label )\
  159.  TextObject,\
  160.   MUIA_Text_PreParse, "c",\
  161.   MUIA_Text_Contents, label,\
  162.   MUIA_Weight, 0,\
  163.   MUIA_InnerLeft, 0,\
  164.   MUIA_InnerRight, 0,\
  165.  End
  166.  
  167. #define CLabel1( label )\
  168.  TextObject,\
  169.   MUIA_Text_PreParse, "c",\
  170.   MUIA_Text_Contents, label,\
  171.   MUIA_Weight, 0,\
  172.   MUIA_InnerLeft, 0,\
  173.   MUIA_InnerRight, 0,\
  174.   ButtonFrame,\
  175.   MUIA_FramePhantomHoriz, TRUE,\
  176.  End
  177.  
  178. #define CLabel2( label )\
  179.  TextObject,\
  180.   MUIA_Text_PreParse, "c",\
  181.   MUIA_Text_Contents, label,\
  182.   MUIA_Weight, 0,\
  183.   MUIA_InnerLeft, 0,\
  184.   MUIA_InnerRight, 0,\
  185.   StringFrame,\
  186.   MUIA_FramePhantomHoriz, TRUE,\
  187.  End
  188.  
  189. #define KeyCLabel( label, ctrlChar )\
  190.  TextObject,\
  191.   MUIA_Text_PreParse, "c",\
  192.   MUIA_Text_Contents, label,\
  193.   MUIA_Text_HiChar, ctrlChar,\
  194.   MUIA_Weight, 0,\
  195.   MUIA_InnerLeft, 0,\
  196.   MUIA_InnerRight, 0,\
  197.  End
  198.  
  199. #define KeyCLabel1( label, ctrlChar )\
  200.  TextObject,\
  201.   MUIA_Text_PreParse, "c",\
  202.   MUIA_Text_Contents, label,\
  203.   MUIA_Text_HiChar, ctrlChar,\
  204.   MUIA_Weight, 0,\
  205.   MUIA_InnerLeft, 0,\
  206.   MUIA_InnerRight, 0,\
  207.   ButtonFrame,\
  208.   MUIA_FramePhantomHoriz, TRUE,\
  209.  End
  210.  
  211. #define KeyCLabel2( label, ctrlChar )\
  212.  TextObject,\
  213.   MUIA_Text_PreParse, "c",\
  214.   MUIA_Text_Contents, label,\
  215.   MUIA_Text_HiChar, ctrlChar,\
  216.   MUIA_Weight, 0,\
  217.   MUIA_InnerLeft, 0,\
  218.   MUIA_InnerRight, 0,\
  219.   StringFrame,\
  220.   MUIA_FramePhantomHoriz, TRUE,\
  221.  End
  222.  
  223.  
  224. /*
  225.  * KeyPopButton-macro:
  226.  */
  227.  
  228. #define KeyPopButton( image, ctrlChar )\
  229.  ImageObject,\
  230.   ImageButtonFrame,\
  231.   MUIA_ControlChar, ctrlChar,\
  232.   MUIA_Image_Spec, image,\
  233.   MUIA_Image_FontMatchWidth, TRUE,\
  234.   MUIA_Image_FreeVert, TRUE,\
  235.   MUIA_InputMode, MUIV_InputMode_RelVerify,\
  236.   MUIA_Background, MUII_BACKGROUND,\
  237.  End
  238.  
  239. /*
  240.  * Simple use of RectangleObjects: HBar...() & VBar...()
  241.  */
  242.  
  243. #define HBar\
  244.  RectangleObject,\
  245.   MUIA_Rectangle_HBar, TRUE,\
  246.  End
  247.  
  248. #define VBar\
  249.  RectangleObject,\
  250.   MUIA_Rectangle_VBar, TRUE,\
  251.  End
  252.  
  253. #define HBarFixed( height )\
  254.  RectangleObject,\
  255.   MUIA_Rectangle_HBar, TRUE,\
  256.   MUIA_FixedHeight, height,\
  257.  End
  258.  
  259. #define VBarFixed( width )\
  260.  RectangleObject,\
  261.   MUIA_Rectangle_VBar, TRUE,\
  262.   MUIA_FixedWidth, width,\
  263.  End
  264.  
  265.  
  266. /*
  267.  * New Button-macros
  268.  */
  269.  
  270. #define ToggleButton( name, state )\
  271.  TextObject,\
  272.   ButtonFrame,\
  273.   MUIA_Text_Contents, name,\
  274.   MUIA_Text_PreParse, "\33c",\
  275.   MUIA_InputMode, MUIV_InputMode_Toggle,\
  276.   MUIA_Selected, state,\
  277.   MUIA_Background, MUII_ButtonBack,\
  278.  End
  279.  
  280. #define KeyToggleButton( name, state, ctrlChar )\
  281.  TextObject,\
  282.   ButtonFrame,\
  283.   MUIA_ControlChar, ctrlChar,\
  284.   MUIA_Text_HiChar, ctrlChar,\
  285.   MUIA_Text_Contents, name,\
  286.   MUIA_Text_PreParse, "\33c",\
  287.   MUIA_InputMode, MUIV_InputMode_Toggle,\
  288.   MUIA_Selected, state,\
  289.   MUIA_Background, MUII_ButtonBack,\
  290.  End
  291.  
  292. #define WtButton( name, weight )\
  293.  TextObject,\
  294.   ButtonFrame,\
  295.   MUIA_Weight, weight,\
  296.   MUIA_Text_Contents, name,\
  297.   MUIA_Text_PreParse, "\33c",\
  298.   MUIA_InputMode, MUIV_InputMode_RelVerify,\
  299.   MUIA_Background, MUII_ButtonBack,\
  300.  End
  301.  
  302. #define WtKeyButton( name, key, weight )\
  303.  TextObject,\
  304.   ButtonFrame,\
  305.   MUIA_Weight, weight,\
  306.   MUIA_Text_Contents, name,\
  307.   MUIA_Text_PreParse, "\33c",\
  308.   MUIA_Text_HiChar, key,\
  309.   MUIA_ControlChar, key,\
  310.   MUIA_InputMode, MUIV_InputMode_RelVerify,\
  311.   MUIA_Background, MUII_ButtonBack,\
  312.  End
  313.  
  314. #define WtToggleButton( name, state, weight )\
  315.  TextObject,\
  316.   ButtonFrame,\
  317.   MUIA_Weight, weight,\
  318.   MUIA_Text_Contents, name,\
  319.   MUIA_Text_PreParse, "\33c",\
  320.   MUIA_InputMode, MUIV_InputMode_Toggle,\
  321.   MUIA_Selected, state,\
  322.   MUIA_Background, MUII_ButtonBack,\
  323.  End
  324.  
  325. #define WtKeyToggleButton( name, state, ctrlChar, weight )\
  326.  TextObject,\
  327.   ButtonFrame,\
  328.   MUIA_Weight, weight,\
  329.   MUIA_ControlChar, ctrlChar,\
  330.   MUIA_Text_HiChar, ctrlChar,\
  331.   MUIA_Text_Contents, name,\
  332.   MUIA_Text_PreParse, "\33c",\
  333.   MUIA_InputMode, MUIV_InputMode_Toggle,\
  334.   MUIA_Selected, state,\
  335.   MUIA_Background, MUII_ButtonBack,\
  336.  End
  337.  
  338.  
  339. #endif
  340.