呵呵，冬日大侠的程序不错！我现在想如果程序中不要有字节或字等操作，而是检测任意一段长度的报警区域，应该怎么做呢？
但是我觉得冬日大侠的程序有些部分还可以精简下呢，比如间接寻址、字逻辑指令后的跳转可用JZ：
A #Reset;
R #Alarm_Lamp;
R #Alarm_Buzzer;
A #Silence;
R #Alarm_Buzzer;

OPN #Alarm_DB;
LAR1 P#0.0;

L DBLG;
next: T LW 0;
L 0;
L DBB [AR1,P#0.0];
==I ;
JC _001;
S #Alarm_Lamp;
L DIB [AR1,P#6.0];
XOW ;
L DBB [AR1,P#0.0];
AW ;
JZ _001;
S #Alarm_Buzzer;
_001: L DBB [AR1,P#0.0];
T DIB [AR1,P#6.0];
+AR1 P#1.0;
L LW 0;
LOOP next;