易码技术论坛

 找回密码
 加入易码
搜索
查看: 301022|回复: 13

[求助]又是列表[em06]

[复制链接]
发表于 2005-8-9 13:06:00 | 显示全部楼层
你把程序源代码贴上来,我给你加注释。
 楼主| 发表于 2005-8-9 13:11:00 | 显示全部楼层
家里不上网,谁帮帖一下?谢谢.
 楼主| 发表于 2005-8-10 15:58:00 | 显示全部楼层
好,帖出来了,中间那一段不懂,帮解答一下,谢谢.

[code]6 GRAPHC=2RINT "***** 网络热键 *****";OCATE 2,3
7 PRINT "设定网络热键","  取消网络热键";OCATE LC,1RINT "
发表于 2005-8-11 11:50:00 | 显示全部楼层
中间有一段程序没有贴出来?
行号为150,160,170的那些程序呢?
[此贴子已经被作者于2005-8-12 19:06:53编辑过]

 楼主| 发表于 2005-8-11 19:09:00 | 显示全部楼层
咦?怎么不见了?再帖一次.
6 GRAPHC=2RINT "***** 网络热键 *****";OCATE 2,3
7 PRINT "设定网络热键","  取消网络热键";OCATE LC,1RINT "
发表于 2005-8-12 14:17:00 | 显示全部楼层
...






------------------------------------------
UCWEB手机浏览器,无线上网,无限可能
 楼主| 发表于 2005-8-12 14:59:00 | 显示全部楼层
不可能啊,为什么会不见的?明明帖出来的说。
 楼主| 发表于 2005-8-14 10:47:00 | 显示全部楼层
TNND,不信那么邪门!
60 POKE 3328,0OKE 3329,13OKE 3330,5OKE 3331,96
70 CALL 3328:POKE 2331,DIA:POKE 2332,DIB
80 POKE 2369,PEEK (2351):POKE 2370,PEEK (2352):POKE 2402,0:POKE 3329,6
90 POKE 231,240:POKE 232,47:CALL 3328:POKE 2402,1:POKE 232,49:CALL 3328
主要的都帖出来了。
[此贴子已经被作者于2005-8-14 11:31:43编辑过]

发表于 2005-8-15 02:42:00 | 显示全部楼层
算了,别贴了。
在你的帖子上点引用就能看到你贴出来的内容,不过那个程序写的不好,而且只是修改了系统内核的Code。
我找个时间写个给你。
 楼主| 发表于 2005-8-16 13:52:00 | 显示全部楼层
谢谢.
发表于 2005-8-19 12:29:00 | 显示全部楼层
以下是引用LindiX在2005-8-15 2:42:00的发言:[BR]算了,别贴了。
在你的帖子上点引用就能看到你贴出来的内容,不过那个程序写的不好,而且只是修改了系统内核的Code。
我找个时间写个给你。

不懂就不要胡说八道!
那个BASIC的列表代码和系统内核的CODE没有任何关系
 楼主| 发表于 2005-8-19 12:57:00 | 显示全部楼层
555555555555~~~~~~~~~~~~~~~~~~~~为什么就没人解释一下呢?
发表于 2006-3-29 01:54:00 | 显示全部楼层
以下是引用qyfcool在2005-8-9 11:50:00的发言:[BR]不行啊,还是不懂,BIN的太乱了,看QIQI的BASIC文件列表,又不知道各个地址的意义,谁帮解答一下啊?就是说说3K对应的各个地址是多少也行.
[em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06]


我有同感,希望谁能讲讲BIN那个的原理

真的不懂呀,特别是那几个文件系统中断的入参\出参



NFLASH文件列表子程序
代码约300个字节,是lee用的列表代码的1/6
速度则和以前nc1020上的那种超快速度差不多,这可算是目前最好的列表代码了,不过最多只能列出255个文件



;destoryc000-$cfff,$0a9f,$0aa0,$0616
;return c=1;fail or esc c=0;choose a file->$08d6
;max file number=255
lda #0
sta $0a9f ;初始化列表位置
lda $0a
pha
and #$f0
ora #$01
sta $0a
lda $092f
sta $08d1
lda $0930
sta $08d2
lda #16
sta $08d3
lda #0
sta $08d4
sta $ed
sta $0a1b
lda #$c0
sta $ee
lda #$10
sta $0a1c
brk $0505 ;读出目录所占块
lda #$00 ;统计文件个数
sta $80
lda #$c0
sta $81
ldx #0
l1:ldy #0
lda ($80),y
iny
and ($80),y
cmp #$ff
beq is_end
lda $80
clc
adc #$10
sta $80
bcc l2
inc $81
l2:inx
bne l1
is_end:stx $0616 ;文件个数
bne not_empty
sec
pla
sta $0a
rts
not_empty:
lda #$ff
sta $03b3
sta $03af
sta $03b0
l12:brk $c72a
lda #$00
sta $81
lda $09af
asl
rol $81
asl
rol $81
asl
rol $81
asl
rol $81
clc
adc #$02
sta $80
lda $81
adc #$c0
sta $81 ;定位
lda $0616
sec
sbc $09af
tax ;发送到文字缓存
lda #$c0
sta $82
lda #$02
sta $83
l6:ldy #0
l3:lda ($80),y
beq l11
sta ($82),y
iny
cpy #$0e
bne l3
l11:lda $80
clc
adc #$10
sta $80
bcc l4
inc $81
l4:lda $82
clc
adc #$14
sta $82
bcc l5
inc $83
l5:dex
bne l6
lda $0a9f
sta $82
lda $0616
sta $80
lda #0
sta $83
sta $81
brk $c72c
lda $0a9f
sta $80
lda #0
sta $81
brk $c72d ;显示列表位置及当前文件序号
brk $c719
lda #$00
sta $0aa1 ;当前光标位置
l13:
brk $ca0a
lda $0aa1
asl
asl
asl
asl
sta $03c4
clc
adc #$10
sta $03c6
lda #1
sta $03c3
lda #$9f
sta $03c5
lda #$02
sta $03c9
brk ca0a
l8:brk $c00a
ldx #0
l7:cmp key_table,x
beq l9
inx
cpx #key_num
bne l7
jmp l8
l9:txa
asl
tax
lda key_jmp,x
sta $80
lda key_jmp+1,x
sta $81
jmp($0080)
key_table:
$13,$0e,$14,$15,$17,$16,$0d,$1b
key_jmp:
page_up,page_down,line_up,line_down,line_up,line_down,enter,esc
page_up:
lda $0a9f
sec
sbc #5
bcc f1
sta $0a9f
jmp l12
f1:jsr $e015 ;beep
jmp l8
page_down:
lda $09af
clc
adc #5
bcs f1
cmp $0616
bcs f1
jmp l12
line_up:
lda $09af
beq f1
lda $0aa1
beq l14
dec $0aa1
dec $09af
jmp l13
l14:dec $09af
jmp l12
line_down:
lda $09af
cmp $0616
beq f1
lda $0aa1
cmp #$05
beq l15
inc $0aa1
inc $09af
jmp l13
l15:inc $09af
jmp l12
enter:
lda #$00
sta $80
lda $09af
asl
rol $80
asl
rol $80
asl
rol $80
asl
rol $80
clc
adc #2
sta $82
lda $80
adc #$c0
sta $83
ldy #0
l18:lda ($82),y
beq l17
sta $08d6,y
iny
bne l18
l17:clc
pla
sta $0a
rts
esc:sec
pla
sta $0a
rts




 楼主| 发表于 2005-8-9 11:50:27 | 显示全部楼层 |阅读模式
不行啊,还是不懂,BIN的太乱了,看QIQI的BASIC文件列表,又不知道各个地址的意义,谁帮解答一下啊?就是说说3K对应的各个地址是多少也行.
[em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06][em06]
您需要登录后才可以回帖 登录 | 加入易码

本版积分规则

Archiver|手机版|小黑屋|EMAX Studio

GMT+8, 2024-3-29 13:24 , Processed in 0.010662 second(s), 19 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表