home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-385-Vol-1of3.iso / d / dmenu1.zip / DM10SRC.ZIP / DRAW.C < prev    next >
Text File  |  1991-10-15  |  11KB  |  505 lines
  1. /***************************************************************************/
  2. void Hide_Cursor( void )  
  3.  
  4. { 
  5.     _asm mov cx, 1000h
  6.     _asm mov ax, 0100h
  7.     _asm int 10h
  8. }
  9.  
  10. /***************************************************************************/
  11. void Show_Cursor( void )  
  12.  
  13. {
  14.      _asm mov cx, 0607h
  15.      _asm mov ax, 0100h
  16.      _asm int 10h
  17. }
  18.  
  19. /***************************************************************************/
  20. void _fastcall Put_Cursor(col,row)
  21.  
  22. byte col,row;
  23.  
  24. {
  25.     _asm mov ah,02       
  26.     _asm sub bh,bh
  27.     _asm mov dh,row       
  28.     _asm mov dl,col       
  29.     _asm int 10h
  30. }
  31.  
  32. /***************************************************************************/
  33. void Hide_Mouse( void )  
  34.  
  35. { 
  36.     _asm mov ax,2
  37.     _asm int 33h
  38. }
  39.  
  40. /***************************************************************************/
  41. void Show_Mouse( void )  
  42.  
  43. {
  44.     _asm mov ax,1
  45.     _asm int 33h
  46. }
  47.  
  48. /***************************************************************************/
  49. void _fastcall Draw(x,y,thing,color)
  50.  
  51. register byte x,y,color;
  52. char thing;
  53.  
  54. {
  55.     *(video_start+x+max_screen_x*y) = (int) ( (byte) thing| (int) (color <<8) );
  56. }
  57.  
  58. /***************************************************************************/
  59. byte _fastcall Read_Color(x,y)
  60.  
  61. byte x,y;
  62.  
  63. {
  64.     return( *(video_start+x+max_screen_x*y) >> 8);
  65. }
  66.  
  67. /***************************************************************************/
  68. void _fastcall Put_Color(x,y,color)
  69.  
  70. byte x,y,color;
  71.  
  72. {
  73.     *(video_start+x+max_screen_x*y) = (*(video_start+x+max_screen_x*y) & 255) | (color << 8);
  74. }
  75.  
  76. /***************************************************************************/
  77. void _fastcall Fill_Screen(thing,color)
  78.  
  79. char thing;
  80. byte color;
  81.  
  82. {
  83.     register int x, fill_value;
  84.  
  85.     fill_value = ( (byte) thing | color << 8);
  86.  
  87.     for ( x = max_screen_x * (max_screen_y+1); x>=0 ;x--)
  88.         *(video_start+x) = fill_value;
  89. }
  90.  
  91. /***************************************************************************/
  92. void Blank_Screen()
  93.  
  94. {
  95.     byte *storage;
  96.     register byte x,y;
  97.              
  98.     storage = (byte *) malloc( (max_screen_x)*(max_screen_y+1));
  99.     if (storage == NULL) return;
  100.  
  101.     for ( y = 0; y<=  max_screen_y; y++)
  102.         for (x = 0; x< max_screen_x; x++)
  103.             *(storage + max_screen_x*y+x ) = Read_Color(x,y);
  104.  
  105.     for ( y = 0; y<=  max_screen_y; y++)
  106.         for (x = 0; x< max_screen_x; x++)
  107.             Put_Color(x,y,0);
  108.  
  109.     Hide_Mouse();
  110.     Wait_For_Event();
  111.     event.action = NO_ACTION;
  112.     Show_Mouse();
  113.  
  114.     for ( y = 0; y<=  max_screen_y; y++)
  115.         for (x = 0; x< max_screen_x; x++)
  116.             Put_Color( x,y, *(storage+max_screen_x*y+x) );
  117.  
  118.     free(storage); 
  119. }
  120.  
  121. /***************************************************************************/
  122. void Clean_Up()
  123.  
  124. {
  125.     Fill_Screen(' ',7);
  126.     Put_Cursor(0,0);
  127.     Show_Cursor();
  128.     Hide_Mouse();
  129. }
  130.  
  131. /***************************************************************************/
  132. int *Store_Screen(x1,x2,y1,y2)
  133.  
  134. byte x1,x2,y1,y2;
  135.  
  136. {
  137.     int *storage_addr;
  138.     register int *storage_pointer;
  139.     register byte x,y;
  140.  
  141.     if ( (storage_addr = (int *) malloc( (x2-x1+1) * (y2-y1+1) *2 )) == NULL){
  142.         Critical_Error(MEMORY,"Screen Storing");
  143.     }
  144.  
  145.     storage_pointer = storage_addr;
  146.  
  147.     for (y = y1; y <= y2; y++){
  148.         for (x = x1; x <= x2; x++){
  149.             *storage_pointer = *(video_start+x+max_screen_x*y);
  150.             storage_pointer++;
  151.         }
  152.     }
  153.  
  154.     return(storage_addr);
  155. }
  156.  
  157. /***************************************************************************/
  158. void Restore_Screen(storage_addr,x1,x2,y1,y2)
  159.  
  160. byte x1,x2,y1,y2;
  161. int *storage_addr;
  162.  
  163. {
  164.     register byte x,y;
  165.     register int *storage_pointer;
  166.  
  167.     storage_pointer = storage_addr;
  168.  
  169.     for (y = y1; y <= y2; y++){
  170.         for (x = x1; x <= x2; x++){
  171.             *(video_start + (max_screen_x*y) +x) = *storage_pointer;
  172.             storage_pointer++;
  173.         }
  174.     }
  175.     free (storage_addr);
  176.     return;
  177. }
  178.  
  179. /***************************************************************************/
  180. void Display_Menu(hi_item)
  181.  
  182. Item *hi_item;
  183.  
  184. {
  185.     byte text,border,title,back;
  186.  
  187.     register byte x,y,i;
  188.     char *str;
  189.     Item *item;
  190.  
  191.     back  = palette[current_menu->palette][ BACK ] << 4;
  192.     text  = palette[current_menu->palette][ TEXT ] | back;
  193.     title = palette[current_menu->palette][ TITLE ] | back;
  194.  
  195.     if (hi_item == NULL){
  196.         border = palette[current_menu->palette][ HIGHLIGHT ] | back;
  197.         if (shadow) Display_Shadow(left,right,top,bottom);
  198.     }
  199.     else
  200.         border = palette[current_menu->palette][ BORDER ] | back;
  201.  
  202.         /* draw top line */
  203.     x = left;
  204.     y = top;
  205.  
  206.     Draw(x, y,'╔', border);
  207.     for (x++; x < right; x++)
  208.         Draw(x, y,'═', border);
  209.     Draw(x, y, '╗', border);
  210.  
  211.         /* draw title centered*/
  212.     x = left;
  213.     y++;
  214.     Draw(x, y, '║', border);
  215.     for (i = (width-current_menu->title_length)/2; i!=0; i--)
  216.         Draw(++x, y,' ', title);
  217.     for (str = (char *) current_menu->title; *str != '\0'; str++)
  218.         Draw(++x, y, *str, title);
  219.     while ( x < right )
  220.         Draw(++x, y,' ', title);
  221.     Draw(x, y,'║', border);
  222.  
  223.         /* draw title bar */
  224.     x = left;
  225.     y++;
  226.     Draw(x, y,'╠', border);
  227.     for (x++; x < right; x++)
  228.         Draw(x, y,'═', border);
  229.     Draw(x, y,'╣', border);
  230.  
  231.         /* draw body */
  232.     
  233.     item = current_menu->first_item;
  234.     while (item != NULL){
  235.         y++;
  236.         x = left;
  237.         if ( item->first_line != NULL ){
  238.             if (item == hi_item)
  239.                 text = palette[current_menu->palette][ HIGHLIGHT ] | back;
  240.             Draw(x, y, '║', border);
  241.             Draw(++x, y, ' ', text);
  242.             for( str = (char *) item->title; *str != '\0'; str++)
  243.                 Draw(++x, y, *str, text);
  244.             while( x < right )
  245.                 Draw(++x, y, ' ', text);
  246.             Draw(x, y, '║', border);
  247.             if (item == hi_item) 
  248.                 text = palette[current_menu->palette][ TEXT ] | back;
  249.         }
  250.         else{                            /* draw sub-titles centered*/
  251.             x = left;
  252.             Draw(x, y, '╟', border);
  253.             for (i= (width - item->title_length)/2-1; i!=0; i--)
  254.                 Draw(++x, y, '─', border);
  255.             for (str = (char *) item->title; *str != '\0'; str++)
  256.                 Draw(++x, y, *str, border);
  257.             while (x < right )
  258.                 Draw(++x, y, '─', border);
  259.             Draw(x, y, '╢', border);
  260.         }
  261.         item = item->next_item;
  262.     }
  263.         /* draw bottom */
  264.     x = left;
  265.     y++;
  266.     Draw(x, y, '╚', border);
  267.     for(x++; x < right; x++)
  268.         Draw(x, y, '═', border);
  269.     Draw(x, y, '╝', border);
  270. }
  271.  
  272. /***************************************************************************/
  273. void Select(new_item)
  274.  
  275. /* unselect current_item and then select new_item */
  276.  
  277. Item *new_item;
  278.  
  279. {
  280.     register byte x,y;
  281.     byte back,text,select;
  282.     char *str;
  283.  
  284.     back   = palette[current_menu->palette][ BACK ] << 4;
  285.     text   = palette[current_menu->palette][ TEXT ] | back;
  286.     back   = palette[current_menu->palette][ S_BACK ] << 4;
  287.     select = palette[current_menu->palette][ SELECT ] | back;
  288.  
  289.     y = top + current_item->item_number + 2;
  290.     x = left + 1;
  291.     Draw(x++, y, ' ', text);
  292.     for(str = (char *)current_item->title; *str != '\0';str++)
  293.         Draw(x++, y, *str, text);
  294.     while (x < right)
  295.         Draw(x++, y, ' ', text);
  296.  
  297.     current_item = new_item;
  298.  
  299.     y = top + current_item->item_number + 2;
  300.     x = left + 1;
  301.     Draw(x++, y, ' ', select);
  302.     for(str = (char *) current_item->title; *str != '\0';str++)
  303.         Draw(x++, y, *str, select);
  304.     while ( x < right)
  305.         Draw(x++, y, ' ', select);
  306.  
  307.     Win[win_index].item = current_item;
  308. }
  309.  
  310. /***************************************************************************/
  311. void Display_Text_Box(lines,x1,width,y1,height,pal)
  312.  
  313. char *lines[];
  314. byte x1,width,y1,height,pal;
  315.  
  316. {
  317.     byte text,border,back,x2,y2;
  318.     register byte x,y,i;
  319.     char *str;
  320.     int *storage;
  321.  
  322.     if (x1 == CENTER)
  323.         x1 = (max_screen_x-width)/2;
  324.     if (y1 == CENTER)
  325.         y1 = max_screen_y/2 - 2;
  326.  
  327.     x2 = x1+width;
  328.     y2 = y1+height;
  329.  
  330.     if ( x2 >= (byte)(max_screen_x-1) ){
  331.         x2 = max_screen_x-2;
  332.         x1 = x2 - width;
  333.     }
  334.  
  335.     if (y2 > (byte)(max_screen_y-1) ){
  336.         y2 = max_screen_y-1;
  337.         y1 = y2 - height;
  338.     }
  339.  
  340.     if ( x1 >= x2 || y1 >= y2 ){
  341.         Error_Box("Unable to display text box.","The box is too large.");
  342.         return;
  343.     }
  344.  
  345.     storage = Store_Screen(x1,x2,y1,y2);  
  346.  
  347.     back   = palette[pal][ BACK ] << 4;
  348.     text   = palette[pal][ TEXT ] | back;
  349.     border = palette[pal][ HIGHLIGHT ] | back;
  350.  
  351.         /* draw top */
  352.     Draw(x = x1, y1, '┌', border);
  353.     for (x++; x < x2; x++)
  354.         Draw(x, y1, '─', border);
  355.     Draw(x, y1,'┐', border);
  356.  
  357.         /* draw filling */
  358.     for (y=y1+1;y<y2;y++){
  359.         x = x1;
  360.         Draw(x, y, '│', border);
  361.         str = lines[y-y1-1];
  362.         for( i=( x2-x1-strlen(str)-1 )/2 ;i != 0; i--)
  363.             Draw(++x, y, ' ', text);
  364.  
  365.         while (*str != '\0'){
  366.             Draw(++x, y, *str, text);
  367.             str++;
  368.         }
  369.         while( x < x2 )
  370.             Draw(++x, y, ' ', text);
  371.         Draw(x, y,'│', border);
  372.     }
  373.  
  374.         /* draw bottom */
  375.     Draw(x = x1, y2, '└', border);
  376.     for(x++; x < x2; x++)
  377.         Draw(x, y2, '─', border);
  378.     Draw(x, y2, '┘', border);
  379.  
  380.     if (shadow) Display_Shadow(x1,x2,y1,y2);
  381.  
  382.     do
  383.         Wait_For_Event();
  384.     while (event.action == GOTO_ITEM);
  385.  
  386.     if (shadow) Remove_Shadow(x1,x2,y1,y2);
  387.     Restore_Screen(storage,x1,x2,y1,y2);
  388.  
  389.         /* force mouse reset */
  390.     last_x = 0;
  391. }
  392.  
  393. /**************************************************************************/
  394. void Display_Item_Text()
  395.  
  396. {
  397.     char *line[25];
  398.     byte x,y,width=0,i=0,color;
  399.     char *place = current_item->first_line->text_line;
  400.  
  401.     current_text = current_item->first_line->next_line;
  402.  
  403.     while (current_text != NULL){
  404.         line[i] = current_text->text_line;
  405.         if ( strlen(line[i]) > width)
  406.             width = strlen(line[i]);
  407.         current_text = current_text->next_line;
  408.         i++;
  409.         if ( i == 25)
  410.             current_text = NULL;
  411.     }
  412.     line[i] = NULL;
  413.     width +=3;
  414.     i++;
  415.  
  416.     place = After_Comma(place);
  417.     x = Get_Value(place, CENTER );
  418.     place = After_Comma(place);
  419.     y = Get_Value(place, CENTER );
  420.     place = After_Comma(place);
  421.     color = Get_Palette(place,message_palette);
  422.  
  423.     if (cascade && x == CENTER && y == CENTER ){
  424.         x = left + cascade_x;
  425.         y = top + cascade_y;
  426.     }    
  427.  
  428.     Display_Text_Box(line,x,width,y, i ,color);
  429. }    
  430.  
  431. /***************************************************************************/
  432. void Error_Box(line1,line2)
  433.  
  434. char line1[],line2[];
  435.  
  436. {
  437.     byte x,y,width;
  438.     char title[] = "Error - Error - Error - Error";
  439.     char foot[] = "Press any key to continue.";
  440.     char blank[] = " ";
  441.     char *lines[7];    
  442.  
  443.     width = strlen(title);
  444.     if (width < strlen(line1) )
  445.         width = strlen(line1);
  446.     if (width < strlen(line2) )
  447.         width = strlen(line2);
  448.  
  449.     width +=3;
  450.     x = CENTER;
  451.     y = CENTER;
  452.  
  453.     lines[0] = title;
  454.     lines[1] = blank;
  455.     lines[2] = line1;
  456.     lines[3] = line2;
  457.     lines[4] = blank;
  458.     lines[5] = foot;
  459.     lines[6] = NULL;
  460.  
  461.     Display_Text_Box(lines,x,width,y,7,error_palette);
  462. }
  463.  
  464. /***************************************************************************/
  465. void Display_Shadow( x1, x2, y1, y2)
  466.  
  467. byte x1,x2,y1,y2;
  468.  
  469. {
  470.     byte x, y;
  471.  
  472.     ++x1;
  473.     ++x2;
  474.     ++y1;
  475.     ++y2;
  476.  
  477.     for ( x = x1; x <= x2; x++){
  478.         *(shad_buf+x) = Read_Color( x, y2 );    
  479.         Put_Color( x, y2, shadow_color);    
  480.     }
  481.     for (y = y1; y < y2; y++){
  482.         *(shad_buf+max_screen_x+y) = Read_Color( x2 , y );    
  483.         Put_Color( x2 ,y, shadow_color);
  484.     }
  485. }
  486. /***************************************************************************/
  487. void Remove_Shadow( x1, x2, y1, y2)
  488.  
  489. byte x1, x2, y1, y2;
  490.  
  491. {
  492.     byte x, y;
  493.  
  494.     ++x1;
  495.     ++x2;
  496.     ++y1;
  497.     ++y2;
  498.  
  499.     for ( x = x1; x <= x2; x++ )
  500.         Put_Color( x, y2, *(shad_buf+x) );
  501.     x =- x1;
  502.     for ( y = y1; y < y2; y++)
  503.         Put_Color( x2, y, *(shad_buf+max_screen_x+y) );    
  504. }
  505.