「HP 39gs」上的倒计时程序

闲来无聊，给 hp39gs 计算器写的高考倒计时程序

代码如下：

Date*1000000▶J:
06072025▶K:
INT(J / 1000000)▶L:
INT((J - L * 1000000) / 10000)▶M:
(J - L * 1000000 - M * 10000)▶N:
INT(K / 1000000)▶O:
INT((K - O * 1000000) / 10000)▶P:
(K - O * 1000000 - P * 10000)▶Q:
(367 * N - INT((7 * (N + INT((L + 9) / 12))) / 4) + INT((275 * L) / 9) + M  - 730530)▶R
(367 * Q - INT((7 * (Q + INT((O + 9) / 12))) / 4) + INT((275 * O) / 9) + P - 730530)▶S:
ABS(R-S)▶T:
DISPXY -3.6;1.5;2;"Only " T " Days":
DISPXY -1.6;0.5;2;"to go.":
DISPXY -3.1;-0.5;2;"Keep it up!":

注意到，我没有用字符串函数来获取日期的每一部分：因为我的计算器不能执行典型的 BASIC 程序：这是 HP-BASIC 。请确保在合适的设备上执行。

代码并没有很复杂，所以没有注释。