javatar
- 浏览: 1680348 次
- 性别:
- 来自: 杭州699号
-
最新评论
-
莫莫摸：
为什么不用dubbo
RCP数据传输模型回顾 -
大胡子爸爸：
String, Class 都实现了Serializable接 ...
RPC框架几行代码就够了 -
lss598018587：
谢谢大神分享，比起新手看复杂的dubbo框架还不如看大神的这一 ...
RPC框架几行代码就够了 -
15606915740：
你好，请问一下。<dubbo:consumer filt ...
Dubbo文档 -
joqk12345：
...
一些设计上的基本常识
文章列表
NC1020系列PEEK值
NC1020系列（包括NC1020N，NC1020, CC880）
1.系统：
屏幕亮度: PEEK(1330)+1 亮度
设定音量：PEEK(1329)+1 音量
输入法设定：PEEK(1353) 联想<0 1> PEEK(1354) 拼音<0 1> PEEK(1342) 反查 PEEK(1341) 输入法
按键声音：PEEK(1128) 声音<0 255>
整点铃声：PEEK(1129) 铃声<0 128>
设定开机画面：PEEK(1174) 设定 PEEK(1706)~PEEK(1721) 开机画面 ...
- 2006-12-22 12:30
- 浏览 7786
- 评论(4)
中国象棋
中国象棋简介：
作者:梁飞（网名：o_o）
本程序为BAS通用版游戏（未用199以外PEEK地址值）
这是一个测试版游戏，
由于程序源码8k大的限制，（>8k的程序运行很慢）
还有些功能未写完.
已有功能：
所有象棋棋规限制：
车炮直走，马踩日，象飞田，士斜插，将兵单移；
兵不退，将士限九宫，飞象不过河；
象田心蹩脚，马日边蹩脚，车炮不隔棋走棋，炮隔棋吃棋，将不空对帅，不吃自方棋。。。
当在棋规的限制下：
所选棋走法唯一时，电脑自动走好；
无路可走时，自动返回重新选棋。
使用双光标：
双方各控制一个移动光标，
移动时互不影响 ...
- 2006-12-22 12:26
- 浏览 7110
- 评论(1)
智能五子棋 (NC1020型用)
此算法是friday所写，棋力比我还好！
在文曲星NC1020这种超低能的运算力的板子上每步也不超过5秒
5 CLEAR:DIM IL(4,2,2),M(16,16),BSX(16),BSY(16),RECORD(255):ID=0:CP=0:TS=0
10 GRAPH:POKE 29943,255:POKE 1024,0
20 LOCATE 2,5:PRINT "ＬＩＮＫ ⑤":LOCATE 3,5:PRINT " 载入..."
30 BOX 30,13,130,49
32 BOX 28,11,132,51 ...
- 2006-12-22 12:25
- 浏览 2693
- 评论(0)
四则运算（官方程序）
****四则运算****
]10 CLS
]20 DIM OPERAND(6),OPERATOR(6),EPS(12)
]30 DIM PRIORITY(6,6),STACK1(6),STACK2(6)
]40 RANGE=10:AMOUNT=10:DIFFICULTY=1
]50 FOR I=0 TO 6
]60 FOR J=0 TO 6
]70 READ PRIORITY(I,J)
]80 NEXT J
]90 NEXT I
]200 CLS
]210 LOCATE 1,4:PRINT "小学四则运算":PRINT " ...
- 2006-12-22 12:21
- 浏览 2250
- 评论(0)
批量法作图(速度奇迹)
余海林的创始原帖：
批量发送字节法：
先要了解字串变量在ＢＡＳＩＣ助手中的存放方式：
一旦程序中出现A$="XXX"之类的字串赋值语句时，在内存中用A$代表的字串
"XXX"就会被保存在内存中（内存是RAM,不要理解成闪存）．并且保存的地址也
会记录在内存中，在使用A$时BASIC平台就会按记录的地址去取出"XXX".
总之，一旦出现类似A$='XXX"的语句时，BASIC助手会完成两件事：
①把"XXX"存放起来；②把"XXX"存放的 ...
- 2006-12-22 12:21
- 浏览 2936
- 评论(0)
时间显示（小晶体管）控制
- 博客分类：
- 文曲星8位板子编程
时间显示（小晶体管）控制
首先，来看看时间显示的小程序(NC2600C通过)：
10 CLS:POKE 199,0
20 LOCATE 2,4
30 PRINT "这是一个测试程序":PA$(0)=" ":PA$(1)=":" /*为使用192/64振荡器做准备*/
40 LOCATE 3,6OKE 911,1
50 PRINT "CLOCK"
/*以下是定义数字模型,DATA中的数值一一对应数组下标的数字,这些数字模型是通过上一篇中的程序测试求得的*/
60 FOR A=0 TO 9
70 ...
- 2006-12-22 12:20
- 浏览 3397
- 评论(0)
图像快速载入
一秒内超快全屏图片保存和载入:
这是我在研究滚屏时的意外发现，也许被人也有过类似的发现，但是我觉得这太快了，所以决定发上来。保存：首先声明这几个变量，注意变量名称最好是一个字节，并将他们规 ...
- 2006-12-22 12:19
- 浏览 2255
- 评论(1)
批量法滚屏的详解
先得了解文曲星的屏幕，为159*80，存图是每横向8个点为一个元素，因此一行有160/8=20个元素（注：第一个元素只有7个点，因此一行是159个点）。那么整屏总共是20*80=1600个元素，每个元素用一个数据存储，所以一个图形的数据文件就是1600大小。
下面直接以滚屏程序讲解。
（一）安装程序：
0 :
5 PRINT "正准备安装..."
（首先搞清，A$--H$八个字串是用来表示屏幕的。而Z$()二十四个字串是用来存图的。）
10 A$="":B$="":C$="":D$= ...
- 2006-12-22 12:18
- 浏览 2049
- 评论(0)
读屏原理
读点法原理
在文曲星中，显存都是8位的，即一个显存控制8个液晶阵点的显示，8个阵点，每一个有“黑“和“白“两种状态，所以8个点就有2的8次方即256个显示效果，所以每一个显存的值为0-255共256个值。一个显存的 ...
- 2006-12-22 12:17
- 浏览 2141
- 评论(0)
简易五子棋
10 GRAPH：CLS：FOR X= 4 TO 148 STEP 8： FOR Y=4 TO 68 STEP 8： BOX X,Y,X+8,Y+8： NEXT：NEXT
20 A=1：X=76：Y=44 ：B=0
30 X=X+160*（X〈 4）-160*（X〉156）：Y=Y+80*（ Y〈 4 ）-80*（Y〉76）
40 BOX X-4，Y-4，X+4，Y+4，1，2：M=ASC（INKEY$）：BOX X-4，Y-4，X+4，Y+4，1，2
50 Y=Y-8*（M=20）+8*（M=21）：X=X+8*（M=22）-8*（M=23） ：IF M=29 GOTO 1 ...
- 2006-12-22 12:15
- 浏览 3015
- 评论(0)
RPG“伏魔剑”源程序
0 :
1 GRAPH
2 DIM WZ(5,21),DM$(4,19):X(6)=3:Y(6)=19
6 MO=100 :GOSUB 4101: GOTO 30
10 IF T$="b" THEN T=1:19
11 IF T$="n" THEN T=2:19
12 IF T$="m" THEN T=3:19
13 IF T$="g" THEN T=4:19
14 IF T$="h" THEN T=5:19
15 IF T$="j" ...
- 2006-12-22 12:15
- 浏览 2827
- 评论(1)
字符串过滤，是比较常用的功能，我的当前项目也有用到。
如过滤User输入的Html,Js代码等，
由于过滤需求是可能变动的，
如客户又要你过滤一些脏词或者为内容中的url自动加上超链接等。
考虑“开-闭”(OCP)原则，
我决定使用装饰器(Decorator)模式。
首先定义Decorator接口:
package com.sanook.hompy.util.filter;
public interface StringFilter {
public void setNextStringFilter(StringFilter stringFilter); //关联下一装饰器
...
好久没写GVB了，都快忘记了，
上一段时间抽空写了个俄罗斯方块的GVB程序，
发来给大家看看。
第一遍写完后，慢的无法忍受。
已经优化过两次算法，但还是很慢，权当一个样品吧。
使用了键盘映射，是NC1020的，NC系列应该差不多。
以下内容为程序代码:
1 : REM 作者:梁飞，网名:o_o,代码虫子
10 CLEAR:GRAPH:LOCATE 3,6:PRINT "loading...":DIM A(22,12),P(6,3,3),Q(6,3,3):RESTORE
20 FOR I=0 TO 6:FOR J=0 TO 3:FOR L=1 TO 3:READ P(I, ...
- 2006-12-12 21:03
- 浏览 4019
- 评论(0)
今天在写一个桌面程序，显示时用到了观察者模式
观察者模式中，Observer向Subject注册感兴趣的事件，
其中对“感兴趣”的粒度控制，
如果Subject有多个事件，不同的Observer对不同的事件感兴趣，也可能重叠
1.在Subject中保持多个Observer聚集，每个聚集表示对某一事件感兴趣，
将Observer注册到各个聚集，
这样的话。如果同一Observer对两个事件感兴趣，就要注册两次，
而且聚集的管理也较麻烦addObserver,removeObserver要写几个
2.将所有事件方法都纳入同一Observer接口，
Subject只维护一个Observer聚集，
具体 ...
不知还有没有用文曲星电子词典编程的朋友...
回忆那个只有160*80单色分辩率，8位单片机，512k内存的东东...
为节省每一个变量，每个名称长度，每一毫秒速度，费尽心思...
本来买来当词典用的，却想方设法将词典删除，以加大编程可用空间...
peek,poke,call一次次对内存的洗礼，一堆堆文曲星报废...
批量法，bmp读取，灰度相片，RPG引擎，Lava，一次次对其缺陷的改进都让人心动...
那古老的6502汇编，没有8086的强大，却给这片土地带来希望...
它虽简陋，但却是我第一次亲密接触代码...
- 2006-12-09 19:17
- 浏览 5321
- 评论(2)