2022-12-07 07:02:29 +00:00
|
|
|
|
NEW
|
|
|
|
|
AUTO 3,1
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
SCOPE.New ldy ScopeIdx
|
|
|
|
|
cpy #CC.ScopeIDs+SCOPE.MAX*2
|
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
iny
|
|
|
|
|
iny
|
|
|
|
|
sty ScopeIdx
|
|
|
|
|
|
|
|
|
|
>INCW.G CC.ScopeID
|
|
|
|
|
|
|
|
|
|
>LDA.G CC.ScopeID
|
|
|
|
|
|
|
|
|
|
ldy ScopeIdx
|
|
|
|
|
sta (pData),y
|
|
|
|
|
|
|
|
|
|
>LDA.G CC.ScopeID+1
|
|
|
|
|
|
|
|
|
|
ldy ScopeIdx
|
|
|
|
|
iny
|
|
|
|
|
sta (pData),y
|
|
|
|
|
|
|
|
|
|
dec bLocalScope
|
2022-12-13 06:55:13 +00:00
|
|
|
|
|
2022-12-23 16:50:50 +00:00
|
|
|
|
stz LocalFrame
|
|
|
|
|
|
2022-12-13 06:55:13 +00:00
|
|
|
|
.DO _DBG_SCOPE=1
|
|
|
|
|
>PUSHW L.MSG.DEBUG.SCIN
|
|
|
|
|
jsr SCOPE.Push
|
2022-12-30 16:29:57 +00:00
|
|
|
|
|
|
|
|
|
lda ScopeIdx
|
|
|
|
|
sec
|
|
|
|
|
sbc #CC.ScopeIDs
|
|
|
|
|
lsr
|
|
|
|
|
>PUSHA
|
|
|
|
|
|
2022-12-13 06:55:13 +00:00
|
|
|
|
>PUSHB LocalPtr
|
2022-12-23 16:50:50 +00:00
|
|
|
|
>PUSHB LocalFrame
|
2022-12-30 16:29:57 +00:00
|
|
|
|
>PUSHBI 5
|
2022-12-13 06:55:13 +00:00
|
|
|
|
>SYSCALL PrintF
|
2022-12-30 16:29:57 +00:00
|
|
|
|
* >DEBUG
|
2022-12-13 06:55:13 +00:00
|
|
|
|
.FIN
|
|
|
|
|
|
2022-12-07 07:02:29 +00:00
|
|
|
|
clc
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
.9 lda #E.OOH
|
|
|
|
|
sec
|
|
|
|
|
.99 rts
|
|
|
|
|
*--------------------------------------
|
2022-12-23 16:50:50 +00:00
|
|
|
|
SCOPE.Close .DO _DBG_SCOPE=1
|
2022-12-13 06:55:13 +00:00
|
|
|
|
>PUSHW L.MSG.DEBUG.SCOUT
|
|
|
|
|
jsr SCOPE.Push
|
|
|
|
|
.FIN
|
|
|
|
|
|
|
|
|
|
ldy ScopeIdx
|
2022-12-07 07:02:29 +00:00
|
|
|
|
cpy #CC.ScopeIDs
|
|
|
|
|
beq *
|
|
|
|
|
|
|
|
|
|
dey
|
|
|
|
|
dey
|
|
|
|
|
sty ScopeIdx
|
|
|
|
|
|
|
|
|
|
inc bLocalScope
|
|
|
|
|
|
2022-12-13 06:55:13 +00:00
|
|
|
|
.DO _DBG_SCOPE=1
|
|
|
|
|
|
2022-12-30 16:29:57 +00:00
|
|
|
|
lda ScopeIdx
|
|
|
|
|
sec
|
|
|
|
|
sbc #CC.ScopeIDs
|
|
|
|
|
lsr
|
|
|
|
|
>PUSHA
|
|
|
|
|
|
2022-12-13 06:55:13 +00:00
|
|
|
|
>PUSHB LocalPtr
|
2022-12-23 16:50:50 +00:00
|
|
|
|
>PUSHB LocalFrame
|
2022-12-13 06:55:13 +00:00
|
|
|
|
jsr SCOPE.Push
|
2022-12-30 16:29:57 +00:00
|
|
|
|
>PUSHBI 7
|
2022-12-13 06:55:13 +00:00
|
|
|
|
>SYSCALL PrintF
|
2022-12-30 16:29:57 +00:00
|
|
|
|
|
2022-12-13 06:55:13 +00:00
|
|
|
|
.FIN
|
|
|
|
|
|
|
|
|
|
clc
|
|
|
|
|
|
|
|
|
|
.99 rts
|
2022-12-07 07:02:29 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
SCOPE.Push ldy ScopeIdx
|
|
|
|
|
|
|
|
|
|
SCOPE.PushY iny
|
|
|
|
|
lda (pData),y
|
|
|
|
|
>PUSHA
|
|
|
|
|
dey
|
|
|
|
|
lda (pData),y
|
|
|
|
|
>PUSHA
|
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
MAN
|
|
|
|
|
SAVE usr/src/bin/cc.s.scope
|
|
|
|
|
LOAD usr/src/bin/cc.s
|
|
|
|
|
ASM
|