Replaced number literals in source code with meaningful symbol names.

2013-07-26 03:33:54 -04:00
parent 3574f3a742
commit f02843f05d
9 changed files with 62 additions and 33 deletions
--- a/libsrc/atmos/atmos_load.s
+++ b/libsrc/atmos/atmos_load.s
@@ -1,20 +1,24 @@
-; Stefan Haubenthal, 2012-05-06
-; based on code by Twilighte
+; Based on code by Twilighte.
+; 2012-05-06, Stefan Haubenthal
+; 2013-07-22, Greg King
+;
 ; void __fastcall__ atmos_load(const char* name);

        .export         _atmos_load
        .import         store_filename

+        .include        "atmos.inc"
+

 .proc   _atmos_load

        sei
        jsr     store_filename
        ldx     #$00
-        stx     $02ad
-        stx     $02ae
-        stx     $025a
-        stx     $025b
+        stx     AUTORUN         ; don't try to run the file
+        stx     LANGFLAG        ; BASIC
+        stx     JOINFLAG        ; don't join it to another BASIC program
+        stx     VERIFYFLAG      ; load the file
        jsr     cload_bit
        cli
        rts