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:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user