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.11.1  Bindings für form_xdial                                 TOS

 C:          int16_t form_xdial ( int16_t fo_diflag, int16_t 
             fo_dilittlx, int16_t fo_dilittly, int16_t fo_dilittlw, 
             int16_t fo_dilittlh, int16_t fo_dibigx, int16_t 
             fo_dibigy, int16_t fo_dibigw, int16_t fo_dibigh, void 
             **flydial );

 Umsetzung:

             int16_t form_xdial (int16_t fo_diflag, int16_t fo_dilittlx,
                                 int16_t fo_dilittly, int16_t fo_dilittlw,
                                 int16_t fo_dilittlh, int16_t fo_dibigx,
                                 int16_t fo_dibigy, int16_t fo_dibigw,
                                 int16_t fo_dibigh, void **flydial)
             {
                int_in[0]  = fo_diflag;
                int_in[1]  = fo_dilittlx;
                int_in[2]  = fo_dilittly;
                int_in[3]  = fo_dilittlw;
                int_in[4]  = fo_dilittlh;
                int_in[5]  = fo_dibigx;
                int_in[6]  = fo_dibigy;
                int_in[7]  = fo_dibigw;
                int_in[8]  = fo_dibigh;
                addr_in[0] = flydial;
                addr_in[1] = 0;              /* reserviert */
 
                return ( crys_if(51) );
             }

 GEM-Arrays:

              Adresse    Feldelement  Belegung 
              control    control[0]   51    # Opcode der Funktion 
              control+2  control[1]   9     # Einträge in int_in 
              control+4  control[2]   1     # Einträge in int_out 
              control+6  control[3]   2     # Einträge in addr_in 
              control+8  control[4]   0     # Einträge in addr_out 
              int_in     int_in[0]    fo_diflag 
              int_in+2   int_in[1]    fo_dilittlx 
              int_in+4   int_in[2]    fo_dilittly 
              int_in+6   int_in[3]    fo_dilittlw 
              int_in+8   int_in[4]    fo_dilittlh 
              int_in+10  int_in[5]    fo_dibigx 
              int_in+12  int_in[6]    fo_dibigy 
              int_in+14  int_in[7]    fo_dibigw 
              int_in+16  int_in[8]    fo_dibigh 
              addr_in    addr_in[0]   flydial 
              addr_in+4  addr_in[1]   0 
              int_out    int_out[0]   Return-Wert