(The "dog kennel" on the right hand side of the code is the University of Manchester logo.)
Written by: | John Deane of Australia. |
Obtained from: | The 1998 SSEM Programming Competition. |
Description: | "Mediaeval analog clock which displays the hour as the number of zeroes counted from the left in location 30. The fraction of the hour is displayed in location 31 where each 0 from the left indicates 1/32 hour (about 2 minutes)." |
Parameter Lines: | 27: initial value for the timing interval counter. See code below. |
Result Lines: | 30: hours display
31: 1/32 hour display (run time display) |
01: BINS 11011000000000100000000010000000 02: BINS 00111000000000010000000101000000 03: BINS 00000000000000110000001000100000 04: BINS 00111000000000000000010010010000 05: BINS 11111000000000100010100000001010 06: BINS 00000000000001100101000010000101 07: BINS 00000000000000100111001010100111 08: BINS 00000000000000010101001010100101 09: BINS 11111000000001100101001010100101 10: BINS 00000000000000110101001010100101 11: BINS 00111000000001000111111111111111 12: BINS 10111000000000000100000000000001 13: BINS 00111000000000100100000111000001 14: BINS 11111000000001100100001000100001 15: BINS 01111000000000100100010000010001 16: BINS 00000000000001100100100000001001 17: BINS 00000000000000100111100000001111 18: BINS 00000000000000010000000000000000 19: BINS 01111000000001100110001111000111 20: BINS 01011000000000010010001010101010 21: BINS 00000000000000110010001010010010 22: BINS 10111000000000000010001010010010 23: BINS 00111000000000100001110011000111 24: BINS 01111000000001100000000000000000 25: BINS 10111000000000000000000000000000 26: BNUM 00000000000111111111111111111111 27: BNUM 01101110100110011111111111111111 -- timing counter for original machine 27: BNUM 10111111111111111111111111111111 -- timing counter to speed up simulation 28: BNUM 10000000000000000000000000000000 29: BNUM 00000000000000000000000000000000 30: BNUM 11111111111111111111111111111111 31: BNUM 11111111111111111111111111111111