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.9.24 Bindings für vq_ctab TOS
C: int16_t vq_ctab( int16_t handle, int32_t ctab_length,
COLOR_TAB *ctab );
Umsetzung:
int16_t vq_ctab( int16_t handle, int32_t ctab_length,
COLOR_TAB *ctab )
{
intin[0..1] = ctab_length;
intout zeigt auf ctab
contrl[0] = 206;
contrl[1] = 0;
contrl[3] = 2;
contrl[5] = 0;
contrl[6] = handle;
vdi ();
if ( contrl[4] )
return( 1 ); /* alles in Ordnung */
else
return( 0 );
}
GEM-Arrays:
Adresse Feldelement Belegung
contrl contrl[0] 206 # Opcode der Funktion
contrl+2 contrl[1] 0 # Einträge in ptsin
contrl+4 contrl[2] 0 # Einträge in ptsout
contrl+6 contrl[3] 2 # Einträge in intin
contrl+8 contrl[4] n # Einträge in intout
contrl+10 contrl[5] 0 # Sub-Opcode
contrl+12 contrl[6] handle
intin intin[0..1] ctab_length
intout intout[0..n] ctab