易码技术论坛

 找回密码
 加入易码
搜索
查看: 97896|回复: 4

[推荐][下载]内存读取器(符),加强版!

[复制链接]
发表于 2005-5-11 19:09:00 | 显示全部楼层
天哪 ,是BASIC版的,我后悔回帖了
发表于 2005-5-14 22:22:00 | 显示全部楼层
后悔你又回?
发表于 2005-5-15 13:00:00 | 显示全部楼层
好象早就有了?
发表于 2005-5-15 18:10:00 | 显示全部楼层
好象没什么用
 楼主| 发表于 2005-5-11 19:02:02 | 显示全部楼层 |阅读模式

内存读取器(符),加强版!

功能如下:

1.实现了分行读取显示!
2.可以选择内存范围!
3.内存地址 即时 显示!

很简单的程序,大家不要笑话我啊!!

还有 内存读取器(码) 如果大家要的话 就顶贴在吧!

综合版 和 更多功能 正在编辑中......

支持我一下好吗?
欢迎大家修改!

关于作者:
盛渲 (B_Ink 或 hacker_sx) 17岁
就读于 上海新沪高级中学 高二(3)班
文曲星: pc2000a
QQ:395780502
E—mail:hacker_sx@126.com


开放源代码!
如下:

1 GRAPH:GOTO 40
5 POKE 997,255:G=19 :F=0
10 FOR I=A TO B
15 G=G+2 :IF G=21 THEN G=1 :IF G=1 THEN F=F+1
18 IF F=5 THEN F=1:CLS
20 LOCATE F,GRINT CHR$(PEEK(I))=D+1:H=D+A
25 LOCATE 5,1RINT "当前内存地址:";H;
30 NEXT
35 BEEP:IN$=INKEY$:CLSOCATE 3,5RINT "退出吗?(Y/N)"
36 C=ASC(INKEY$)
37 IF C=121 THEN CLSOCATE 3,7:PRINT "Bye-Bye!","    Soft By B_Ink":END
38 IF C=110 THEN GOTO 40
39 GOTO 36
40 CLSOCATE 2,4:PRINT "内存读取器(符)!","       B_Ink"
50 D=-1:H=0:POKE 997,0:INPUT "FROM: ";A
60 INPUT "T ";B
70 CLS:GOTO 5



您需要登录后才可以回帖 登录 | 加入易码

本版积分规则

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

GMT+8, 2025-6-19 03:25 , Processed in 0.011388 second(s), 19 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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