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.16.9.1  Bindings für objc_sysvar                                 TOS

 C:          int16_t objc_sysvar ( int16_t ob_smode, int16_t 
             ob_swhich, int16_t ob_sival1, int16_t ob_sival2, int16_t 
             *ob_soval1, int16_t *ob_soval2 );

 Umsetzung:

             int16_t objc_sysvar (int16_t ob_smode, int16_t ob_swhich,
                                  int16_t ob_sival1, int16_t ob_sival2,
                                  int16_t *ob_soval1, int16_t *ob_soval2)
             {
                int_in[0] = ob_smode;
                int_in[1] = ob_swhich;
                int_in[2] = ob_sival1;
                int_in[3] = ob_sival2;
 
                crys_if (48);
 
                *ob_soval1 = int_out[1];
                *ob_soval2 = int_out[2];
 
                return ( int_out[0] );
             }

 GEM-Arrays:

              Adresse    Feldelement  Belegung 
              control    control[0]   48    # Opcode der Funktion 
              control+2  control[1]   4     # Einträge in int_in 
              control+4  control[2]   3     # Einträge in int_out 
              control+6  control[3]   0     # Einträge in addr_in 
              control+8  control[4]   0     # Einträge in addr_out 
              int_in     int_in[0]    ob_smode 
              int_in+2   int_in[1]    ob_swhich 
              int_in+4   int_in[2]    ob_sival1 
              int_in+6   int_in[3]    ob_sival2 
              int_out    int_out[0]   Return-Wert 
              int_out+2  int_out[1]   ob_soval1 
              int_out+4  int_out[2]   ob_soval2