BASIC_CBM2 legibility improvements

BASIC_CBM2_1982-11-19/bas128

@@ -1,7 +1,7 @@
 ; CONDITIONAL ASSEMBLY CONSTANTS
-CC1	=0 ;64K  VERSION(ON=$01)
+CC1	=0              ;64K  VERSION(ON=$01)
 CC2	=$02            ;128K VERSION(ON=$02)
-CC3	=0 ;192K VERSION(ON=$04)
-CC4	=0 ;256K VERSION(ON=$08)
+CC3	=0              ;192K VERSION(ON=$04)
+CC4	=0              ;256K VERSION(ON=$08)
 .SKI 4
 .FIL BASIC

BASIC_CBM2_1982-11-19/bas192

@@ -1,7 +1,7 @@
 ; CONDITIONAL ASSEMBLY CONSTANTS
-CC1	=0 ;64K  VERSION(ON=$01)
-CC2	=0 ;128K VERSION(ON=$02)
+CC1	=0              ;64K  VERSION(ON=$01)
+CC2	=0              ;128K VERSION(ON=$02)
 CC3	=$04            ;192K VERSION(ON=$04)
-CC4	=0 ;256K VERSION(ON=$08)
+CC4	=0              ;256K VERSION(ON=$08)
 .SKI 4
 .FIL BASIC

BASIC_CBM2_1982-11-19/bas256

@@ -1,7 +1,7 @@
 ; CONDITIONAL ASSEMBLY CONSTANTS
-CC1	=0 ;64K  VERSION(ON=$01)
-CC2	=0 ;128K VERSION(ON=$02)
-CC3	=0 ;192K VERSION(ON=$04)
+CC1	=0              ;64K  VERSION(ON=$01)
+CC2	=0              ;128K VERSION(ON=$02)
+CC3	=0              ;192K VERSION(ON=$04)
 CC4	=$08            ;256K VERSION(ON=$08)
 .SKI 4
 .FIL BASIC

BASIC_CBM2_1982-11-19/bas64

@@ -1,7 +1,7 @@
 ; CONDITIONAL ASSEMBLY CONSTANTS
 CC1	=$01            ;64K  VERSION(ON=$01)
-CC2	=0 ;128K VERSION(ON=$02)
-CC3	=0 ;192K VERSION(ON=$04)
-CC4	=0 ;256K VERSION(ON=$08)
+CC2	=0              ;128K VERSION(ON=$02)
+CC3	=0              ;192K VERSION(ON=$04)
+CC4	=0              ;256K VERSION(ON=$08)
 .SKI 4
 .FIL BASIC

BASIC_CBM2_1982-11-19/basic

@@ -94,41 +94,41 @@ ADDPR8	=ADDPR4+ADDPR4
 STKEND	=$1FB           ;FIRST BYTE USED FOR STACK
 CLMWID	=10
 PI	=$FF
-STRSIZ	=4 ;# OF LOCS PER STR DESCRIPTOR
-PTRSIZ	=3 ;# OF LOCS PER POINTER
-NUMTMP	=3 ;# OF STRING TEMPORARIES
+STRSIZ	=4              ;# OF LOCS PER STR DESCRIPTOR
+PTRSIZ	=3              ;# OF LOCS PER POINTER
+NUMTMP	=3              ;# OF STRING TEMPORARIES
 .SKI 3
 ;          BANK EQUATES
 SYSBNK	=$0F            ;SYSTEM BANK#
 MXBANK	=SYSBNK+1       ;1ST BANK OUT OF RANGE
-	.IFN CC1 <
-TXTBNK	=0 ;TEXT BANK       *ONE*
-VARBNK	=0 ;SIMPLE VARIABLE BANK
-ARYBNK	=0 ;ARRAY BANK
-STRBNK	=0 ;STRING BANK
+.IFN CC1 <
+TXTBNK	=0              ;TEXT BANK       *ONE*
+VARBNK	=0              ;SIMPLE VARIABLE BANK
+ARYBNK	=0              ;ARRAY BANK
+STRBNK	=0              ;STRING BANK
 >
-	.IFN CC2 <
-TXTBNK	=0 ;TEXT BANK       *TWO*
-VARBNK	=1 ;SIMPLE VARIABLE BANK
-ARYBNK	=1 ;ARRAY BANK
-STRBNK	=1 ;STRING BANK
+.IFN CC2 <
+TXTBNK	=0              ;TEXT BANK       *TWO*
+VARBNK	=1              ;SIMPLE VARIABLE BANK
+ARYBNK	=1              ;ARRAY BANK
+STRBNK	=1              ;STRING BANK
 >
-	.IFN CC3 <
-TXTBNK	=0 ;TEXT BANK       *THREE*
-VARBNK	=2 ;SIMPLE VARIABLE BANK
-ARYBNK	=1 ;ARRAY BANK
-STRBNK	=2 ;STRING BANK
+.IFN CC3 <
+TXTBNK	=0              ;TEXT BANK       *THREE*
+VARBNK	=2              ;SIMPLE VARIABLE BANK
+ARYBNK	=1              ;ARRAY BANK
+STRBNK	=2              ;STRING BANK
 >
-	.IFN CC4 <
-TXTBNK	=1 ;TEXT BANK        *FOUR*
-VARBNK	=3 ;SIMPLE VARIABLE BANK
-ARYBNK	=2 ;ARRAY BANK
-STRBNK	=4 ;STRING BANK
+.IFN CC4 <
+TXTBNK	=1              ;TEXT BANK        *FOUR*
+VARBNK	=3              ;SIMPLE VARIABLE BANK
+ARYBNK	=2              ;ARRAY BANK
+STRBNK	=4              ;STRING BANK
 >
 .SKI 4
 ;       DOS INTERFACE EQUATES.
 DOSFNL	=16+2           ;FILENAME LENGTH
-DOSDSK	=8 ;DISK DEVICE #
+DOSDSK	=8              ;DISK DEVICE #
 DOSLFN	=14             ;DOS INTERNAL LOGICAL FILE NUMBER
 DOSCTL	=21             ;DOS DIRECTORY LINES BEFORE PROMPT
 DOSLST	=DOSFNL+DOSFNL+DOSFNL+16 ;(DOSFNL+2)*3+10 --TRANSMIT BUFFER LENGTH
@@ -147,7 +147,7 @@ DOSLST	=DOSFNL+DOSFNL+DOSFNL+16 ;(DOSFNL+2)*3+10 --TRANSMIT BUFFER LENGTH
 .LIB STRNG2
 ;.LIB RENUMBER
 .LIB DELETE
-	.IFN CC2+CC3+CC4 <
+.IFN CC2+CC3+CC4 <
 .LIB USING
 >
 .LIB BUTES1

BASIC_CBM2_1982-11-19/bdefine

@@ -1,6 +1,6 @@
 .PAG 'BDEFINE'
 ;       PAGE ZERO STORAGE DEFINITIONS
- *=0
+	*=0
 ;
 E6509	*=*+1           ;EXECUTION BANK
 I6509	*=*+1           ;INDIRECTION BANK
@@ -13,7 +13,7 @@ TMTEN	*=*+1
 ;
 FORM	*=*+PTRSIZ      ;FORMAT POINTER
 ;
-INTEGR	;ONE-BYTE INTEGER FROM QINT
+INTEGR	                ;ONE-BYTE INTEGER FROM QINT
 CHARAC	*=*+1           ;A DELIMITING CHAR
 ENDCHR	*=*+1           ;OTHER DELIMITING CHAR
 COUNT	*=*+1           ;GENERAL COUNTER
@@ -23,22 +23,22 @@ XCNT	*=*+1           ;DOS LOOP COUNTER
 ;       DIMFLG, VALTYP AND INTFLG MUST BE
 ;       CONSECUTIVE LOCATIONS.
 DIMFLG	*=*+1           ;IN GETTING A POINTER TO A VARIABLE
-;       IT IS IMPORTANT TO REMEMBER WHETHER
-;       IT IS BEING DONE FOR DIM OR NOT.
+;	                 IT IS IMPORTANT TO REMEMBER WHETHER
+;	                 IT IS BEING DONE FOR DIM OR NOT.
 VALTYP	*=*+1           ;THE TYPE INDICATOR 0=NUMERIC, 1=STRING
 INTFLG	*=*+1           ;TELLS IF INTEGER
 ;
-GARBFL	;WHETHER TO DO GARBAGE COLLECTION
+GARBFL	                ;WHETHER TO DO GARBAGE COLLECTION
 DORES	*=*+1           ;WHETHER CAN OR CAN'T CRUNCH RES'D WORD.
-;       TURNED ON WHEN DATA BEING SCANNED BY
-;       CRUNCH SO UNQUOTED STRS WON'T BE CRUNCHED.
+;	                 TURNED ON WHEN DATA BEING SCANNED BY
+;	                 CRUNCH SO UNQUOTED STRS WON'T BE CRUNCHED.
 ;
 SUBFLG	*=*+1           ;FLAG WHETHER SUB'D VARIABLE ALLOWED.
-;       FOR AND USER-DEFINED FUNCTION POINTER
-;       FETCHING TURN THIS ON BEFORE CALLING
-;       PTRGET SO ARRAYS WON'T BE DETECTED.
-;       STKINI AND PTRGET CLEAR IT.
-;       ALSO DISALLOWS INTEGERS THERE.
+;	                 FOR AND USER-DEFINED FUNCTION POINTER
+;	                 FETCHING TURN THIS ON BEFORE CALLING
+;	                 PTRGET SO ARRAYS WON'T BE DETECTED.
+;	                 STKINI AND PTRGET CLEAR IT.
+;	                 ALSO DISALLOWS INTEGERS THERE.
 ;
 INPFLG	*=*+1           ;FLAGS WHETHER WE ARE DOING INPUT OR READ.
 ;
@@ -61,7 +61,7 @@ INDEX2	*=*+PTRSIZ      ;DIRECT CELLS FOR 2ND INDEXING USAGE
 ;
 RESHO	*=*+1           ;RESULT OF MULTIPLIER AND DIVIDER
 RESMOH	*=*+1
-ADDEND	;TEMP USED BY UMULT
+ADDEND	                ;TEMP USED BY UMULT
 RESMO	*=*+1
 RESLO	*=*+1
 	*=*+1           ;OVERFLOW PREVIOUS CELLS
@@ -98,8 +98,8 @@ RESLO	*=*+1
 ;                  MEMTOP (STRS)
 ;
 TXTTAB	*=*+2           ;POINTER TO BEGINNING OF TEXT AND
-;       DOESN'T CHANGE AFTER BEING SETUP
-;       BY INIT
+;	                 DOESN'T CHANGE AFTER BEING SETUP
+;	                 BY INIT
 ;
 TXTEND	*=*+2           ;POINTER TO END OF TEXT (EXCEPT 64K)
 ;
@@ -120,62 +120,62 @@ MEMTOP	*=*+PTRSIZ      ;HIGHEST LOCATION IN MEMORY
 ;       LINE NUMBERS AND TEXTUAL POINTERS
 CURLIN	*=*+2           ;CURRENT LINE NUMBER
 OLDLIN	*=*+2           ;OLD LINE NUMBER (SETUP BY STOP OR
-;       END IN A PROGRAM)
+;	                 END IN A PROGRAM)
 OLDTXT	*=*+PTRSIZ      ;OLD TEXT POINTER
 ;
 DATLIN	*=*+2           ;DATA LINE NUMBER
 DATPTR	*=*+2           ;POINTER TO DATA. INITIALIZED TO POINT
-;       AT THE ZERO INFRONT OF (TXTTAB) BY
-;       CLR COMMAND.
-;       UPDATED BY EXECUTION OF A READ.
+;	                 AT THE ZERO INFRONT OF (TXTTAB) BY
+;	                 CLR COMMAND.
+;	                 UPDATED BY EXECUTION OF A READ.
 INPPTR	*=*+2           ;REMEMBERS WHERE INPUT IS COMING FROM.
 .SKI 4
 ;       STUFF USED IN EVALUATIONS
 ;
 VARNAM	*=*+2           ;VARIABLE'S NAME
 ;
-FDECPT	;POINTER INTO POWER OF TENS TABLE.
+FDECPT	                ;POINTER INTO POWER OF TENS TABLE.
 VARPNT	*=*+PTRSIZ      ;POINTER TO VARIABLE IN MEMORY
 ;
-FORPNT	;A VARIABLE'S POINTER FOR FOR LOOPS
-;       AND LET STATEMENTS (3 BYTES).
+FORPNT	                ;A VARIABLE'S POINTER FOR FOR LOOPS
+;	                 AND LET STATEMENTS (3 BYTES).
 LSTPNT	*=*+PTRSIZ      ;POINTER TO LIST STRING (3 BYTES).
 ;
-VARTXT	;SAVE CURRENT TXTPTR ON READ.
+VARTXT	                ;SAVE CURRENT TXTPTR ON READ.
 OPPTR	*=*+PTRSIZ      ;POINTER TO CURRENT OP'S ENTRY IN OPTAB.
 ;
 OPMASK	*=*+1           ;MASK CREATED BY CURRENT OPERATION.
 .SKIP 2
 ;       TEMPORARY FLOATING RESULT REGISTERS (5BYTES EACH):
 ;            TEMPF1,TEMPF2,TEMPF3
 ;
-TEMPF3	;TEMP FLOAT REG
-GRBPNT	;POINTER USED IN GARBAGE COLLECTION.
+TEMPF3	                ;TEMP FLOAT REG
+GRBPNT	                ;POINTER USED IN GARBAGE COLLECTION.
 DEFPNT	*=*+PTRSIZ      ;POINTER USED IN FUNCTION DEFINITION.
 ;
 DSCPNT	*=*+PTRSIZ      ;POINTER TO A STRING DESCRIPTOR.
 ;
 JMPER	*=*+2           ;THREE BYTES LONG
 OLDOV	*=*+1           ;THE OLD OVERFLOW.
 ;
-TEMPF1	;TEMP FLOAT REG
-PTARG1=TEMPF1  ;MULTIPLY DEF'D FOR USE BY INSTR$
-PTARG2=TEMPF1+3
-STR1=TEMPF1+6
-STR2=TEMPF1+10
-TMPPOS=TEMPF1+14
-POSITN=TEMPF1+15
-MATCH=TEMPF1+16
-ARYPNT	;POINTER USED IN ARRAY BUILDING.
+TEMPF1	                ;TEMP FLOAT REG
+PTARG1	=TEMPF1	        ;MULTIPLY DEF'D FOR USE BY INSTR$
+PTARG2	=TEMPF1+3
+STR1	=TEMPF1+6
+STR2	=TEMPF1+10
+TMPPOS	=TEMPF1+14
+POSITN	=TEMPF1+15
+MATCH	=TEMPF1+16
+ARYPNT	                ;POINTER USED IN ARRAY BUILDING.
 HIGHDS	*=*+PTRSIZ      ;DESTINATION OF HIGHEST ELEMENT IN BLT.
 HIGHTR	*=*+PTRSIZ      ;SOURCE OF HIGHEST ELEMENT TO MOVE.
 ;
-TEMPF2	;TEMP FLOAT REG (5BYTES)
+TEMPF2	                ;TEMP FLOAT REG (5BYTES)
 LOWDS	*=*+1           ;LOCATION OF LAST BYTE TRANSFERED (3 BYTES).
 DECCNT	*=*+1           ;NUMBER OF PLACES BEFORE DECIMAL POINT.
 TENEXP	*=*+1           ;BASE TEN EXPONENT
 ;
-GRBTOP	;POINTER USED IN GARBAGE COLLECTION.(3 BYTES)
+GRBTOP	                ;POINTER USED IN GARBAGE COLLECTION.(3 BYTES)
 LOWTR	*=*+1           ;LAST THING TO MOVE IN BLT (3 BYTES).
 DPTFLG	*=*+1           ;HAS A DPT BEEN INPUT
 EXPSGN	*=*+1           ;SIGN OF EXPONENT
@@ -187,19 +187,19 @@ FAC
 FACEXP	*=*+1
 FACHO	*=*+1           ;MOST SIGNIFICANT BYTE OF MANTISSA.
 FACMOH	*=*+1
-INDICE	;USED BY QINT.
+INDICE	                ;USED BY QINT.
 FACMO	*=*+1
 FACLO	*=*+1
 FACSGN	*=*+1
-DEGREE	;COUNT USED BY POLYNOMIALS.
+DEGREE	                ;COUNT USED BY POLYNOMIALS.
 SGNFLG	*=*+1
 BITS	*=*+1           ;CELL FOR SHIFTR TO USE.
 .SKI 4
 ;       THE FLOATING ARGUMENT (UNPACKED)
-T1=* ;TEMPORARIES --USES FP BUFFER
-T2=T1+1
-T3=T1+2
-T4=T1+3
+T1	=*              ;TEMPORARIES --USES FP BUFFER
+T2	=T1+1
+T3	=T1+2
+T4	=T1+3
 ;
 ARGEXP	*=*+1
 ARGHO	*=*+1
@@ -212,16 +212,16 @@ ARISGN	*=*+1           ;A SIGN REFLECTING THE RESULT
 FACOV	*=*+1           ;OVERFLOW BYTE OF THE FAC
 	*=*+1
 .SKI 4
-STRNG2	;-> TO STR OR DESC
-POLYPT	;-> TO POLYNOMIAL COEFFICIENTS
-CURTOL	;ABSOLUTE LINEAR INDEX IS FORMED HERE
+STRNG2	                ;-> TO STR OR DESC
+POLYPT	                ;-> TO POLYNOMIAL COEFFICIENTS
+CURTOL	                ;ABSOLUTE LINEAR INDEX IS FORMED HERE
 FBUFPT	*=*+PTRSIZ      ;-> INTO FBUFFR USED BY FOUT
 TXTPTR	*=*+PTRSIZ      ;POINTER TO CURRENT TERM
 BUFFPT	*=*+PTRSIZ      ;^INPUT BUFFER
 ;
-NOZE	;USING'S LEADING ZERO COUNTER
+NOZE	                ;USING'S LEADING ZERO COUNTER
 PARSTS	*=*+1           ;DOS STD PARSER WORD
-POINT	;USING'S POINTER TO DECIMAL POINT
+POINT	                ;USING'S POINTER TO DECIMAL POINT
 PARSTX	*=*+1           ;DOS AUX PARSER WORD
 ;
 SEEDPT	*=*+2
@@ -237,7 +237,7 @@ ERRNUM	*=*+1
 ;
 	* =$200
 FBUFFR
-VSPBUF	;BUFFER USED TO INTERFACE WITH VSP
+VSPBUF	                ;BUFFER USED TO INTERFACE WITH VSP
 	*=*+16          ;RESERVE 16 BYTES FOR FILENAME 1
 DOSF1L	*=*+1           ;DOS FILE NAME 1 LENGTH
 DOSDS1	*=*+1           ;DOS DISK DRIVE 1
@@ -262,12 +262,12 @@ DOSDID	*=*+2           ;DOS DISK IDENTIFIER (2 CHARS)
 DIDCHK	*=*+1           ;DOS DID FLAG
 ;
 DOSSTR	*=*+1           ;DOS OUTPUT STRING BUFFER
-DOSSPC=*-FBUFFR ;SPACED USED BY DOS ROUTINES
+DOSSPC	=*-FBUFFR       ;SPACED USED BY DOS ROUTINES
 .SKI 4
 	* =*+46
 ;
 ;
-TRMPOS	;CURSOR COLUMN ON CRT
+TRMPOS	                ;CURSOR COLUMN ON CRT
 ANDMSK	*=*+1           ;MASK USED BY WAIT
 EORMSK	*=*+1           ;MASK USED BY WAIT
 ;
@@ -277,7 +277,7 @@ DOMASK
 TANSGN	*=*+1           ;USED IN DETERMINING SIGN OF TAN
 ;
 LDAABS	*=*+1           ;LDA ABS ROUTINE (SEE INITAT)
-TTTEMP	;TEMPORARY STORE
+TTTEMP	                ;TEMPORARY STORE
 LDAADR	*=*+2           ;MODIFIABLE ADDRESS
 	*=*+1           ;RETURN OPCODE
 .SKI 3