annotate interps/c-intercal/pit/icat.i @ 10776:b474172c9892
<b_jonas> slashlearn ance//Spelling of -ance/-ence words: advance, science, conference, experience, finance, insurance, licence, performance, reference, assistance, balance, defence, difference, distance, evidence, acceptance, appliance, audience, compliance, importance, influence, instance, intelligence, maintenance, preference, presence, sentence, sequence, substance, violence, absence, accordance, alliance, appearance, assurance, attendance, circumstance, clea
author |
HackBot |
date |
Fri, 21 Apr 2017 18:06:38 +0000 |
parents |
859f9b4339e6 |
children |
|
rev |
line source |
996
|
1 PLEASE DO ,1 <- #1
|
|
2 DO .4 <- #0
|
|
3 DO .5 <- #0
|
|
4 DO COME FROM (30)
|
|
5 DO WRITE IN ,1
|
|
6 DO .1 <- ,1SUB#1
|
|
7 DO (10) NEXT
|
|
8 PLEASE GIVE UP
|
|
9 (20) PLEASE RESUME '?.1$#256'~'#256$#256'
|
|
10 (10) DO (20) NEXT
|
|
11 DO FORGET #1
|
|
12 PLEASE DO .2 <- .4
|
|
13 DO (1000) NEXT
|
|
14 DO .4 <- .3~#255
|
|
15 PLEASE DO .3 <- !3~#15'$!3~#240'
|
|
16 DO .3 <- !3~#15'$!3~#240'
|
|
17 DO .2 <- !3~#15'$!3~#240'
|
|
18 PLEASE DO .1 <- .5
|
|
19 DO (1010) NEXT
|
|
20 DO .5 <- .2
|
|
21 DO ,1SUB#1 <- .3
|
|
22 (30) PLEASE READ OUT ,1
|
|
23
|