中华学习机没有时钟显示语句,不能直接利用主机时钟脉冲信号,但主机时钟频率和运算速度是稳定的。利用这一特点,编制一个模拟数字钟显示程序,使学习机具有时间显示功能。在程序中增加定时音乐输出语句,将输出的音频信号作为驱动开关电路的触发信号,就可实现时间控制。下面是模拟钟控程序清单:
10 PRINT CHR$(4)“PR#3”
20 PRINT∶HGR2∶HOME∶M=0
30 INPUT“请输入定时时间××,××”;DS,DF
40 INPUT“请参考标准时间,提前1min输入当前时间××,××”;S,F
50 HOME∶PRINT S“66F“66M“6”
60 PRINT“当标准时间与显示时间重合的前1S,按下任一键,本时钟开始运行”
70 GET A$∶HOME
80 IF S=DS ANDF=DF THEN GOSUB200
90 FOR I=0 TO 59
100 VTAB 2∶HTAB 15∶PRINTS;“66;F;“66;I;“661616
110 FOR E=1 TO 202∶B=M+2∶NEXT E
120 NEXT I
130 IF F<59 THEN F=F+1∶GOTO 80
140 F=0∶S=S+1
150 IF S<=23 THEN GOTO 80
160 S=0∶F=0∶GOTO 80
200 MUSIC 192, 255∶RETURN
调节110句中的小循环次数,可调整模拟钟的快慢。程序中“6代表空格,是为数字钟显示格式特设的。本程序只给一次定时设定。如果要多次设定,可在30句后增加变量个数,并在80句后增加相应的判断句,就可实现多次定时。音频信号作触发信号用,可通过电容从机内扬声器两端子取出。(李昌文)