Release 0.95: Added experimental type checking system (still missing docs, however). Made warning about old "!for" syntax configurable.

git-svn-id: https://svn.code.sf.net/p/acme-crossass/code-0/trunk@34 4df02467-bbd4-4a76-a152-e7ce94205b78
This commit is contained in:
marcobaye
2014-06-02 00:47:46 +00:00
parent c8ff626943
commit d152f60acd
43 changed files with 1516 additions and 1219 deletions

View File

@@ -1,4 +1,4 @@
;ACME 0.94.4
;ACME 0.95
!zone
F_info ldx #hWindow_InfoBox
@@ -483,7 +483,7 @@ swin !byte 0 ; Auch fuer 'lwin'
bckgrnd = 26 ; screencolor-register
flnmpos = 87 ; filenameposition
wsstart = $0fd0 ; windowstack-start
tcolor = $f2 ; attribute-buffer
!addr tcolor = $f2 ; attribute-buffer
; Subs:
!zone
@@ -505,11 +505,11 @@ init ldx repeatedtry ; first start ?
stx fnbank ; filename-CR
dex
stx locks ; 'CBM-shift' off
stx $0ac5 ; 'ASC/DIN' off
stx addr($0ac5) ; 'ASC/DIN' off
stx basic ; 'Basic-IRQ' off
jsr crsrinit ; init crsr
ldx #$0b ; VIC off
stx $11e7
stx addr($11e7)
lda mode ; which mode ?
bmi + ; if 40 then
jsr kernel_switchmode ; switch mode
@@ -567,7 +567,7 @@ init ldx repeatedtry ; first start ?
sta conreg + 1 ; full RAM
ldx #$0b ; loop for new
- lda keyb, x ; keyboard-tabs
sta $033e, x
sta addr($033e), x
dex
bpl -
jsr handleid ; old ID ?
@@ -747,7 +747,7 @@ F_gosys +bank15
jsr kernel_cls ; CLS
lda #0 ; '0' for
sta locks ; 'CBM-Shift' on
sta $0ac5 ; 'ASC/DIN' on
sta addr($0ac5) ; 'ASC/DIN' on
sta basic ; 'Basic-IRQ' on
lda nmibuf ; restore NMI
ldx nmibuf + 1