Motorola M68000 Betriebsanweisung Seite 237

  • Herunterladen
  • Zu meinen Handbüchern hinzufügen
  • Drucken
  • Seite
    / 256
  • Inhaltsverzeichnis
  • LESEZEICHEN
  • Bewertet. / 5. Basierend auf Kundenbewertungen
Seitenansicht 236
Appendix B 225
Start: movem.l d0-d7/a0-a6,-(sp)
pea -4(a5)
_InitGraf
_InitPonts
_InitWindows
_InitMenua
clr.l -(sp)
_InitDialogs
JTEInit
_InitCursor
lea Title,aO
bsr makewindow
;
; Your program goes here
;save regs.
;space for Quickdraw
;init Quickdraw
;init font manager
;init window manager
;init menu manager
;no restart procedure
;init dialog manager
;init textedit
;set cursor to arrow
;get title bar
;make a window
<PROGRAM>
; Clean up and return
t
movem.l (sp)+,d0-d7/a0-a6
_ExitToShell
9
; Subroutines
/
Makewindow:
movem.l d0-d2/a0-al,-(sp)
clr.l -(sp)
clr.l -(sp)
pea WBoundsRect
move.l aO,-(sp)
st -(sp)
clr.w -(sp)
move.l i-l,-(sp)
sf -(sp)
clr.l -(sp)
_NEWWINDOW
lea WindowPointer,a0
move.l (sp),(aO)
_SETPORT
clr.l -(sp)
_NEWRGN
lea ScrollRgnH,aO
move.l (sp),(aO)
pea HScrollRect
_RECTRGN
move.w fFONTNUM,-(sp)
_TextFont
move.w fFONTSTYLE,-(sp)
_TextPace
move.w tFONTSIZE,-(sp)
_TextSize
pea Pontlnfo
_GETPontInfo
move.w FontInfo+ASCENT,dO
add.w FontInfo+DESCENT,dO
add.w FontInfo+LEADlNG,dO
lea LineHt,aO
;restore registers
;return to finder
;save regs.
;reserve space for window ptr.
;allocate
;window size and location
/window's title
;vis flag ° true
;document window
;window on top
;goaway = flase
;refcon = not used
;get address of window
;save window ptr and pass
; to setport
/create a new region
save and pass along
;use same limits as WBoundsRect
;required if scrolling
;default font number
;set font selection
;default font style
;set font style
(default font size
;set font size
;get info, about font
;font dimension parameters
;compute font vert, size
;get address
Seitenansicht 236
1 2 ... 232 233 234 235 236 237 238 239 240 241 242 ... 255 256

Kommentare zu diesen Handbüchern

Keine Kommentare