Topic       : TOS - The Operating System
Author      : 
Version     : tos.hyp (December 19, 2008)
Subject     : Programmieren/Atari
Nodes       : 3010
Index Size  : 93790
HCP-Version : 5
Compiled on : Atari
@charset    : atarist
@lang       : 
@default    : Title
@help       : 
@options    : +g -i -s +x +zz -t4
@width      : 70
View Ref-File7.7.30  Bindings for vsm_locator                                   TOS

 C:          int16_t vsm_locator ( int16_t handle, int16_t x, int16_t 
             y, int16_t *xout, int16_t *yout, int16_t *term );

 Binding:

             int16_t vsm_locator (int16_t handle, int16_t x, int16_t y,
                                  int16_t *xout, int16_t *yout,
                                  int16_t *term)
             {
                ptsin[0] = x;
                ptsin[1] = y;
 
                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]) );
             }

 GEM-Arrays:

              Address    Element    Contents 
              contrl     contrl[0]  28        # Function opcode 
              contrl+2   contrl[1]  1         # Entry in ptsin 
              contrl+4   contrl[2]  0 oder 1  # Entry in ptsout 
              contrl+6   contrl[3]  0         # Entry in intin 
              contrl+8   contrl[4]  0 oder 1  # Entry in intout 
              contrl+12  contrl[6]  handle 
              ptsin      ptsin[0]   x 
              ptsin+2    ptsin[1]   y 
              intout     intout[0]  term 
              ptsout     ptsout[0]  xout 
              ptsout+2   ptsout[1]  yout