September 2017 Update

2017-09-23 10:01:46 +02:00 · 2017-09-23 10:01:46 +02:00 · ba8067c3b7
commit ba8067c3b7
parent bba7bfd280
14570 changed files with 153136 additions and 63871 deletions
--- a/Task/Copy-a-string/EDSAC-order-code/copy-a-string.edsac
+++ b/Task/Copy-a-string/EDSAC-order-code/copy-a-string.edsac
@ -0,0 +1,63 @@
+[ Copy a string
+  =============
+
+  A program for the EDSAC
+
+  Copies the source string into storage
+  tank 6, which is assumed to be free,
+  and then prints it from there
+
+  Works with Initial Orders 2 ]
+
+        T56K
+        GK
+
+[  0 ]  A34@      [ copy the string ]
+[  1 ]  T192F
+[  2 ]  H34@
+        C32@
+        S32@
+        E17@
+        T31@
+        A@
+        A33@
+        T@
+        A1@
+        A33@
+        T1@
+        A2@
+        A33@
+        T2@
+        E@
+[ 17 ]  O192F     [ print the copy  ]
+[ 18 ]  H192F
+        C32@
+        S32@
+        E30@
+        T31@
+        A17@
+        A33@
+        T17@
+        A18@
+        A33@
+        T18@
+        E17@
+[ 30 ]  ZF
+[ 31 ]  PF
+[ 32 ]  PD
+[ 33 ]  P1F
+[ 34 ]  *F
+        RF
+        OF
+        SF
+        EF
+        TF
+        TF
+        AF
+        !F
+        CF
+        OF
+        DF
+        ED
+
+        EZPF