git.sur5r.net Git - cc65/blob - libsrc/geos-common/dlgbox/dlgboxok.s

   1 ;
   2 ; Maciej 'YTM/Elysium' Witkowiak
   3 ;
   4 ; 25.12.99
   5
   6 ; char DlgBoxOk       (char *line1,char *line2);
   7
   8             .export _DlgBoxOk
   9             .import DB_get2lines, _DoDlgBox
  10             .importzp ptr3, ptr4
  11
  12             .include "geossym.inc"
  13             .include "const.inc"
  14
  15 _DlgBoxOk:
  16         jsr DB_get2lines
  17         lda #<paramStrOk
  18         ldx #>paramStrOk
  19         jmp _DoDlgBox
  20
  21 .rodata
  22
  23 paramStrOk:
  24         .byte DEF_DB_POS | 1
  25         .byte DBVARSTR, TXT_LN_X, TXT_LN_2_Y, ptr3
  26         .byte DBVARSTR, TXT_LN_X, TXT_LN_3_Y, ptr4
  27         .byte OK, DBI_X_0, DBI_Y_2
  28         .byte NULL