diff --git a/doc/geos.sgml b/doc/geos.sgml index a49b4d88d..efbb6e19a 100644 --- a/doc/geos.sgml +++ b/doc/geos.sgml @@ -499,6 +499,7 @@ GEOS application.
These function show two lines of text in standard-sized DialogBox. You can read the code of pressed icon from return value. E.g. for DlgBoxGetString
diff --git a/libsrc/geos/dlgbox/dbget2lines.s b/libsrc/geos/dlgbox/dbget2lines.s
index 1258dbb48..96440987d 100644
--- a/libsrc/geos/dlgbox/dbget2lines.s
+++ b/libsrc/geos/dlgbox/dbget2lines.s
@@ -1,6 +1,6 @@
;
-; Maciej 'YTM/Alliance' Witkowiak
+; Maciej 'YTM/Elysium' Witkowiak
;
; 25.12.99
@@ -8,10 +8,30 @@
.importzp ptr3,ptr4
.import popax
+.code
+
DB_get2lines:
- sta ptr4
+ sta ptr4 ; fetch line 2
stx ptr4+1
jsr popax
- sta ptr3
+ sta ptr3 ; fetch line 1
stx ptr3+1
- rts
+ ldx ptr3
+ jsr checknull
+ ldx ptr4
+ jmp checknull
+
+checknull:
+ lda $0,x
+ ora $1,x
+ bne cn_end
+ lda #