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.92 Bindings für vst_width TOS
C: void vst_width ( int16_t handle, int16_t width, int16_t
*char_width, int16_t *char_height, int16_t *cell_width,
int16_t *cell_height );
Umsetzung:
void vst_width (int16_t handle, int16_t width,
int16_t *char_width, int16_t *char_height,
int16_t *cell_width, int16_t *cell_height)
{
ptsin[0] = width;
contrl[0] = 231;
contrl[1] = 1;
contrl[3] = 0;
contrl[6] = handle;
vdi ();
*char_width = ptsout[0];
*char_height = ptsout[1];
*cell_width = ptsout[2];
*cell_height = ptsout[3];
}
GEM-Arrays:
Adresse Feldelement Belegung
contrl contrl[0] 231 # Opcode der Funktion
contrl+2 contrl[1] 1 # Einträge in ptsin
contrl+4 contrl[2] 2 # Einträge in ptsout
contrl+6 contrl[3] 0 # Einträge in intin
contrl+8 contrl[4] 0 # Einträge in intout
contrl+12 contrl[6] handle
ptsin ptsin[0] width
ptsout ptsout[0] char_width
ptsout+2 ptsout[1] char_height
ptsout+4 ptsout[2] cell_width
ptsout+6 ptsout[3] cell_height