� *** QUIZ 2 ***
�1
"�'"        Atomic Number Quiz"
("�"       ~~~~~~~~~~~~~~~~~~~~"
2�28,2,20,36,5 
<� CHEM$(20)
F� NUM$(20)
P� X=1 � 20
Z� CHEM$(X)
d
� NUM$(X)
n�X
xR=0
�
� X=1� 15
�r=�(20)
��2
�6�"What is the chemical symbol"'"of ";:�1:� NUM$(r)
��2
��": "answer$
�#� answer$=CHEM$(r) � �YES � �NO
�� X
��7
��19,0,1;0;
��''"You got ";R;
��" out of 15"
�� R>=10 � �'"Exellent"

 � R<10 � R>6 � �'"Very Good"

$� R>=1 � R<=6 � �'"Not Too Good"

� R<1 � �'"BLOODY AWFUL!!!"

"�1:�999

,'�'''"Do you want another go (Y/N)?"

6A$=�

@� A$="Y" � �

J� A$="N" � �EXIT

T	�TvA

^�1

h� H,Hydrogen

r� He,Helium

|� Li,Lithium

�� Be,Beryllium

�
� B,Boron

�� C,Carbon

�� N,Nitrogen

�� O,Oxygen

�� F,Fluorine

�
� Ne,Neon

�� Na,Sodium

�� Mg,Magnesium

�� Al,Aluminium

�� Si,Silicon

�� P,Phosphuros

�� S,Sulphur
� Cl,Chlorine
� Ar,Argon
� K,Potassium
&� Ca,Calcium
0
� �YES
:�7
D�'"W e l l   D o n e !!!"
N�1,-15,150,3
X	R=R+1
b�=0:� � �>150:�
l�2
v�
�	� �NO
��7
�*�'"W r o n g.  Do you want the answer"
��0,-15,50,3
�=A$=�:� A$="Y" � A$="y" � �'"The answer is ";:�1:�CHEM$(r)
�	�DbB
��
�� �EXIT
��
��"MENU"
��
�

00000000  0d 00 0a 14 f4 20 2a 2a  2a 20 51 55 49 5a 20 32  |..... *** QUIZ 2|
00000010  20 2a 2a 2a 0d 00 14 06  eb 31 0d 00 1e 22 f1 27  | ***.....1...".'|
00000020  22 20 20 20 20 20 20 20  20 41 74 6f 6d 69 63 20  |"        Atomic |
00000030  4e 75 6d 62 65 72 20 51  75 69 7a 22 0d 00 28 22  |Number Quiz"..("|
00000040  f1 22 20 20 20 20 20 20  20 7e 7e 7e 7e 7e 7e 7e  |."       ~~~~~~~|
00000050  7e 7e 7e 7e 7e 7e 7e 7e  7e 7e 7e 7e 7e 22 0d 00  |~~~~~~~~~~~~~"..|
00000060  32 12 ef 32 38 2c 32 2c  32 30 2c 33 36 2c 35 20  |2..28,2,20,36,5 |
00000070  0d 00 3c 0f de 20 43 48  45 4d 24 28 32 30 29 0d  |..<.. CHEM$(20).|
00000080  00 46 0e de 20 4e 55 4d  24 28 32 30 29 0d 00 50  |.F.. NUM$(20)..P|
00000090  0e e3 20 58 3d 31 20 b8  20 32 30 0d 00 5a 0e f3  |.. X=1 . 20..Z..|
000000a0  20 43 48 45 4d 24 28 58  29 0d 00 64 0d f3 20 4e  | CHEM$(X)..d.. N|
000000b0  55 4d 24 28 58 29 0d 00  6e 06 ed 58 0d 00 78 07  |UM$(X)..n..X..x.|
000000c0  52 3d 30 0d 00 82 0d e3  20 58 3d 31 b8 20 31 35  |R=0..... X=1. 15|
000000d0  0d 00 8c 0b 72 3d b3 28  32 30 29 0d 00 96 06 fb  |....r=.(20).....|
000000e0  32 0d 00 a0 36 f1 22 57  68 61 74 20 69 73 20 74  |2...6."What is t|
000000f0  68 65 20 63 68 65 6d 69  63 61 6c 20 73 79 6d 62  |he chemical symb|
00000100  6f 6c 22 27 22 6f 66 20  22 3b 3a fb 31 3a f1 20  |ol"'"of ";:.1:. |
00000110  4e 55 4d 24 28 72 29 0d  00 aa 06 fb 32 0d 00 b4  |NUM$(r).....2...|
00000120  10 e8 22 3a 20 22 61 6e  73 77 65 72 24 0d 00 be  |..": "answer$...|
00000130  23 e7 20 61 6e 73 77 65  72 24 3d 43 48 45 4d 24  |#. answer$=CHEM$|
00000140  28 72 29 20 8c 20 f2 59  45 53 20 8b 20 f2 4e 4f  |(r) . .YES . .NO|
00000150  0d 00 c8 07 ed 20 58 0d  00 d2 06 fb 37 0d 00 dc  |..... X.....7...|
00000160  0e ef 31 39 2c 30 2c 31  3b 30 3b 0d 00 e6 14 f1  |..19,0,1;0;.....|
00000170  27 27 22 59 6f 75 20 67  6f 74 20 22 3b 52 3b 0d  |''"You got ";R;.|
00000180  00 f0 11 f1 22 20 6f 75  74 20 6f 66 20 31 35 22  |...." out of 15"|
00000190  0d 00 fa 1a e7 20 52 3e  3d 31 30 20 8c 20 f1 27  |..... R>=10 . .'|
000001a0  22 45 78 65 6c 6c 65 6e  74 22 0d 01 04 20 e7 20  |"Exellent"... . |
000001b0  52 3c 31 30 20 80 20 52  3e 36 20 8c 20 f1 27 22  |R<10 . R>6 . .'"|
000001c0  56 65 72 79 20 47 6f 6f  64 22 0d 01 0e 24 e7 20  |Very Good"...$. |
000001d0  52 3e 3d 31 20 80 20 52  3c 3d 36 20 8c 20 f1 27  |R>=1 . R<=6 . .'|
000001e0  22 4e 6f 74 20 54 6f 6f  20 47 6f 6f 64 22 0d 01  |"Not Too Good"..|
000001f0  18 1f e7 20 52 3c 31 20  8c 20 f1 27 22 42 4c 4f  |... R<1 . .'"BLO|
00000200  4f 44 59 20 41 57 46 55  4c 21 21 21 22 0d 01 22  |ODY AWFUL!!!".."|
00000210  0b fb 31 3a fb 39 39 39  0d 01 2c 27 f1 27 27 27  |..1:.999..,'.'''|
00000220  22 44 6f 20 79 6f 75 20  77 61 6e 74 20 61 6e 6f  |"Do you want ano|
00000230  74 68 65 72 20 67 6f 20  28 59 2f 4e 29 3f 22 0d  |ther go (Y/N)?".|
00000240  01 36 08 41 24 3d be 0d  01 40 10 e7 20 41 24 3d  |.6.A$=...@.. A$=|
00000250  22 59 22 20 8c 20 f9 0d  01 4a 14 e7 20 41 24 3d  |"Y" . ...J.. A$=|
00000260  22 4e 22 20 8c 20 f2 45  58 49 54 0d 01 54 09 e5  |"N" . .EXIT..T..|
00000270  8d 54 76 41 0d 01 5e 06  fb 31 0d 01 68 10 dc 20  |.TvA..^..1..h.. |
00000280  48 2c 48 79 64 72 6f 67  65 6e 0d 01 72 0f dc 20  |H,Hydrogen..r.. |
00000290  48 65 2c 48 65 6c 69 75  6d 0d 01 7c 10 dc 20 4c  |He,Helium..|.. L|
000002a0  69 2c 4c 69 74 68 69 75  6d 0d 01 86 12 dc 20 42  |i,Lithium..... B|
000002b0  65 2c 42 65 72 79 6c 6c  69 75 6d 0d 01 90 0d dc  |e,Beryllium.....|
000002c0  20 42 2c 42 6f 72 6f 6e  0d 01 9a 0e dc 20 43 2c  | B,Boron..... C,|
000002d0  43 61 72 62 6f 6e 0d 01  a4 10 dc 20 4e 2c 4e 69  |Carbon..... N,Ni|
000002e0  74 72 6f 67 65 6e 0d 01  ae 0e dc 20 4f 2c 4f 78  |trogen..... O,Ox|
000002f0  79 67 65 6e 0d 01 b8 10  dc 20 46 2c 46 6c 75 6f  |ygen..... F,Fluo|
00000300  72 69 6e 65 0d 01 c2 0d  dc 20 4e 65 2c 4e 65 6f  |rine..... Ne,Neo|
00000310  6e 0d 01 cc 0f dc 20 4e  61 2c 53 6f 64 69 75 6d  |n..... Na,Sodium|
00000320  0d 01 d6 12 dc 20 4d 67  2c 4d 61 67 6e 65 73 69  |..... Mg,Magnesi|
00000330  75 6d 0d 01 e0 12 dc 20  41 6c 2c 41 6c 75 6d 69  |um..... Al,Alumi|
00000340  6e 69 75 6d 0d 01 ea 10  dc 20 53 69 2c 53 69 6c  |nium..... Si,Sil|
00000350  69 63 6f 6e 0d 01 f4 12  dc 20 50 2c 50 68 6f 73  |icon..... P,Phos|
00000360  70 68 75 72 6f 73 0d 01  fe 0f dc 20 53 2c 53 75  |phuros..... S,Su|
00000370  6c 70 68 75 72 0d 02 08  11 dc 20 43 6c 2c 43 68  |lphur..... Cl,Ch|
00000380  6c 6f 72 69 6e 65 0d 02  12 0e dc 20 41 72 2c 41  |lorine..... Ar,A|
00000390  72 67 6f 6e 0d 02 1c 11  dc 20 4b 2c 50 6f 74 61  |rgon..... K,Pota|
000003a0  73 73 69 75 6d 0d 02 26  10 dc 20 43 61 2c 43 61  |ssium..&.. Ca,Ca|
000003b0  6c 63 69 75 6d 0d 02 30  0a dd 20 f2 59 45 53 0d  |lcium..0.. .YES.|
000003c0  02 3a 06 fb 37 0d 02 44  1d f1 27 22 57 20 65 20  |.:..7..D..'"W e |
000003d0  6c 20 6c 20 20 20 44 20  6f 20 6e 20 65 20 21 21  |l l   D o n e !!|
000003e0  21 22 0d 02 4e 10 d4 31  2c 2d 31 35 2c 31 35 30  |!"..N..1,-15,150|
000003f0  2c 33 0d 02 58 09 52 3d  52 2b 31 0d 02 62 13 d1  |,3..X.R=R+1..b..|
00000400  3d 30 3a f5 20 fd 20 91  3e 31 35 30 3a db 0d 02  |=0:. . .>150:...|
00000410  6c 06 fb 32 0d 02 76 05  e1 0d 02 80 09 dd 20 f2  |l..2..v....... .|
00000420  4e 4f 0d 02 8a 06 fb 37  0d 02 94 2a f1 27 22 57  |NO.....7...*.'"W|
00000430  20 72 20 6f 20 6e 20 67  2e 20 20 44 6f 20 79 6f  | r o n g.  Do yo|
00000440  75 20 77 61 6e 74 20 74  68 65 20 61 6e 73 77 65  |u want the answe|
00000450  72 22 0d 02 9e 0f d4 30  2c 2d 31 35 2c 35 30 2c  |r".....0,-15,50,|
00000460  33 0d 02 a8 3d 41 24 3d  be 3a e7 20 41 24 3d 22  |3...=A$=.:. A$="|
00000470  59 22 20 84 20 41 24 3d  22 79 22 20 8c 20 f1 27  |Y" . A$="y" . .'|
00000480  22 54 68 65 20 61 6e 73  77 65 72 20 69 73 20 22  |"The answer is "|
00000490  3b 3a fb 31 3a f1 43 48  45 4d 24 28 72 29 0d 02  |;:.1:.CHEM$(r)..|
000004a0  b2 09 e5 8d 44 62 42 0d  02 bc 05 e1 0d 02 c6 0b  |....DbB.........|
000004b0  dd 20 f2 45 58 49 54 0d  02 d0 05 db 0d 02 da 0b  |. .EXIT.........|
000004c0  d7 22 4d 45 4e 55 22 0d  02 e4 05 e1 0d ff        |."MENU".......|
000004ce