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.10.23 Bindings für v_open_bm TOS
C: int16_t v_open_bm ( int16_t base_handle, GCBITMAP *bitmap,
int16_t color_flags, int16_t unit_flags, int16_t
pixel_width, int16_t pixel_height );
Umsetzung:
int16_t v_open_bm ( int16_t base_handle, GCBITMAP *bitmap,
int16_t color_flags, int16_t unit_flags,
int16_t pixel_width, int16_t pixel_height )
{
intin[0] = color_flags;
intin[1] = unit_flags;
intin[2] = pixel_width;
intin[3] = pixel_height;
contrl[0] = 100;
contrl[1] = 0;
contrl[3] = 4;
contrl[5] = 3;
contrl[6] = base_handle;
contrl[7..8] = bitmap;
vdi ();
return ( contrl[6] );
}
GEM-Arrays:
Adresse Feldelement Belegung
contrl contrl[0] 100 # 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] 4 # Einträge in intin
contrl+8 contrl[4] 1 # Einträge in intout
contrl+10 contrl[5] 3 # Unterfunktion
contrl+12 contrl[6] base_handle
contrl+14 contrl[7..8] bitmap
intin intin[0] color_flags
intin+2 intin[1] unit_flags
intin+4 intin[2] pixel_width
intin+6 intin[3] pixel_height
intout intout[0] 1