� >IIC.BRAINB
$� BBC MODEL B AND MASTER VERSION
PBK%=&FE60
?&FE62=0
2� 1
<�"BRAIN SURGEON"
F�" By Mike Cook"
P#�"Using the IIC interface card"
Z� �0,14)"Score"
d�:�
n2� �0,23)"Put in place all the pieces of Brain"
x  �
�  � ?PBK%=&80
�5  � �0,23)"Now begin to remove the Brain Tumours"
�  �0,17);�(39)
�  �0,19);�(39)
� �=0
� � � � > 200
�� ?PBK%=&80
�SCORE=0:T%=0
��
�A%=?PBK%:V%=1

� B%=0 � 6

6� (A% � V%)<>0 � (T% � V%)=0 � T%=T% � V%:SCORE+=1

V%=V%*2

"�

,� �0,14);"Score ",SCORE

6� (A% � &80)=0 � (T%=&7F)

@	TM%=�

Jg� T%=&7F � � �0,17)"Congratulations! Your patient survived. " �:� �0,17)"Sorry - your patient died"

T*�0,19);"You took ";TM%/100;" Seconds"

^� �
�

00000000  0d 00 0a 11 f4 20 3e 49  49 43 2e 42 52 41 49 4e  |..... >IIC.BRAIN|
00000010  42 0d 00 0b 24 f4 20 42  42 43 20 4d 4f 44 45 4c  |B...$. BBC MODEL|
00000020  20 42 20 41 4e 44 20 4d  41 53 54 45 52 20 56 45  | B AND MASTER VE|
00000030  52 53 49 4f 4e 0d 00 14  0e 50 42 4b 25 3d 26 46  |RSION....PBK%=&F|
00000040  45 36 30 0d 00 1e 0c 3f  26 46 45 36 32 3d 30 0d  |E60....?&FE62=0.|
00000050  00 32 07 eb 20 31 0d 00  3c 14 f1 22 42 52 41 49  |.2.. 1..<.."BRAI|
00000060  4e 20 53 55 52 47 45 4f  4e 22 0d 00 46 14 f1 22  |N SURGEON"..F.."|
00000070  20 42 79 20 4d 69 6b 65  20 43 6f 6f 6b 22 0d 00  | By Mike Cook"..|
00000080  50 23 f1 22 55 73 69 6e  67 20 74 68 65 20 49 49  |P#."Using the II|
00000090  43 20 69 6e 74 65 72 66  61 63 65 20 63 61 72 64  |C interface card|
000000a0  22 0d 00 5a 13 f1 20 8a  30 2c 31 34 29 22 53 63  |"..Z.. .0,14)"Sc|
000000b0  6f 72 65 22 0d 00 64 07  f5 3a f5 0d 00 6e 32 f1  |ore"..d..:...n2.|
000000c0  20 8a 30 2c 32 33 29 22  50 75 74 20 69 6e 20 70  | .0,23)"Put in p|
000000d0  6c 61 63 65 20 61 6c 6c  20 74 68 65 20 70 69 65  |lace all the pie|
000000e0  63 65 73 20 6f 66 20 42  72 61 69 6e 22 0d 00 78  |ces of Brain"..x|
000000f0  07 20 20 f5 0d 00 8c 11  20 20 fd 20 3f 50 42 4b  |.  .....  . ?PBK|
00000100  25 3d 26 38 30 0d 00 96  35 20 20 f1 20 8a 30 2c  |%=&80...5  . .0,|
00000110  32 33 29 22 4e 6f 77 20  62 65 67 69 6e 20 74 6f  |23)"Now begin to|
00000120  20 72 65 6d 6f 76 65 20  74 68 65 20 42 72 61 69  | remove the Brai|
00000130  6e 20 54 75 6d 6f 75 72  73 22 0d 00 a0 13 20 20  |n Tumours"....  |
00000140  f1 8a 30 2c 31 37 29 3b  89 28 33 39 29 0d 00 aa  |..0,17);.(39)...|
00000150  13 20 20 f1 8a 30 2c 31  39 29 3b 89 28 33 39 29  |.  ..0,19);.(39)|
00000160  0d 00 b4 08 20 d1 3d 30  0d 00 be 10 20 f5 20 fd  |.... .=0.... . .|
00000170  20 91 20 3e 20 32 30 30  0d 00 d2 0f fd 20 3f 50  | . > 200..... ?P|
00000180  42 4b 25 3d 26 38 30 0d  00 dc 10 53 43 4f 52 45  |BK%=&80....SCORE|
00000190  3d 30 3a 54 25 3d 30 0d  00 e6 05 f5 0d 00 fa 11  |=0:T%=0.........|
000001a0  41 25 3d 3f 50 42 4b 25  3a 56 25 3d 31 0d 01 04  |A%=?PBK%:V%=1...|
000001b0  0e e3 20 42 25 3d 30 20  b8 20 36 0d 01 0e 36 e7  |.. B%=0 . 6...6.|
000001c0  20 28 41 25 20 80 20 56  25 29 3c 3e 30 20 80 20  | (A% . V%)<>0 . |
000001d0  28 54 25 20 80 20 56 25  29 3d 30 20 8c 20 54 25  |(T% . V%)=0 . T%|
000001e0  3d 54 25 20 84 20 56 25  3a 53 43 4f 52 45 2b 3d  |=T% . V%:SCORE+=|
000001f0  31 0d 01 18 0b 56 25 3d  56 25 2a 32 0d 01 22 05  |1....V%=V%*2..".|
00000200  ed 0d 01 2c 1b f1 20 8a  30 2c 31 34 29 3b 22 53  |...,.. .0,14);"S|
00000210  63 6f 72 65 20 22 2c 53  43 4f 52 45 0d 01 36 1d  |core ",SCORE..6.|
00000220  fd 20 28 41 25 20 80 20  26 38 30 29 3d 30 20 84  |. (A% . &80)=0 .|
00000230  20 28 54 25 3d 26 37 46  29 0d 01 40 09 54 4d 25  | (T%=&7F)..@.TM%|
00000240  3d 91 0d 01 4a 67 e7 20  54 25 3d 26 37 46 20 8c  |=...Jg. T%=&7F .|
00000250  20 f1 20 8a 30 2c 31 37  29 22 43 6f 6e 67 72 61  | . .0,17)"Congra|
00000260  74 75 6c 61 74 69 6f 6e  73 21 20 59 6f 75 72 20  |tulations! Your |
00000270  70 61 74 69 65 6e 74 20  73 75 72 76 69 76 65 64  |patient survived|
00000280  2e 20 22 20 8b 3a f1 20  8a 30 2c 31 37 29 22 53  |. " .:. .0,17)"S|
00000290  6f 72 72 79 20 2d 20 79  6f 75 72 20 70 61 74 69  |orry - your pati|
000002a0  65 6e 74 20 64 69 65 64  22 0d 01 54 2a f1 8a 30  |ent died"..T*..0|
000002b0  2c 31 39 29 3b 22 59 6f  75 20 74 6f 6f 6b 20 22  |,19);"You took "|
000002c0  3b 54 4d 25 2f 31 30 30  3b 22 20 53 65 63 6f 6e  |;TM%/100;" Secon|
000002d0  64 73 22 0d 01 5e 07 fd  20 a3 0d ff              |ds"..^.. ...|
000002dc