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.6.17.1 Bindings für edit_scroll TOS
C: int16_t edit_scroll ( OBJECT *tree, int16_t obj, int16_t
whdl, int32_t yscroll, int16_t xscroll );
Umsetzung:
int16_t edit_scroll ( OBJECT *tree, int16_t obj, int16_t whdl,
int32_t yscroll, int16_t xscroll )
{
int_in[0] = obj;
int_in[1] = 9; /* Subcode für Funktion */
int_in[2] = whdl;
int_in[3..4] = yscroll;
int_in[5] = xscroll;
addr_in[0] = tree;
crys_if( 217 );
return ( int_out [0] );
}
GEM-Arrays:
Adresse Feldelement Belegung
control control[0] 217 # Opcode der Funktion
control+2 control[1] 6 # Einträge in int_in
control+4 control[2] 1 # Einträge in int_out
control+6 control[3] 1 # Einträge in addr_in
control+8 control[4] 0 # Einträge in addr_out
int_in int_in[0] obj
int_in+2 int_in[1] 9 # Sub-Opcode
int_in+4 int_in[2] whdl
int_in+6 int_in[3..4] yscroll
int_in+10 int_in[5] xscroll
addr_in addr_in[0] tree
int_out int_out[0] Return-Wert