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.8.1.22  Bindings für v_bit_image                                 TOS

 C:         void v_bit_image ( int16_t handle, CONST int8_t *filename, 
            int16_t aspect, int16_t x_scale, int16_t y_scale, int16_t 
            h_align, int16_t v_align, int16_t *xyarray );

 Umsetzung:

            void v_bit_image (int16_t handle, CONST int8_t *filename,
                              int16_t aspect, int16_t x_scale,
                              int16_t y_scale, int16_t h_align,
                              int16_t v_align, int16_t *xyarray)
            {
               int16_t tmp;
 
               ptsin[0..3] = xyarray[0..3];
               intin[0] = aspect;
               intin[1] = x_scale;
               intin[2] = y_scale;
               intin[3] = h_align;
               intin[4] = v_align;
 
               tmp = 5;
               while (intin[tmp++] = *filename++)
                  ;
 
               contrl[0] = 5;
               contrl[1] = 2;
               contrl[3] = --tmp;
               contrl[5] = 23;
               contrl[6] = handle;
 
               vdi ();
            }

 GEM-Arrays:

             Adresse    Feldelement    Belegung 
             contrl     contrl[0]      5     # Opcode der Funktion 
             contrl+2   contrl[1]      2     # Einträge in ptsin 
             contrl+4   contrl[2]      0     # Einträge in ptsout 
             contrl+6   contrl[3]      n+5   # Einträge in intin 
             contrl+8   contrl[4]      0     # Einträge in intout 
             contrl+10  contrl[5]      23    # Escape/Sub-Opcode 
             contrl+12  contrl[6]      handle 
             intin      intin[0]       aspect 
             intin+2    intin[1]       x_scale 
             intin+4    intin[2]       y_scale 
             intin+6    intin[3]       h_align 
             intin+8    intin[4]       v_align 
             intin+10   intin[5..n+4]  filename[0..n-1] 
             ptsin      ptsin[0..3]    xyarray[0..3]