Topic       : TOS - das Betriebssystem
Author      : 
Version     : tos.hyp (5. März 2013)
Subject     : Programmieren/Atari
Nodes       : 3001
Index Size  : 93602
HCP-Version : 5
Compiled on : Atari
@charset    : atarist
@lang       : 
@default    : Titel
@help       : 
@options    : +g -i -s +x +zz -t4
@width      : 70
View Ref-File7.6.72  Bindings für vq_color                                      TOS

 C:         int16_t vq_color ( int16_t handle, int16_t color_index, 
            int16_t set_flag, int16_t *rgb );

 Umsetzung:

            int16_t vq_color (int16_t handle, int16_t color_index,
                           int16_t set_flag, int16_t *rgb)
            {
               intin[0] = color_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];
 
               return ( intout[0] );
            }

 GEM-Arrays:

             Adresse    Feldelement   Belegung 
             contrl     contrl[0]     26    # Opcode der Funktion 
             contrl+2   contrl[1]     0     # Einträge in ptsin 
             contrl+4   contrl[2]     0     # Einträge in ptsout 
             contrl+6   contrl[3]     2     # Einträge in intin 
             contrl+8   contrl[4]     4     # Einträge in intout 
             contrl+12  contrl[6]     handle 
             intin      intin[0]      color_index 
             intin+2    intin[1]      set_flag 
             intout     intout[0]     Return-Wert 
             intout+2   intout[1..3]  rgb[0..2]