From 27f80f4ce0d818361f3d8e62012bd7cffbceed5d Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Thu, 25 Apr 2024 08:00:48 +0200
Subject: [PATCH] Update the ITS blinky program.

Instead of a busy loop with a fixed number of iterations, wait for the
60 Hz clock tick.
---
 systems/its/boot.pidp | 17 ++++++++---------
 1 file changed, 8 insertions(+), 9 deletions(-)

diff --git a/systems/its/boot.pidp b/systems/its/boot.pidp
index 265e122..983b407 100644
--- a/systems/its/boot.pidp
+++ b/systems/its/boot.pidp
@@ -137,14 +137,13 @@ dep readin 104
 ; ----------------------------------------------------------------
 ; so the user has a PiDP-10 front panel and should press READ IN before
 ; booting starts.
-; This little blinky program is run until the moment that he does:
-d 1000 201000000777
-d 1001 241000000001
-d 1002 202000001007
-d 1003 700540001007
-d 1004 201100060650
-d 1005 366100001005
-d 1006 324000001001
-d 1007 000000000000
+; This little blinky program is run until the moment that they do:
+d 1000 MOVEI 1,777
+d 1001 ROT 1,1
+d 1002 DATAO PI,1
+d 1003 CONSO 0,1000
+d 1004 JRST 1003
+d 1005 CONO 0,1000
+d 1006 JRST 1001
 go 1000
 ;b ptr