home *** CD-ROM | disk | FTP | other *** search
/ Crawly Crypt Collection 1 / crawlyvol1.bin / apps / spread / opusprg / opussrc / vdi_aes.def < prev    next >
Text File  |  1988-04-01  |  4KB  |  103 lines
  1.  
  2.  
  3. PROCEDURE Draw_Just ( x, y : INTEGER; just : VDI_Just;
  4.                       output_string : STR255 );
  5.    EXTERNAL;
  6. PROCEDURE Set_Char_Height ( info_flag : INTEGER );
  7.    EXTERNAL;
  8. PROCEDURE Create_User_Line_Type ( linetype : INTEGER );
  9.    EXTERNAL;
  10. PROCEDURE User_Line_Style;
  11.    EXTERNAL;
  12. PROCEDURE VQ_Mouse ( VAR x,y,button : INTEGER );
  13.    EXTERNAL;
  14. PROCEDURE Extended_Inquire ( info_flag : INTEGER );
  15.    EXTERNAL;
  16. PROCEDURE Blit ( src,dst : Mfdb;
  17.                  from_x,from_y,to_x,to_y,width,height : INTEGER );
  18.    EXTERNAL;
  19. PROCEDURE Write_Message (     ap_id,n_bytes : INTEGER;
  20.                           VAR msg_area      : Message_Buffer );
  21.    EXTERNAL;
  22. PROCEDURE Read_Message (     ap_id,n_bytes : INTEGER;
  23.                          VAR msg_area      : Message_Buffer );
  24.    EXTERNAL;
  25. PROCEDURE Get_Text (     tree  : Generic_Ptr;
  26.                          index : INTEGER;
  27.                      VAR s     : P_EdText );
  28.    EXTERNAL;
  29. PROCEDURE Set_Text (     tree       : Generic_Ptr; { dialog ptr }
  30.                          index      : INTEGER;     { which item }
  31.                          p_str      : STR255;      { a pascal string to show }
  32.                      VAR c_str      : C_EdText;    { C string }
  33.                          text_len   : INTEGER );   { max length of the text }
  34.    EXTERNAL;
  35. FUNCTION Map_Tree ( tree                  : Generic_Ptr;
  36.                     start_index,end_index : Tree_Index;
  37.                     action                : MapAction    ) : Tree_Index;
  38.    EXTERNAL;
  39. PROCEDURE Form_Anywhere ( box     : Dialog_Ptr;
  40.                           x,y     : INTEGER;
  41.                           VAR w,h : INTEGER  );
  42.    EXTERNAL;
  43. PROCEDURE Form_Center ( box : Dialog_Ptr;
  44.                         VAR fo_x,fo_y,fo_w,fo_h : INTEGER );
  45.    EXTERNAL;
  46. PROCEDURE Form_Dial ( fn,little_x,little_y,little_w,little_h,
  47.                          big_x,big_y,big_w,big_h : INTEGER );
  48.    EXTERNAL;
  49. FUNCTION Form_Do ( box : Dialog_Ptr; index : Tree_Index ) : Tree_Index;
  50.    EXTERNAL;
  51. FUNCTION Obj_Find ( tree          : Dialog_Ptr; 
  52.                     firstob,depth : Tree_Index;
  53.                     x,y           : INTEGER;
  54.                     VAR result    : Tree_Index ) : BOOLEAN;
  55.    EXTERNAL;
  56.    
  57. FUNCTION Wind_Find ( x,y : INTEGER ) : INTEGER;
  58.    EXTERNAL;
  59.    
  60. PROCEDURE Rubber_Box (     x,y,sm_w,sm_h     : INTEGER;
  61.                        VAR last_width,last_height : INTEGER );
  62.    EXTERNAL;
  63.  
  64.  
  65. PROCEDURE Form_Error ( tos_error_num : INTEGER );
  66.    EXTERNAL;
  67. PROCEDURE Grow_Shrink( cmd, small_x, small_y, small_w, small_h,
  68.                        big_x, big_y, big_w, big_h : INTEGER );
  69.    EXTERNAL;
  70. PROCEDURE Grow_Box ( small_x, small_y, small_w, small_h,
  71.                        big_x, big_y, big_w, big_h : INTEGER );
  72.    EXTERNAL;
  73. PROCEDURE Shrink_Box ( big_x, big_y, big_w, big_h,
  74.                          small_x, small_y, small_w, small_h : INTEGER );
  75.    EXTERNAL;
  76. FUNCTION Menu_Register ( ap_id : INTEGER; VAR acc_name : STR255 ) : INTEGER;
  77.    EXTERNAL;
  78. PROCEDURE Text_Alignment ( horizontal,vertical : INTEGER );
  79.    EXTERNAL;
  80. PROCEDURE Rotate_Baseline ( angle : INTEGER );
  81.    EXTERNAL;
  82.  
  83. PROCEDURE Set_Resource_Address ( res_type,res_index : INTEGER;
  84.                                  VAR res_addr : Generic_Ptr );
  85.    EXTERNAL;
  86.  
  87. PROCEDURE Move_Box ( o_x,o_y,w,h,n_x,n_y : INTEGER );
  88.    EXTERNAL;
  89. PROCEDURE Drag_Box ( inner_x,inner_y,
  90.                      inner_w,inner_h,
  91.                      outer_x,outer_y,
  92.                      outer_w,outer_h         : INTEGER;
  93.                      VAR n_inner_x,n_inner_y : INTEGER );
  94.    EXTERNAL;
  95.  
  96. PROCEDURE Graf_MKState ( VAR x,y,btn_state,key_state : INTEGER );
  97.    EXTERNAL;
  98.  
  99.  
  100.  
  101.  
  102.  
  103.