Moved GEOS VLIR assembler sample from 'samples' to 'testcode' because:
- It relies on include files which are not part of the cc65 distribution (but only present in the cc65 source tree). - An upcoming GEOS VLIR C sample will obsolete it - as sample. git-svn-id: svn://svn.cc65.org/cc65/trunk@5316 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
36
testcode/grc/vlir2.s
Normal file
36
testcode/grc/vlir2.s
Normal file
@@ -0,0 +1,36 @@
|
||||
; Maciej 'YTM/Elysium' Witkowiak
|
||||
; 06.06.2002
|
||||
|
||||
; This is the source for the loadable VLIR-structured program part
|
||||
|
||||
; similar to vlir1.s except the fact that this is chain #2
|
||||
|
||||
.include "../../libsrc/geos/inc/const.inc"
|
||||
.include "../../libsrc/geos/inc/jumptab.inc"
|
||||
.include "../../libsrc/geos/inc/geossym.inc"
|
||||
.include "../../libsrc/geos/inc/geosmac.ca65.inc"
|
||||
|
||||
.export OVERLAY2_Function1
|
||||
.export OVERLAY2_Function2
|
||||
|
||||
.segment "OVERLAY2"
|
||||
|
||||
OVERLAY2_Function1: jmp Function1
|
||||
OVERLAY2_Function2: jmp Function2
|
||||
; etc.
|
||||
|
||||
paramString:
|
||||
.byte DEF_DB_POS | 1
|
||||
.byte DBTXTSTR, TXT_LN_X, TXT_LN_2_Y
|
||||
.word line1
|
||||
.byte DBTXTSTR, TXT_LN_X, TXT_LN_3_Y
|
||||
.word line2
|
||||
.byte OK, DBI_X_0, DBI_Y_2
|
||||
.byte NULL
|
||||
|
||||
Function2: LoadW r0, paramString
|
||||
jsr DoDlgBox
|
||||
Function1: rts
|
||||
|
||||
line1: .byte "This is in module 2",0
|
||||
line2: .byte "This is in module 2",0
|
||||
Reference in New Issue
Block a user