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.19.4 Bindings für xgrf_stepcalc TOS
C: int16_t xgrf_stepcalc ( int16_t orgw, int16_t orgh,
int16_t xc, int16_t yc, int16_t w, int16_t h, int16_t
*pcx, int16_t *pcy, int16_t *pcnt, int16_t *pxstep,
int16_t *pystep );
Umsetzung:
int16_t xgrf_stepcalc ( int16_t orgw, int16_t orgh, int16_t xc,
int16_t yc, int16_t w, int16_t h,
int16_t *pcx, int16_t *pcy, int16_t *pcnt,
int16_t *pxstep, int16_t *pystep )
{
int_in[0] = orgw;
int_in[1] = orgh;
int_in[2] = xc;
int_in[3] = yc;
int_in[4] = w;
int_in[5] = h;
crys_if (130);
*pcx = int_out[1];
*pcy = int_out[2];
*pcnt = int_out[3];
*pxstep = int_out[4];
*pystep = int_out[5];
return ( int_out[0] );
}
GEM-Arrays:
Adresse Feldelement Belegung
control control[0] 130 # Opcode der Funktion
control+2 control[1] 6 # Einträge in int_in
control+4 control[2] 6 # 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] orgw
int_in+2 int_in[1] orgh
int_in+4 int_in[2] xc
int_in+6 int_in[3] yc
int_in+8 int_in[4] w
int_in+10 int_in[5] h
int_out int_out[0] Return-Wert
int_out+2 int_out[1] pcx
int_out+4 int_out[2] pcy
int_out+6 int_out[3] pcnt
int_out+8 int_out[4] pxstep
int_out+10 int_out[5] pystep