git.sur5r.net Git - cc65/blob - testcode/grc/vlir2.s

   1 ; Maciej 'YTM/Elysium' Witkowiak
   2 ; 06.06.2002
   3
   4 ; This is the source for the loadable VLIR-structured program part
   5
   6 ; similar to vlir1.s except the fact that this is chain #2
   7
   8             .include "../../libsrc/geos/inc/const.inc"
   9             .include "../../libsrc/geos/inc/jumptab.inc"
  10             .include "../../libsrc/geos/inc/geossym.inc"
  11             .include "../../libsrc/geos/inc/geosmac.inc"
  12
  13             .export OVERLAY2_Function1
  14             .export OVERLAY2_Function2
  15
  16                 .segment "OVERLAY2"
  17
  18 OVERLAY2_Function1:             jmp Function1
  19 OVERLAY2_Function2:             jmp Function2
  20                 ; etc.
  21
  22 paramString:
  23                 .byte DEF_DB_POS | 1
  24                 .byte DBTXTSTR, TXT_LN_X, TXT_LN_2_Y
  25                 .word line1
  26                 .byte DBTXTSTR, TXT_LN_X, TXT_LN_3_Y
  27                 .word line2
  28                 .byte OK, DBI_X_0, DBI_Y_2
  29                 .byte NULL
  30
  31 Function2:      LoadW r0, paramString
  32                 jsr DoDlgBox
  33 Function1:      rts
  34
  35 line1:          .byte "This is in module 2",0
  36 line2:          .byte "This is in module 2",0