home *** CD-ROM | disk | FTP | other *** search
/ Fujiology Archive / fujiology_archive_v1_0.iso / S / SEWER_S / LANGDSK1.ZIP / LANGDSK1.MSA / POWER_DE.MOS / GEMAES.BH < prev    next >
Text File  |  1987-04-22  |  3KB  |  53 lines
  1. '  GEMAES.BH 
  2. '  constant file for HiSoft BASIC
  3. ' use defint a-z and option u+
  4.  
  5. 'offsets in bytes for the global array
  6. CONST ap_version=0,ap_count=2,ap_id=4,ap_private=6,ap_ptree=10
  7. ' constants for message types
  8. CONST mn_selected=10,wm_redraw=20,wm_topped=21,wm_closed=22,wm_fulled=23
  9. CONST wm_arrowed=24,wm_hslid=25,wm_vslid=26,wm_sized=27,wm_moved=28
  10. CONST ac_open=40,ac_close=41
  11. 'offsets in bytes for OBJECT structure
  12. CONST ob_next=0,ob_head=2,ob_tail=4,ob_type=6,ob_flags=8,ob_state=10
  13. CONST ob_spec=12,ob_x=16,ob_y=18,ob_width=20,ob_height=22
  14. 'offsets in bytes for TEDINFO structure
  15. CONST te_ptext=0,te_ptmplt=4,te_pvalid=8,te_font=12,te_just=16
  16. CONST te_color=18,te_thickness=22,te_txtlen=24,te_tmplen=26
  17. 'offsets in bytes for ICONBLK structure
  18. CONST ib_pmask=0,ib_pdata=4,ib_ptext=8,ib_char=12,ib_xchar=14,ib_ychar=16
  19. CONST ib_xicon=18,ib_yicon=20,ib_wicon=22,ib_hicon=24,ib_xtext=26
  20. CONST ib_ytext=28,ib_wtext=30,ib_htext=32
  21. 'offsets in bytes for BITBLK structure
  22. CONST bi_pdata=0,bi_wb=4,bi_hl=6,bi_x=8,bi_y=10,bi_color=12
  23. 'offsets in bytes for APPLBLK structure
  24. CONST ab_code=0,ab_parm=4
  25. 'offsets in bytes for PARMBLK strucure
  26. CONST pb_tree=0,pb_obj=4,pb_prevstate=6,pb_currstate=8,pb_x=10,pb_y=12
  27. CONST pb_w=14,pb_h=16,pb_xc=18,pb_yc=20,pb_wc=22,pb_hc=24,pb_parm=26
  28. 'OBJECT Types
  29. CONST G_BOX=20,G_TEXT=21,G_BOXTEXT=22,G_IMAGE=23,G_PROGDEF=24,G_IBOX=25
  30. CONST G_BUTTON=26,G_BOXCHAR=27,G_STRING=28,G_FTEXT=29,G_FBOXTEXT=30
  31. CONST G_ICON=31,G_TITLE=32
  32. 'Object flag masks
  33. CONST mask_none=0,mask_selectable=1,mask_default=2,mask_exit=4
  34. CONST mask_editable=8,mask_rbutton=16,mask_lastob=32,mask_touchexit=64
  35. CONST mask_hidetree=128,mask_indirect=256
  36. 'Object state masks
  37. CONST mask_normal=0,mask_selected=1,mask_crossed=2,mask_checked=4
  38. CONST mask_disabled=8,mask_outlined=16,mask_shadowed=32
  39. ' constants for wind_create bits
  40. CONST win_name=1,win_close=2,win_full=4,win_move=8,win_info=16,win_size=32
  41. CONST win_uparrow=64,win_dnarrow=128,win_vslide=256,win_lfarrow=512
  42. CONST win_rtarrow=1024,win_hslide=2048
  43. 'constants for wind get and set
  44. CONST wf_name=2,wf_info=4,wf_workxywh=4,wf_currxywh=5,wf_prevxywh=6
  45. CONST wf_fullxywh=7,wf_hslide=8,wf_vslide=9,wf_top=10,wf_firstxywh=11
  46. CONST wf_nextxywh=12,wf_newdesk=14,wf_hslide=15
  47. CONST wf_vlside=16,wf_screen=17
  48. 'wind_update constants
  49. CONST END_UPDATE=0,BEG_UPDATE=1,END_MCTRL=2,BEG_MCTRL=3
  50. ' message types for evnt_multi
  51. CONST mu_keybd=1,mu_button=2,mu_m1=4,mu_m2=8,mu_mesag=16,mu_timer=32
  52. ' end of GEMAES.BH
  53.