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.3.5.1 Bindings für appl_getinfo TOS
C: int16_t appl_getinfo ( int16_t ap_gtype, int16_t
*ap_gout1, int16_t *ap_gout2, int16_t *ap_gout3, int16_t
*ap_gout4 );
Umsetzung:
int16_t appl_getinfo (int16_t ap_gtype, int16_t *ap_gout1,
int16_t *ap_gout2, int16_t *ap_gout3,
int16_t *ap_gout4)
{
int_in[0] = ap_gtype;
crys_if (130);
*ap_gout1 = int_out[1];
*ap_gout2 = int_out[2];
*ap_gout3 = int_out[3];
*ap_gout4 = int_out[4];
return ( int_out[0] );
}
GEM-Arrays:
Adresse Feldelement Belegung
control control[0] 130 # Opcode der Funktion
control+2 control[1] 1 # Einträge in int_in
control+4 control[2] 5 # 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] ap_gtype
int_out int_out[0] Return-Wert
int_out+2 int_out[1] ap_gout1
int_out+4 int_out[2] ap_gout2
int_out+6 int_out[3] ap_gout3
int_out+8 int_out[4] ap_gout4