Motorola M68000 User's Guide Page 236

  • Download
  • Add to my manuals
  • Print
  • Page
    / 256
  • Table of contents
  • BOOKMARKS
  • Rated. / 5. Based on customer reviews
Page view 235
222 Assembly Language Programming for the 68000 Family
; Macintosh shell.
;****************************************
t
; The following include files ace needed:
t
Include MacTraps.D
Include SysEqu .D
?
xdef
Start
;starting address
t
; Equates
WIND TOP
equ 40
;window coordinates (GLOBAL)
WIND LEFT
equ 4
$
WIND_B0T
equ 338
t
WIND_RIGHT equ 508
i
WINDHEIGHT
equ WIND
BOT-WIND TOP ;window dimensions
WINDWIDTH equ
WIND
_RIGHT-WIND_LEFT
LMARG equ
6
;left margin
RMARG
equ WINDWIDTH-10 }right
TMARG equ 15
;top
BMARG equ
WINDHEIGHT-15 ;bottom
BS
equ
8
;ASCII backspace
CR
equ
13
;ASCII car ret
LF
equ 10 ;ASCII If
DASH
equ
45
;ASCII minus sign
ZERO
equ 48
;ASCII character for digit zero
NINE
equ 57
;ASCII character for digit nine
TRUE
equ 1
;boolean true
FALSE equ 0
;boolean false
FONTNUM
equ
4
;default font code
FONTSTYLE equ 0
;plain style
FONTSIZE
equ
9
;default font size
ASCENT equ 0
;offsets of fields in Fontinfo
DESCENT equ
2
;
WIDMAX
equ 4
0
LEADING
equ
6
?
; The window coordinates in
local coordinates
WBoundsRect:
dc.w WIND
TOP,WIND LEFT,WIND BOT,WIND RIGHT
WScrollRect:
dc.w 0,0,
WINDHEIGHT,WINDWIDTH
ScrollRgnH:
dc.l
0
;handle for scroll region
Fontlnfo:
dcb.w
4,0
;buffer for record ret. by _GetFontlnfo
LineHt:
dc.w
0
;buffer for height of line
WindowPointer:
;
EventRec:
dc.l
0
;pointer to the window
ds.l
4
;event record
?
Title:
dc.b
16,'
Macintosh shell.1
t
; Initialization code. Set up everything.
Page view 235
1 2 ... 231 232 233 234 235 236 237 238 239 240 241 ... 255 256

Comments to this Manuals

No comments