fix misspellings

basic/declare.s

@@ -134,7 +134,7 @@ icrnch	.res 2           ;indirect crunch (tokenization routine)
 iqplop	.res 2           ;indirect list (char list)
 igone	.res 2           ;indirect gone (char dispatch)
 ieval	.res 2           ;indirect eval (symbol evaluation)
-;temp storage untill system intergration
+;temp storage until system intergration
 ; sys 6502 regs
 sareg	.res 1           ;.a reg
 sxreg	.res 1           ;.x reg

kernal/declare.s

@@ -145,7 +145,7 @@ rsstat	.res 1           ; rs-232 status register
 bitnum	.res 1           ;number of bits to send (fast response)
 baudof	.res 2           ;baud rate full bit time (created by open)
 ;
-; reciever storage
+; receiver storage
 ;
 ; inbit .res 1 ;input bit storage
 ; bitci .res 1 ;bit count in

kernal/read.s

@@ -172,7 +172,7 @@ rad2x	lsr temp        ;adjust timeout for...
 	inc dpsw        ;set bit throw away flag
 	lda snsw1       ;if byte syncronized....
 	bne radq2       ;...then skip to pass char
-	lda syno        ;throws out data untill block sync...
+	lda syno        ;throws out data until block sync...
 	beq rdbk2       ;...no block sync
 	sta rer         ;flag data as error
 	lda #0          ;kill 16 sync flag
@@ -260,7 +260,7 @@ rd20	bvs rd60        ;we are loading
 rd22	bcs rd40        ;expecting second block?...yes
 	and #$f         ;mask off high store header count...
 	sta rdflg       ;...in mode flag (have correct block)
-rd200	dec rdflg       ;wait untill we get real data...
+rd200	dec rdflg       ;wait until we get real data...
 	bne rd10        ;...9876543210 real
 	lda #$40        ;next up is real data...
 	sta rdflg       ;...set data mode

kernal/rs232inout.s

@@ -20,7 +20,7 @@ cko232	sta dflto       ;set default out
 ;
 cko020	lda enabl
 	and #$02        ;look at ier for t2
-	bne cko020      ;hang untill input done
+	bne cko020      ;hang until input done
 ;
 ; wait for cts to be off as spec reqs
 ;
@@ -167,7 +167,7 @@ bsi010	ora #$08        ;set buffer empty status
 rsp232	pha             ;save .a
 	lda enabl       ;does rs232 have any enables?
 	beq rspok       ;no...
-rspoff	lda enabl       ;wait untill done
+rspoff	lda enabl       ;wait until done
 	and #%00000011  ; with t1 & t2
 	bne rspoff
 	lda #%00010000  ; disable flag (need to renable in user code)

kernal/rs232nmi.s

@@ -29,7 +29,7 @@ timb	jsr restor      ;restore system indirects
 	jsr cint        ;restore screen for basic
 	jmp ($a002)     ;...no, so basic warm start
 
-; disable nmi's untill ready
+; disable nmi's until ready
 ;  save on stack
 ;
 nnmi20	tya             ;.y saved through restore
@@ -67,7 +67,7 @@ nnmi25	jsr rstrab      ;go calc info (code could be in line)
 	jmp nmirti
 ;
 
-; t2 nmi check - recieve a bit
+; t2 nmi check - receive a bit
 ;
 nnmi30	txa
 	and #$02        ;mask to t2
@@ -76,7 +76,7 @@ nnmi30	txa
 	jsr t2nmi       ;handle interrupt
 	jmp nmirti
 
-; flag nmi handler - recieve a start bit
+; flag nmi handler - receive a start bit
 ;
 nnmi40	txa             ;check for edge
 	and #$10        ;on flag...

kernal/rs232rcvr.s

@@ -48,7 +48,7 @@ rsr020	lda inbit       ;get data...
 	adc bitci
 	bne rsrext      ;no..exit
 ;
-; rsrabl - enable to recieve a byte
+; rsrabl - enable to receive a byte
 ;
 rsrabl	lda #$90        ;enable flag for next byte
 	sta d2icr       ;toss bad/old nmi
@@ -59,7 +59,7 @@ rsrabl	lda #$90        ;enable flag for next byte
 rsrsxt	lda #$02        ;disable t2
 	jmp oenabl      ;flip-off enabl***************
 
-; reciever start bit check
+; receiver start bit check
 ;
 rsrtrt	lda inbit       ;check if space
 	bne rsrabl      ;bad...try again
@@ -79,7 +79,7 @@ rsr030	ldy ridbe       ;get end
 	dey
 ;
 	lda ridata      ;get byte buffer up
-	ldx bitnum      ;shift untill full byte
+	ldx bitnum      ;shift until full byte
 rsr031	cpx #9          ;always 8 bits
 	beq rsr032
 	lsr a           ;fill with zeros
@@ -107,7 +107,7 @@ rsr050	bvc rsrext      ;even...okay so exit
 ; errors reported
 	lda #1          ;parity error
 	.byt $2c
-recerr	lda #$4         ;reciever overrun
+recerr	lda #$4         ;receiver overrun
 	.byt $2c
 breake	lda #$80        ;break detected
 	.byt $2c

kernal/tapecontrol.s

@@ -114,7 +114,7 @@ tp40	lda irqtmp+1    ;check for interrupt vector...
 ; 60 hz keyscan ignored
 ;
 	jsr ud60        ; stop key check
-	jmp tp40        ;stay in loop untill tapes are done
+	jmp tp40        ;stay in loop until tapes are done
 
 tstop	jsr stop        ;stop key down?
 	clc             ;assume no stop
@@ -156,15 +156,15 @@ stt2	asl temp        ;multiply corrected value by 4
 	tax
 stt3	lda d1t2l       ;watch out for d1t2h rollover...
 	cmp #22         ;...time for routine...!!!...
-	bcc stt3        ;...too close so wait untill past
+	bcc stt3        ;...too close so wait until past
 	adc temp        ;calculate and...
 	sta d1t1l       ;...store adusted time count
 	txa
 	adc d1t2h       ;adjust for high time count
 	sta d1t1h
 	lda caston      ;enable timers
 	sta d1cra
-	sta stupid      ;non-zero means an t1 irq has not occured yet
+	sta stupid      ;non-zero means an t1 irq has not occurred yet
 	lda d1icr       ;clear old t1 interrupt
 	and #$10        ;check for old-flag irq
 	beq stt4        ;no...normal exit