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-File6.10.1 Bindings für filled_rect TOS Pure-C: void filled_rect( int16_t x1, int16_t y1, int16_t x2, int16_t y2 ); Assembler: movem.l D0-D2/A0-A2,-(A7) ; Register retten move.l pParamblk,A0 ; Zeiger Parameterblock LINEA move.w x1,(38,A0) ; linke obere Ecke, X-Koordinate in LINEA.x1 move.w y1,(40,A0) ; linke obere Ecke, Y-Koordinate in LINEA.y1 move.w x2,(42,A0) ; rechte untere Ecke, X-Koordinate in LINEA.x2 move.w y2,(44,A0) ; rechte untere Ecke, Y-Koordinate in LINEA.x2 move.w colbit0,(24,A0) ; Bit für erste Plane in LINEA.fg_bp_1 move.w colbit1,(26,A0) ; Bit für erste Plane in LINEA.fg_bp_2 move.w colbit2,(28,A0) ; Bit für erste Plane in LINEA.fg_bp_3 move.w colbit3,(30,A0) ; Bit für erste Plane in LINEA.fg_bp_4 move.w wmode,(36,A0) ; Writemode in LINEA.wrt_mode move.w patptr,(46,A0) ; Linienmuster in LINEA.patptr move.w patmsk,(50,A0) ; Anzahl Muster in LINEA.patmsk move.w mode,(54,A0) ; Clipmode in LINEA.clip move.w cx1,(56,A0) ; linke obere Clip-Ecke, X-Koordinate in LINEA.xmn_clip move.w cy1,(58,A0) ; linke obere Clip-Ecke, Y-Koordinate in LINEA.ymn_clip move.w cx2,(60,A0) ; rechte untere Clip-Ecke, X-Koordinate in LINEA.xmx_clip move.w cy2,(62,A0) ; rechte untere Clip-Ecke, Y-Koordinate in LINEA.ymx_clip dc.w $A005 ; Line-A Opcode movem.l (A7)+,D0-D2/A0-A2 ; Register restaurieren