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-File8.11.14.1  Bindings für xfrm_popup                                 TOS

 C:          int16_t xfrm_popup( OBJECT *tree, int16_t x, int16_t y, 
             int16_t firstscrlob, int16_t lastscrlob, int16_t nlines, 
             void cdecl (*init)(OBJECT *tree, int16_t scrollpos, 
             int16_t nlines, void *param), void *param, int16_t 
             *lastscrlpos )

 Umsetzung:

             int16_t xfrm_popup( OBJECT *tree, int16_t x, int16_t y,
                                 int16_t firstscrlob, int16_t lastscrlob,
                                 int16_t nlines,
                                 void  cdecl (*init)(OBJECT *tree, int16_t scrollpos,
                                 int16_t nlines, void *param),
                                 void *param, int16_t *lastscrlpos )
             {
                int_in[0]  = x;
                int_in[1]  = y;
                int_in[2]  = firstscrlob;
                int_in[3]  = lastscrlob;
                int_in[4]  = nlines;
                int_in[5]  = *lastscrlpos;
                addr_in[0] = tree;
                addr_in[1] = init;
                addr_in[2] = param;
 
                int_out[1] = *lastscrlpos;   /* vorbesetzen */
 
                crys_if(135)
 
                *lastscrlpos = int_out[1];
                return ( int_out[0] );
             }

 GEM-Arrays:

              Adresse    Feldelement  Belegung 
              control    control[0]   135   # Opcode der Funktion 
              control+2  control[1]   6     # Einträge in int_in 
              control+4  control[2]   2     # Einträge in int_out 
              control+6  control[3]   3     # Einträge in addr_in 
              control+8  control[4]   0     # Einträge in addr_out 
              int_in     int_in[0]    x 
              int_in+2   int_in[1]    y 
              int_in+4   int_in[2]    firstscrlob 
              int_in+6   int_in[3]    lastscrlob 
              int_in+8   int_in[4]    nlines 
              int_in+10  int_in[5]    lastscrlpos 
              addr_in    addr_in[0]   tree 
              addr_in+4  addr_in[1]   init 
              addr_in+8  addr_in[2]   param 
              int_out    int_out[0]   Return-Wert 
              int_out+2  int_out[1]   lastscrlpos