|
DataMuseum.dkPresents historical artifacts from the history of: RegneCentralen RC759 "Piccoline" |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RegneCentralen RC759 "Piccoline" Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 33947 (0x849b)
Types: TextFile
Names: »VDIBIND.C«
└─⟦33b70227c⟧ Bits:30003931/GEM_Develop_disk_3_CDOS.imd Disketter indleveret af Steffen Jensen (Piccolo/Piccoline)
└─⟦this⟧ »VDIBIND.C«
└─⟦f18477172⟧ Bits:30003931/GEM_Develop_disk_1_CDOS.imd Disketter indleveret af Steffen Jensen (Piccolo/Piccoline)
└─⟦this⟧ »SAMP\VDIBIND.C«
/* VDIBIND.C 7/18/84 - 4/19/85 John Grant */
#include "portab.h"
extern WORD contrlÆÅ, intinÆÅ, ptsinÆÅ, intoutÆÅ, ptsoutÆÅ;
WORD
v_opnwk( work_in, handle, work_out )
WORD work_inÆÅ, *handle, work_outÆÅ;
æ
if (gemcheck())
æ
i_intin( work_in );
i_intout( work_out );
i_ptsout( work_out + 45 );
contrlÆ0Å = 1;
contrlÆ1Å = 0;
contrlÆ3Å = 11;
vdi();
*handle = contrlÆ6Å;
i_intin( intin );
i_intout( intout );
i_ptsout( ptsout );
å
else
*handle = 0;
å
WORD
v_clswk( handle )
WORD handle;
æ
contrlÆ0Å = 2;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
å
WORD
v_clrwk( handle )
WORD handle;
æ
contrlÆ0Å = 3;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
å
WORD
v_updwk( handle )
WORD handle;
æ
contrlÆ0Å = 4;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
å
WORD
vq_chcells( handle, rows, columns )
WORD handle, *rows, *columns;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 1;
contrlÆ6Å = handle;
vdi();
*rows = intoutÆ0Å;
*columns = intoutÆ1Å;
å
WORD
v_exit_cur( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 2;
contrlÆ6Å = handle;
vdi();
å
WORD
v_enter_cur( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 3;
contrlÆ6Å = handle;
vdi();
å
WORD
v_curup( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 4;
contrlÆ6Å = handle;
vdi();
å
WORD
v_curdown( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 5;
contrlÆ6Å = handle;
vdi();
å
WORD
v_curright( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 6;
contrlÆ6Å = handle;
vdi();
å
WORD
v_curleft( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 7;
contrlÆ6Å = handle;
vdi();
å
WORD
v_curhome( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 8;
contrlÆ6Å = handle;
vdi();
å
WORD
v_eeos( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 9;
contrlÆ6Å = handle;
vdi();
å
WORD
v_eeol( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 10;
contrlÆ6Å = handle;
vdi();
å
WORD
vs_curaddress( handle, row, column )
WORD handle, row, column;
æ
intinÆ0Å = row;
intinÆ1Å = column;
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = 2;
contrlÆ5Å = 11;
contrlÆ6Å = handle;
vdi();
å
WORD
v_curtext( handle, string )
WORD handle;
BYTE *string;
æ
WORD *intstr;
intstr = intin;
while (*intstr++ = *string++)
;
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = intstr - intin - 1;
contrlÆ5Å = 12;
contrlÆ6Å = handle;
vdi();
å
WORD
v_rvon( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 13;
contrlÆ6Å = handle;
vdi();
å
WORD
v_rvoff( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 14;
contrlÆ6Å = handle;
vdi();
å
WORD
vq_curaddress( handle, row, column )
WORD handle, *row, *column;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 15;
contrlÆ6Å = handle;
vdi();
*row = intoutÆ0Å;
*column = intoutÆ1Å;
å
WORD
vq_tabstatus( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 16;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
v_hardcopy( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 17;
contrlÆ6Å = handle;
vdi();
å
WORD
v_dspcur( handle, x, y )
WORD handle, x, y;
æ
ptsinÆ0Å = x;
ptsinÆ1Å = y;
contrlÆ0Å = 5;
contrlÆ1Å = 1;
contrlÆ3Å = 0;
contrlÆ5Å = 18;
contrlÆ6Å = handle;
vdi();
å
WORD
v_rmcur( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 19;
contrlÆ6Å = handle;
vdi();
å
WORD
v_form_adv( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 20;
contrlÆ6Å = handle;
vdi();
å
WORD
v_output_window( handle, xy )
WORD handle, xyÆÅ;
æ
i_ptsin( xy );
contrlÆ0Å = 5;
contrlÆ1Å = 2;
contrlÆ3Å = 0;
contrlÆ5Å = 21;
contrlÆ6Å = handle;
vdi();
i_ptsin( ptsin );
å
WORD
v_clear_disp_list( handle )
WORD handle;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 22;
contrlÆ6Å = handle;
vdi();
å
WORD
v_bit_image( handle, filename, aspect, x_scale, y_scale, h_align, v_align, xy )
WORD handle, aspect, x_scale, y_scale, h_align, v_align;
WORD xyÆÅ;
BYTE *filename;
æ
WORD i;
for (i = 0; i < 4; i++)
ptsinÆiÅ = xyÆiÅ;
intinÆ0Å = aspect;
intinÆ1Å = x_scale;
intinÆ2Å = y_scale;
intinÆ3Å = h_align;
intinÆ4Å = v_align;
i = 5;
while (intinÆi++Å = *filename++)
;
contrlÆ0Å = 5;
contrlÆ1Å = 2;
contrlÆ3Å = --i;
contrlÆ5Å = 23;
contrlÆ6Å = handle;
vdi();
å
WORD
vq_scan( handle, g_height, g_slice, a_height, a_slice, factor )
WORD handle, *g_height, *g_slice, *a_height, *a_slice, *factor;
æ
contrlÆ0Å = 5;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ5Å = 24;
contrlÆ6Å = handle;
vdi();
*g_height = intoutÆ0Å;
*g_slice = intoutÆ1Å;
*a_height = intoutÆ2Å;
*a_slice = intoutÆ3Å;
*factor = intoutÆ4Å;
å
WORD
v_alpha_text( handle, string )
WORD handle;
BYTE *string;
æ
WORD i;
i = 0;
while (intinÆi++Å = *string++)
;
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = --i;
contrlÆ5Å = 25;
contrlÆ6Å = handle;
vdi();
å
WORD
vs_palette( handle, palette )
WORD handle, palette;
æ
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ5Å = 60;
contrlÆ6Å = handle;
intinÆ0Å = palette;
vdi();
return( intoutÆ0Å );
å
WORD
v_sound( handle, frequency, duration )
WORD handle;
WORD frequency;
WORD duration;
æ
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = 2;
contrlÆ5Å = 61;
contrlÆ6Å = handle;
intinÆ0Å = frequency;
intinÆ1Å = duration;
vdi();
å
WORD
vs_mute( handle, action )
WORD handle;
WORD action;
æ
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ5Å = 62;
contrlÆ6Å = handle;
intinÆ0Å = action;
vdi();
return( intoutÆ0Å );
å
WORD
vsp_film( handle, index, lightness )
WORD handle;
WORD index;
WORD lightness;
æ
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = 2;
contrlÆ5Å = 91;
contrlÆ6Å = handle;
intinÆ0Å = index;
intinÆ1Å = lightness;
vdi();
å
BOOLEAN
vqp_filmname( handle, index, name )
WORD handle;
WORD index;
BYTE nameÆÅ;
æ
WORD i;
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ5Å = 92;
contrlÆ6Å = handle;
intinÆ0Å = index;
vdi();
if ( contrlÆ4Å != 0) æ
for (i = 0; i < contrlÆ4Å; i++)
nameÆiÅ = intoutÆiÅ;
return(TRUE);
å
return(FALSE);
å
WORD
vsc_expose( handle, state )
WORD handle;
WORD state;
æ
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = 2;
contrlÆ5Å = 93;
contrlÆ6Å = handle;
intinÆ0Å = state;
vdi();
å
WORD
v_meta_extents( handle, min_x, min_y, max_x, max_y )
WORD handle, min_x, min_y, max_x, max_y;
æ
ptsinÆ0Å = min_x;
ptsinÆ1Å = min_y;
ptsinÆ2Å = max_x;
ptsinÆ3Å = max_y;
contrlÆ0Å = 5;
contrlÆ1Å = 2;
contrlÆ3Å = 0;
contrlÆ5Å = 98;
contrlÆ6Å = handle;
vdi();
å
WORD
v_write_meta( handle, num_ints, ints, num_pts, pts )
WORD handle, num_ints, intsÆÅ, num_pts, ptsÆÅ;
æ
i_intin( ints );
i_ptsin( pts );
contrlÆ0Å = 5;
contrlÆ1Å = num_pts;
contrlÆ3Å = num_ints;
contrlÆ5Å = 99;
contrlÆ6Å = handle;
vdi();
i_intin( intin );
i_ptsin( ptsin );
å
WORD
vm_filename( handle, filename )
WORD handle;
BYTE *filename;
æ
WORD *intstr;
intstr = intin;
while( *intstr++ = *filename++ )
;
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ5Å = 100;
contrlÆ6Å = handle;
contrlÆ3Å = intstr - intin - 1;
vdi();
å
WORD
vm_pagesize( handle, pgwidth, pgheight )
WORD handle, pgwidth, pgheight;
æ
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = 3;
contrlÆ5Å = 99;
contrlÆ6Å = handle;
intinÆ0Å = 0;
intinÆ1Å = pgwidth;
intinÆ2Å = pgheight;
vdi();
å
WORD
vm_coords( handle, llx, lly, urx, ury )
WORD handle, llx, lly, urx, ury;
æ
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = 5;
contrlÆ5Å = 99;
contrlÆ6Å = handle;
intinÆ0Å = 1;
intinÆ1Å = llx;
intinÆ2Å = lly;
intinÆ3Å = urx;
intinÆ4Å = ury;
vdi();
å
WORD
vt_resolution ( handle, xres, yres, xset, yset )
WORD handle, xres, yres, *xset, *yset;
æ
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = 2;
contrlÆ5Å = 81;
contrlÆ6Å = handle;
intinÆ0Å = xres;
intinÆ1Å = yres;
vdi();
*xset = intoutÆ0Å;
*yset = intoutÆ1Å;
å
WORD
vt_axis ( handle, xres, yres, xset, yset )
WORD handle, xres, yres, *xset, *yset;
æ
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = 2;
contrlÆ5Å = 82;
contrlÆ6Å = handle;
intinÆ0Å = xres;
intinÆ1Å = yres;
vdi();
*xset = intoutÆ0Å;
*yset = intoutÆ1Å;
å
WORD
vt_origin ( handle, xorigin, yorigin )
WORD handle, xorigin, yorigin;
æ
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = 2;
contrlÆ5Å = 83;
contrlÆ6Å = handle;
intinÆ0Å = xorigin;
intinÆ1Å = yorigin;
vdi();
å
WORD
vq_tdimensions( handle, xdimension, ydimension )
WORD handle, *xdimension, *ydimension;
æ
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = 0;
contrlÆ5Å = 84;
contrlÆ6Å = handle;
vdi();
*xdimension = intoutÆ0Å;
*ydimension = intoutÆ1Å;
å
WORD
vt_alignment( handle, dx, dy )
WORD handle, dx, dy;
æ
contrlÆ0Å = 5;
contrlÆ1Å = 0;
contrlÆ3Å = 2;
contrlÆ5Å = 85;
contrlÆ6Å = handle;
intinÆ0Å = dx;
intinÆ1Å = dy;
vdi();
å
WORD
v_pline( handle, count, xy )
WORD handle, count, xyÆÅ;
æ
i_ptsin( xy );
contrlÆ0Å = 6;
contrlÆ1Å = count;
contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
i_ptsin( ptsin );
å
WORD
v_pmarker( handle, count, xy )
WORD handle, count, xyÆÅ;
æ
i_ptsin( xy );
contrlÆ0Å = 7;
contrlÆ1Å = count;
contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
i_ptsin( ptsin );
å
WORD
v_gtext( handle, x, y, string)
WORD handle, x, y;
BYTE *string;
æ
WORD i;
ptsinÆ0Å = x;
ptsinÆ1Å = y;
i = 0;
while (intinÆi++Å = *string++)
;
contrlÆ0Å = 8;
contrlÆ1Å = 1;
contrlÆ3Å = --i;
contrlÆ6Å = handle;
vdi();
å
WORD
v_fillarea( handle, count, xy)
WORD handle, count, xyÆÅ;
æ
i_ptsin( xy );
contrlÆ0Å = 9;
contrlÆ1Å = count;
contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
i_ptsin( ptsin );
å
WORD
v_cellarray( handle, xy, row_length, el_per_row, num_rows, wr_mode, colors )
WORD handle, xyÆ4Å, row_length, el_per_row, num_rows, wr_mode, *colors;
æ
i_intin( colors );
i_ptsin( xy );
contrlÆ0Å = 10;
contrlÆ1Å = 2;
contrlÆ3Å = row_length * num_rows;
contrlÆ6Å = handle;
contrlÆ7Å = row_length;
contrlÆ8Å = el_per_row;
contrlÆ9Å = num_rows;
contrlÆ10Å = wr_mode;
vdi();
i_intin( intin );
i_ptsin( ptsin );
å
WORD
v_bar( handle, xy )
WORD handle, xyÆÅ;
æ
i_ptsin( xy );
contrlÆ0Å = 11;
contrlÆ1Å = 2;
contrlÆ3Å = 0;
contrlÆ5Å = 1;
contrlÆ6Å = handle;
vdi();
i_ptsin( ptsin );
å
WORD
v_arc( handle, xc, yc, rad, sang, eang )
WORD handle, xc, yc, rad, sang, eang;
æ
ptsinÆ0Å = xc;
ptsinÆ1Å = yc;
ptsinÆ2Å = ptsinÆ3Å = ptsinÆ4Å = ptsinÆ5Å = ptsinÆ7Å = 0;
ptsinÆ6Å = rad;
intinÆ0Å = sang;
intinÆ1Å = eang;
contrlÆ0Å = 11;
contrlÆ1Å = 4;
contrlÆ3Å = 2;
contrlÆ5Å = 2;
contrlÆ6Å = handle;
vdi();
å
WORD
v_pieslice( handle, xc, yc, rad, sang, eang )
WORD handle, xc, yc, rad, sang, eang;
æ
ptsinÆ0Å = xc;
ptsinÆ1Å = yc;
ptsinÆ2Å = ptsinÆ3Å = ptsinÆ4Å = ptsinÆ5Å = ptsinÆ7Å = 0;
ptsinÆ6Å = rad;
intinÆ0Å = sang;
intinÆ1Å = eang;
contrlÆ0Å = 11;
contrlÆ1Å = 4;
contrlÆ3Å = 2;
contrlÆ5Å = 3;
contrlÆ6Å = handle;
vdi();
å
WORD
v_circle( handle, xc, yc, rad )
WORD handle, xc, yc, rad;
æ
ptsinÆ0Å = xc;
ptsinÆ1Å = yc;
ptsinÆ2Å = ptsinÆ3Å = ptsinÆ5Å = 0;
ptsinÆ4Å = rad;
contrlÆ0Å = 11;
contrlÆ1Å = 3;
contrlÆ3Å = 0;
contrlÆ5Å = 4;
contrlÆ6Å = handle;
vdi();
å
WORD
v_ellipse( handle, xc, yc, xrad, yrad )
WORD handle, xc, yc, xrad, yrad;
æ
ptsinÆ0Å = xc;
ptsinÆ1Å = yc;
ptsinÆ2Å = xrad;
ptsinÆ3Å = yrad;
contrlÆ0Å = 11;
contrlÆ1Å = 2;
contrlÆ3Å = 0;
contrlÆ5Å = 5;
contrlÆ6Å = handle;
vdi();
å
WORD
v_ellarc( handle, xc, yc, xrad, yrad, sang, eang )
WORD handle, xc, yc, xrad, yrad, sang, eang;
æ
ptsinÆ0Å = xc;
ptsinÆ1Å = yc;
ptsinÆ2Å = xrad;
ptsinÆ3Å = yrad;
intinÆ0Å = sang;
intinÆ1Å = eang;
contrlÆ0Å = 11;
contrlÆ1Å = 2;
contrlÆ3Å = 2;
contrlÆ5Å = 6;
contrlÆ6Å = handle;
vdi();
å
WORD
v_ellpie( handle, xc, yc, xrad, yrad, sang, eang)
WORD handle, xc, yc, xrad, yrad, sang, eang;
æ
ptsinÆ0Å = xc;
ptsinÆ1Å = yc;
ptsinÆ2Å = xrad;
ptsinÆ3Å = yrad;
intinÆ0Å = sang;
intinÆ1Å = eang;
contrlÆ0Å = 11;
contrlÆ1Å = 2;
contrlÆ3Å = 2;
contrlÆ5Å = 7;
contrlÆ6Å = handle;
vdi();
å
WORD
v_rbox( handle, xy )
WORD handle, xyÆÅ;
æ
i_ptsin( xy );
contrlÆ0Å = 11;
contrlÆ1Å = 2;
contrlÆ3Å = 0;
contrlÆ5Å = 8;
contrlÆ6Å = handle;
vdi();
i_ptsin( ptsin );
å
WORD
v_rfbox( handle, xy )
WORD handle, xyÆÅ;
æ
i_ptsin( xy );
contrlÆ0Å = 11;
contrlÆ1Å = 2;
contrlÆ3Å = 0;
contrlÆ5Å = 9;
contrlÆ6Å = handle;
vdi();
i_ptsin( ptsin );
å
WORD
v_justified( handle, x, y, string, length, word_space, char_space)
WORD handle, x, y, length, word_space, char_space;
BYTE stringÆÅ;
æ
WORD *intstr;
ptsinÆ0Å = x;
ptsinÆ1Å = y;
ptsinÆ2Å = length;
ptsinÆ3Å = 0;
intinÆ0Å = word_space;
intinÆ1Å = char_space;
intstr = &intinÆ2Å;
while (*intstr++ = *string++)
;
contrlÆ0Å = 11;
contrlÆ1Å = 2;
contrlÆ3Å = intstr - intin - 1;
contrlÆ5Å = 10;
contrlÆ6Å = handle;
vdi();
å
WORD
vqt_justified( handle, x, y, string, length, word_space, char_space, offsets)
WORD handle, x, y, length, word_space, char_space, offsetsÆÅ;
BYTE stringÆÅ;
æ
WORD *intstr;
ptsinÆ0Å = x;
ptsinÆ1Å = y;
ptsinÆ2Å = length;
ptsinÆ3Å = 0;
intinÆ0Å = word_space;
intinÆ1Å = char_space;
intstr = &intinÆ2Å;
while (*intstr++ = *string++)
;
contrlÆ0Å = 132;
contrlÆ1Å = 2;
contrlÆ3Å = intstr - intin - 1;
contrlÆ6Å = handle;
i_ptsout( offsets );
vdi();
i_ptsout( ptsout );
return( contrlÆ2Å );
å
WORD
vst_height( handle, height, char_width, char_height, cell_width, cell_height )
WORD handle, height, *char_width, *char_height, *cell_width, *cell_height;
æ
ptsinÆ0Å = 0;
ptsinÆ1Å = height;
contrlÆ0Å = 12;
contrlÆ1Å = 1;
contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
*char_width = ptsoutÆ0Å;
*char_height = ptsoutÆ1Å;
*cell_width = ptsoutÆ2Å;
*cell_height = ptsoutÆ3Å;
å
WORD
vst_rotation( handle, angle )
WORD handle, angle;
æ
intinÆ0Å = angle;
contrlÆ0Å = 13;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
vs_color( handle, index, rgb )
WORD handle, index, *rgb;
æ
WORD i;
intinÆ0Å = index;
for ( i = 1; i < 4; i++ )
intinÆiÅ = *rgb++;
contrlÆ0Å = 14;
contrlÆ1Å = 0;
contrlÆ3Å = 4;
contrlÆ6Å = handle;
vdi();
å
WORD
vsl_type( handle, style )
WORD handle, style;
æ
intinÆ0Å = style;
contrlÆ0Å = 15;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
vsl_width( handle, width )
WORD handle, width;
æ
ptsinÆ0Å = width;
ptsinÆ1Å = 0;
contrlÆ0Å = 16;
contrlÆ1Å = 1;
contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
return( ptsoutÆ0Å );
å
WORD
vsl_color( handle, index )
WORD handle, index;
æ
intinÆ0Å = index;
contrlÆ0Å = 17;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
vsm_type( handle, symbol )
WORD handle, symbol;
æ
intinÆ0Å = symbol;
contrlÆ0Å = 18;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
vsm_height( handle, height )
WORD handle, height;
æ
ptsinÆ0Å = 0;
ptsinÆ1Å = height;
contrlÆ0Å = 19;
contrlÆ1Å = 1;
contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
return( ptsoutÆ1Å );
å
WORD
vsm_color( handle, index )
WORD handle, index;
æ
intinÆ0Å = index;
contrlÆ0Å = 20;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
vst_font( handle, font )
WORD handle, font;
æ
intinÆ0Å = font;
contrlÆ0Å = 21;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
vst_color( handle, index )
WORD handle, index;
æ
intinÆ0Å = index;
contrlÆ0Å = 22;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
vsf_interior( handle, style )
WORD handle, style;
æ
intinÆ0Å = style;
contrlÆ0Å = 23;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
vsf_style( handle, index )
WORD handle, index;
æ
intinÆ0Å = index;
contrlÆ0Å = 24;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
vsf_color( handle, index )
WORD handle, index;
æ
intinÆ0Å = index;
contrlÆ0Å = 25;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
vq_color( handle, index, set_flag, rgb )
WORD handle, index, set_flag, rgbÆÅ;
æ
intinÆ0Å = index;
intinÆ1Å = set_flag;
contrlÆ0Å = 26;
contrlÆ1Å = 0;
contrlÆ3Å = 2;
contrlÆ6Å = handle;
vdi();
rgbÆ0Å = intoutÆ1Å;
rgbÆ1Å = intoutÆ2Å;
rgbÆ2Å = intoutÆ3Å;
å
WORD
vq_cellarray( handle, xy, row_len, num_rows, el_used, rows_used, stat, colors )
WORD handle, xyÆÅ, row_len, num_rows, *el_used, *rows_used, *stat, colorsÆÅ;
æ
i_ptsin( xy );
i_intout( colors );
contrlÆ0Å = 27;
contrlÆ1Å = 2;
contrlÆ3Å = 0;
contrlÆ6Å = handle;
contrlÆ7Å = row_len;
contrlÆ8Å = num_rows;
vdi();
*el_used = contrlÆ9Å;
*rows_used = contrlÆ10Å;
*stat = contrlÆ11Å;
i_ptsin( ptsin );
i_intout( intout );
å
WORD
vrq_locator( handle, initx, inity, xout, yout, term )
WORD handle, initx, inity, *xout, *yout, *term;
æ
ptsinÆ0Å = initx;
ptsinÆ1Å = inity;
contrlÆ0Å = 28;
contrlÆ1Å = 1;
contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
*xout = ptsoutÆ0Å;
*yout = ptsoutÆ1Å;
*term = intoutÆ0Å;
å
WORD
vsm_locator( handle, initx, inity, xout, yout, term )
WORD handle, initx, inity, *xout, *yout, *term;
æ
ptsinÆ0Å = initx;
ptsinÆ1Å = inity;
contrlÆ0Å = 28;
contrlÆ1Å = 1;
contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
*xout = ptsoutÆ0Å;
*yout = ptsoutÆ1Å;
*term = intoutÆ0Å;
return( (contrlÆ4Å << 1) ø contrlÆ2Å );
å
WORD
vrq_valuator( handle, val_in, val_out, term )
WORD handle, val_in, *val_out, *term;
æ
intinÆ0Å = val_in;
contrlÆ0Å = 29;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
*val_out = intoutÆ0Å;
*term = intoutÆ1Å;
å
WORD
vsm_valuator( handle, val_in, val_out, term, status )
WORD handle, val_in, *val_out, *term, *status;
æ
intinÆ0Å = val_in;
contrlÆ0Å = 29;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
*val_out = intoutÆ0Å;
*term = intoutÆ1Å;
*status = contrlÆ4Å;
å
WORD
vrq_choice( handle, in_choice, out_choice )
WORD handle, in_choice, *out_choice;
æ
intinÆ0Å = in_choice;
contrlÆ0Å = 30;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
*out_choice = intoutÆ0Å;
å
WORD
vsm_choice( handle, choice )
WORD handle, *choice;
æ
contrlÆ0Å = 30;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
*choice = intoutÆ0Å;
return( contrlÆ4Å );
å
WORD
vrq_string( handle, length, echo_mode, echo_xy, string)
WORD handle, length, echo_mode, echo_xyÆÅ;
BYTE *string;
æ
WORD count;
intinÆ0Å = length;
intinÆ1Å = echo_mode;
i_ptsin( echo_xy );
contrlÆ0Å = 31;
contrlÆ1Å = echo_mode;
contrlÆ3Å = 2;
contrlÆ6Å = handle;
vdi();
for (count = 0; count < contrlÆ4Å; count++)
*string++ = intoutÆcountÅ;
*string = 0;
i_ptsin( ptsin );
å
WORD
vsm_string( handle, length, echo_mode, echo_xy, string )
WORD handle, length, echo_mode, echo_xyÆÅ;
BYTE *string;
æ
WORD count;
intinÆ0Å = length;
intinÆ1Å = echo_mode;
i_ptsin( echo_xy );
contrlÆ0Å = 31;
contrlÆ1Å = echo_mode;
contrlÆ3Å = 2;
contrlÆ6Å = handle;
vdi();
for (count = 0; count < contrlÆ4Å; count++)
*string++ = intoutÆcountÅ;
*string = 0;
i_ptsin( ptsin );
return( contrlÆ4Å );
å
WORD
vswr_mode( handle, mode )
WORD handle, mode;
æ
intinÆ0Å = mode;
contrlÆ0Å = 32;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
vsin_mode( handle, dev_type, mode )
WORD handle, dev_type, mode;
æ
intinÆ0Å = dev_type;
intinÆ1Å = mode;
contrlÆ0Å = 33;
contrlÆ1Å = 0;
contrlÆ3Å = 2;
contrlÆ6Å = handle;
vdi();
å
WORD
vql_attributes( handle, attributes )
WORD handle, attributesÆÅ;
æ
i_intout( attributes );
contrlÆ0Å = 35;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
i_intout( intout );
attributesÆ3Å = ptsoutÆ0Å;
å
WORD
vqm_attributes( handle, attributes )
WORD handle, attributesÆÅ;
æ
i_intout( attributes );
contrlÆ0Å = 36;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
i_intout( intout );
attributesÆ3Å = ptsoutÆ1Å;
å
WORD
vqf_attributes( handle, attributes )
WORD handle, attributesÆÅ;
æ
i_intout( attributes );
contrlÆ0Å = 37;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
i_intout( intout );
å
WORD
vqt_attributes( handle, attributes )
WORD handle, attributesÆÅ;
æ
i_intout( attributes );
i_ptsout( attributes + 6 );
contrlÆ0Å = 38;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
i_intout( intout );
i_ptsout( ptsout );
å
WORD
vst_alignment( handle, hor_in, vert_in, hor_out, vert_out )
WORD handle, hor_in, vert_in, *hor_out, *vert_out;
æ
intinÆ0Å = hor_in;
intinÆ1Å = vert_in;
contrlÆ0Å = 39;
contrlÆ1Å = 0;
contrlÆ3Å = 2;
contrlÆ6Å = handle;
vdi();
*hor_out = intoutÆ0Å;
*vert_out = intoutÆ1Å;
å
WORD
v_opnvwk( work_in, handle, work_out )
WORD work_inÆÅ, *handle, work_outÆÅ;
æ
i_intin( work_in );
i_intout( work_out );
i_ptsout( work_out + 45 );
contrlÆ0Å = 100;
contrlÆ1Å = 0;
contrlÆ3Å = 11;
contrlÆ6Å = *handle;
vdi();
*handle = contrlÆ6Å;
i_intin( intin );
i_intout( intout );
i_ptsout( ptsout );
å
WORD
v_clsvwk( handle )
WORD handle;
æ
contrlÆ0Å = 101;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
å
WORD
vq_extnd( handle, owflag, work_out )
WORD handle, owflag, work_outÆÅ;
æ
i_intout( work_out );
i_ptsout( work_out + 45 );
intinÆ0Å = owflag;
contrlÆ0Å = 102;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
i_intout( intout );
i_ptsout( ptsout );
å
WORD
v_contourfill( handle, x, y, index )
WORD handle, x, y, index;
æ
intinÆ0Å = index;
ptsinÆ0Å = x;
ptsinÆ1Å = y;
contrlÆ0Å = 103;
contrlÆ1Å = contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
å
WORD
vsf_perimeter( handle, per_vis )
WORD handle, per_vis;
æ
intinÆ0Å = per_vis;
contrlÆ0Å = 104;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
v_get_pixel( handle, x, y, pel, index )
WORD handle, x, y, *pel, *index;
æ
ptsinÆ0Å = x;
ptsinÆ1Å = y;
contrlÆ0Å = 105;
contrlÆ1Å = 1;
contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
*pel = intoutÆ0Å;
*index = intoutÆ1Å;
å
WORD
vst_effects( handle, effect )
WORD handle, effect;
æ
intinÆ0Å = effect;
contrlÆ0Å = 106;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
vst_point( handle, point, char_width, char_height, cell_width, cell_height )
WORD handle, point, *char_width, *char_height, *cell_width, *cell_height;
æ
intinÆ0Å = point;
contrlÆ0Å = 107;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
*char_width = ptsoutÆ0Å;
*char_height = ptsoutÆ1Å;
*cell_width = ptsoutÆ2Å;
*cell_height = ptsoutÆ3Å;
return( intoutÆ0Å );
å
WORD
vsl_ends( handle, beg_style, end_style)
WORD handle, beg_style, end_style;
æ
intinÆ0Å = beg_style;
intinÆ1Å = end_style;
contrlÆ0Å = 108;
contrlÆ1Å = 0;
contrlÆ3Å = 2;
contrlÆ6Å = handle;
vdi();
å
WORD
vro_cpyfm( handle, wr_mode, xy, srcMFDB, desMFDB )
WORD handle, wr_mode, xyÆÅ, *srcMFDB, *desMFDB;
æ
intinÆ0Å = wr_mode;
i_ptr( srcMFDB );
i_ptr2( desMFDB );
i_ptsin( xy );
contrlÆ0Å = 109;
contrlÆ1Å = 4;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
i_ptsin( ptsin );
å
WORD
vr_trnfm( handle, srcMFDB, desMFDB )
WORD handle, *srcMFDB, *desMFDB;
æ
i_ptr( srcMFDB );
i_ptr2( desMFDB );
contrlÆ0Å = 110;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
å
WORD
vsc_form( handle, cur_form )
WORD handle, *cur_form;
æ
i_intin( cur_form );
contrlÆ0Å = 111;
contrlÆ1Å = 0;
contrlÆ3Å = 37;
contrlÆ6Å = handle;
vdi();
i_intin( intin );
å
WORD
vsf_udpat( handle, fill_pat, planes )
WORD handle, fill_patÆÅ, planes;
æ
i_intin( fill_pat );
contrlÆ0Å = 112;
contrlÆ1Å = 0;
contrlÆ3Å = 16*planes;
contrlÆ6Å = handle;
vdi();
i_intin( intin );
å
WORD
vsl_udsty( handle, pattern )
WORD handle, pattern;
æ
intinÆ0Å = pattern;
contrlÆ0Å = 113;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
å
WORD
vr_recfl( handle, xy )
WORD handle, *xy;
æ
i_ptsin( xy );
contrlÆ0Å = 114;
contrlÆ1Å = 2;
contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
i_ptsin( &ptsin );
å
WORD
vqin_mode( handle, dev_type, mode )
WORD handle, dev_type, *mode;
æ
intinÆ0Å = dev_type;
contrlÆ0Å = 115;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
*mode = intoutÆ0Å;
å
WORD
vqt_extent( handle, string, extent )
WORD handle, extentÆÅ;
BYTE stringÆÅ;
æ
WORD *intstr;
intstr = intin;
while (*intstr++ = *string++)
;
i_ptsout( extent );
contrlÆ0Å = 116;
contrlÆ1Å = 0;
contrlÆ3Å = intstr - intin - 1;
contrlÆ6Å = handle;
vdi();
i_ptsout( ptsout );
å
WORD
vqt_width( handle, character, cell_width, left_delta, right_delta )
WORD handle, *cell_width, *left_delta, *right_delta;
BYTE character;
æ
intinÆ0Å = character;
contrlÆ0Å = 117;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
*cell_width = ptsoutÆ0Å;
*left_delta = ptsoutÆ2Å;
*right_delta = ptsoutÆ4Å;
return( intoutÆ0Å );
å
WORD
vex_timv( handle, tim_addr, old_addr, scale )
WORD handle, *scale;
LONG tim_addr, *old_addr;
æ
i_lptr1( tim_addr );
contrlÆ0Å = 118;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
m_lptr2( old_addr );
*scale = intoutÆ0Å;
å
WORD
vst_load_fonts( handle, select )
WORD handle, select;
æ
contrlÆ0Å = 119;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
return( intoutÆ0Å );
å
WORD
vst_unload_fonts( handle, select )
WORD handle, select;
æ
contrlÆ0Å = 120;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
å
WORD
vrt_cpyfm( handle, wr_mode, xy, srcMFDB, desMFDB, index )
WORD handle, wr_mode, *srcMFDB, *desMFDB, xyÆÅ, *index;
æ
intinÆ0Å = wr_mode;
intinÆ1Å = *index++;
intinÆ2Å = *index;
i_ptr( srcMFDB );
i_ptr2( desMFDB );
i_ptsin( xy );
contrlÆ0Å = 121;
contrlÆ1Å = 4;
contrlÆ3Å = 3;
contrlÆ6Å = handle;
vdi();
i_ptsin( ptsin );
å
WORD
v_show_c( handle, reset )
WORD handle, reset;
æ
intinÆ0Å = reset;
contrlÆ0Å = 122;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
å
WORD
v_hide_c( handle )
WORD handle;
æ
contrlÆ0Å = 123;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
å
WORD
vq_mouse( handle, status, px, py )
WORD handle, *status, *px, *py;
æ
contrlÆ0Å = 124;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
*status = intoutÆ0Å;
*px = ptsoutÆ0Å;
*py = ptsoutÆ1Å;
å
WORD
vex_butv( handle, usercode, savecode )
WORD handle;
LONG usercode, *savecode;
æ
i_lptr1( usercode );
contrlÆ0Å = 125;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
m_lptr2( savecode );
å
WORD
vex_motv( handle, usercode, savecode )
WORD handle;
LONG usercode, *savecode;
æ
i_lptr1( usercode );
contrlÆ0Å = 126;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
m_lptr2( savecode );
å
WORD
vex_curv( handle, usercode, savecode )
WORD handle;
LONG usercode, *savecode;
æ
i_lptr1( usercode );
contrlÆ0Å = 127;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
m_lptr2( savecode );
å
WORD
vq_key_s( handle, status )
WORD handle, *status;
æ
contrlÆ0Å = 128;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
*status = intoutÆ0Å;
å
WORD
vs_clip( handle, clip_flag, xy )
WORD handle, clip_flag, xyÆÅ;
æ
i_ptsin( xy );
intinÆ0Å = clip_flag;
contrlÆ0Å = 129;
contrlÆ1Å = 2;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
i_ptsin( ptsin );
å
WORD
vqt_name( handle, element_num, name )
WORD handle, element_num;
BYTE nameÆÅ;
æ
WORD i;
intinÆ0Å = element_num;
contrlÆ0Å = 130;
contrlÆ1Å = 0;
contrlÆ3Å = 1;
contrlÆ6Å = handle;
vdi();
for (i = 0 ; i < 32 ; i++)
nameÆiÅ = intoutÆi + 1Å;
return( intoutÆ0Å );
å
WORD
vqt_font_info( handle, minADE, maxADE, distances, maxwidth, effects )
WORD handle, *minADE, *maxADE, distancesÆÅ, *maxwidth, effectsÆÅ;
æ
contrlÆ0Å = 131;
contrlÆ1Å = contrlÆ3Å = 0;
contrlÆ6Å = handle;
vdi();
*minADE = intoutÆ0Å;
*maxADE = intoutÆ1Å;
*maxwidth = ptsoutÆ0Å;
distancesÆ0Å = ptsoutÆ1Å;
distancesÆ1Å = ptsoutÆ3Å;
distancesÆ2Å = ptsoutÆ5Å;
distancesÆ3Å = ptsoutÆ7Å;
distancesÆ4Å = ptsoutÆ9Å;
effectsÆ0Å = ptsoutÆ2Å;
effectsÆ1Å = ptsoutÆ4Å;
effectsÆ2Å = ptsoutÆ6Å;
å
«eof»