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-File7.4.6.86 Bindings für vst_setsize32 TOS
C: fix31 vst_setsize32 ( int16_t handle, fix31 point, int16_t
*chwd, int16_t *chht, int16_t *cellwd, int16_t *cellht );
Umsetzung:
fix31 vst_setsize32 (int16_t handle, fix31 point,
int16_t *chwd, int16_t *chht,
int16_t *cellwd, int16_t *cellht)
{
intin[0..1] = point;
contrl[0] = 252;
contrl[1] = 0;
contrl[3] = 2;
contrl[6] = handle;
vdi ();
*chwd = ptsout[0];
*chht = ptsout[1];
*cellwd = ptsout[2];
*cellht = ptsout[3];
return ( intout[0..1] );
}
GEM-Arrays:
Adresse Feldelement Belegung
contrl contrl[0] 252 # Opcode der Funktion
contrl+2 contrl[1] 0 # Einträge in ptsin
contrl+4 contrl[2] 2 # Einträge in ptsout
contrl+6 contrl[3] 2 # Einträge in intin
contrl+8 contrl[4] 2 # Einträge in intout
contrl+12 contrl[6] handle
intin intin[0..1] point
intout intout[0..1] Return-Wert
ptsout ptsout[0] chwd
ptsout+2 ptsout[1] chht
ptsout+4 ptsout[2] cellwd
ptsout+6 ptsout[3] cellht