& 1:50,&H31FF&"ARE THE PROSPECTOR PROGRAMS ON (T)APE OR (D)ISK";A$:A$(A$,1):A$"D"A$"d"50:A$"T"A$"t"20&M"PROS1",&HD000:M"PROS2",&HE000:M"SCRN1":M"SCRN2"&(60&2M"PROS1",&HD000:M"PROS2",&HE000:M"SCRN1":M"SCRN2"'K<"PRESS ENTER WHEN READY TO SAVE COMPLETE PROGRAM";B$:A$"D"A$"d"80'rFM"PROS",&H3200,&H76FB,&H3200:90'PM"PROS",&H3200,&H76FB,&H3200'Z"PRESS ENTER TO RUN PROSPECTOR";A$:&H32002M"PROS1",&HD000:M"PROS2",&HE000:M"SCRN1":M"SCRN2",1,219,128,3,255,192,3,231,192,2,255,64,2,255,64,0,231,0,3,231,192,96,96,0,144,144,0,4338S 120,224,0,10,128,0,106,224,0,202,176,0,138,144,0,31,128,0,48,192,0,224,112,0,24,24,0,36,36,0,30,56,0,2,160,0,26,184,0,50,172,0,34,164,0,7,224,0,12,48,3496T 0,56,28,0,6,6,0,9,9,0,7,142,0,0,168,0,6,174,0,12,171,0,8,169,0,1,248,0,3,12,0,14,7,0,1,129,128,2,66,64,1,227,128,0,42,0,1,171,128,3,2347U 42,192,2,42,64,0,126,0,0,195,0,3,129,192,0,0,0,0,0,0,0,0,42,0,8,0,85,0,85,0,85,0,85,0,85,80,0,85,80,0,21,64,0,5,0,0,0,0,0,0,1797U 0,0,0,0,0,0,0,0,0,0,0,0,0,0,21,84,0,21,84,0,5,80,0,1,64,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,5,85,0,5,85,0,540U 1,84,0,0,80,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,85,64,1,85,64,0,85,0,0,20,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,570V 0,0,0,0,5,0,0,21,64,0,69,16,0,85,80,0,80,80,0,21,64,0,5,0,0,21,64,0,16,64,0,80,80,0,1,64,0,5,80,0,17,68,0,21,84,0,20,20,0,5,1300W* 80,0,1,64,0,5,80,0,4,16,0,20,20,0,0,80,0,1,84,0,4,81,0,5,85,0,5,5,0,1,84,0,0,80,0,1,84,0,1,4,0,5,5,0,0,20,0,0,85,0,1010W4 1,20,64,1,85,64,1,65,64,0,85,0,0,20,0,0,85,0,0,65,0,1,65,64,170,160,170,160,170,160,170,160,42,128,42,128,42,128,10,0,10,0,10,0,249,240,0,23,16,0,3138X!> 66,64,0,23,16,0,249,240,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,62,124,0,5,196,0,16,144,0,5,196,0,62,124,0,0,0,0,0,0,0,0,0,0,0,0,1592XH 0,0,0,0,15,159,0,1,113,0,4,36,0,1,113,0,15,159,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,3,231,192,0,92,64,1,9,0,0,92,64,3,231,192,0,1790Y'R 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,5,0,0,21,64,0,85,80,0,69,16,0,85,80,0,80,80,0,21,64,0,16,64,0,80,80,0,0,0,0,1,64,0,1055Y\ 5,80,0,21,84,0,17,68,0,21,84,0,20,20,0,5,80,0,4,16,0,20,20,0,0,0,0,0,80,0,1,84,0,5,85,0,4,81,0,5,85,0,5,5,0,1,84,0,1,4,1095Z-f 0,5,5,0,0,0,0,0,20,0,0,85,0,1,85,64,1,20,64,1,85,64,1,65,64,0,85,0,0,65,0,1,65,64,0,0,0,1,16,0,1,16,0,21,64,0,85,80,0,69,1263Zp 16,0,85,80,0,80,80,0,21,64,0,80,80,0,0,0,0,0,68,0,0,68,0,5,80,0,21,84,0,17,68,0,21,84,0,20,20,0,5,80,0,20,20,0,0,0,0,0,17,0,1284[5z 0,17,0,1,84,0,5,85,0,4,81,0,5,85,0,5,5,0,1,84,0,5,5,0,0,0,0,0,4,64,0,4,64,0,85,0,1,85,64,1,20,64,1,85,64,1,65,64,0,85,1293[ 0,1,65,64,120,48,195,63,3,198,103,231,192,204,120,231,48,6,102,102,6,96,192,204,255,48,6,102,102,6,96,220,204,219,62,6,102,103,199,192,204,252,195,48,6,102,102,6,192,204,5827\ 204,195,48,6,99,198,6,96,120,204,195,63,3,193,135,230,96,48,72,72,72,72,72,48,32,96,32,32,32,32,112,112,136,8,48,64,128,248,112,136,8,48,8,136,112,16,48,80,144,248,4755]J 16,16,248,128,240,8,8,136,112,112,128,128,240,136,136,112,248,8,16,32,64,128,128,112,136,136,112,136,136,112,112,136,136,120,8,8,112,0,0,0,0,16,0,46,0,85,0,112,0,107,4406] 0,205,0,182,0,39,0,0,0,6,48,203,192,52,128,208,48,127,192,18,0,11,176,48,0,28,128,192,192,10,48,15,240,60,0,195,240,97,0,221,176,33,176,56,0,0,0,192,192,12,4386^l 0,192,48,3,0,12,0,0,192,192,48,12,0,48,192,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,9393,192,52,128,208,48,127,192,18,0,11,176,48,0,28,128,192,192,10,48,15,240,60,0,195,240,97,0,221,176,33,176,56,0,0,0,192,192,12,4386^l 0,192,49,38,33,5553Ă 255,77,66,252,75,121,195,1,5,179,77,66,16,131,0,11,36,15,189,70,234,230,34,29,243,75,121,253,75,121,189,70,234,236,164,142,79,210,189,69,153,204,5,5,174,164,189,68,97,49,5942Bwֆ 35,53,2,74,16,38,255,153,57,182,255,1,132,247,183,255,1,182,255,3,132,247,183,255,3,182,255,35,138,8,183,255,35,52,112,16,190,77,74,206,77,78,166,192,39,13,132,252,183,255,6404C 32,190,77,76,189,68,167,32,239,49,63,38,232,53,112,57,80,82,79,83,80,69,67,84,79,82,0,66,89,32,76,69,69,32,67,72,65,80,69,76,0,40,67,41,32,67,79,80,89,82,3898C 73,71,72,84,32,49,57,56,56,0,84,89,80,69,32,79,70,32,71,65,77,69,0,82,69,71,85,76,65,82,32,32,32,32,32,32,32,32,32,32,32,32,32,80,82,65,67,84,73,67,2831DY 69,0,80,82,69,83,83,32,70,73,82,69,32,66,85,84,84,79,78,32,84,79,32,67,72,79,79,83,69,0,72,73,45,83,67,79,82,69,58,0,76,65,83,84,32,83,67,79,82,69,3324D 58,0,80,82,65,67,84,73,67,69,32,71,65,77,69,32,83,69,84,85,80,0,78,85,77,66,69,82,32,79,70,32,77,69,78,58,0,83,84,65,82,84,73,78,71,32,76,69,86,69,3296E 76,58,32,48,49,0,67,82,69,65,84,85,82,69,32,83,80,69,69,68,0,83,76,79,87,32,32,32,32,77,69,68,73,85,77,32,32,32,32,32,70,65,83,84,0,67,82,69,65,84,2998F4 85,82,69,32,73,78,84,69,76,76,73,71,69,78,67,69,0,68,85,77,66,32,32,32,32,65,86,69,82,65,71,69,32,32,32,32,83,77,65,82,84,0,80,82,69,83,83,32,70,73,3173F 82,69,32,66,85,84,84,79,78,32,84,79,32,83,84,65,82,84,0,78,69,87,32,72,73,71,72,32,83,67,79,82,69,33,0,46,32,32,82,85,66,32,69,78,68,0,32,32,32,32,3001GC& 32,32,0,0,0,0,0,0,0,0,0,0,0,0,0,84,0,0,0,0,4,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,153G0 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0H: 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0HD 0,0,0,0,0,0,0,0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,10710IN 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,12750JX 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,12750K[b 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,12750L/l 255,255,255,255,255,255,255,255,255,255,255,255,191,255,255,255,255,255,255,255,255,255,255,255,255,255,191,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,12622Lv 255,255,255,255,255,255,255,255,255,255,255,255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,3060M= 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,241,232,194,151,0,5,0,0,1,51,99,144,183,215,238,251,255,248,2508M 232,206,172,131,85,36,255,204,156,111,72,40,17,4,1,7,13,49,83,124,170,219,0,0,240,128,32,128,240,15,2,8,2,15,64,16,64,16,85,80,64,16,64,16,64,16,64,16,85,80,4007N 64,16,64,16,255,240,85,80,85,80,64,16,192,16,64,16,64,16,85,80,64,16,64,16,0,0,0,10,0,0,42,128,0,170,160,0,138,32,0,170,160,0,160,160,0,42,128,0,32,128,3418O 0,160,160,0,0,0,0,2,128,0,10,160,0,42,168,0,34,136,0,42,168,0,40,40,0,10,160,0,8,32,0,40,40,0,0,0,0,0,160,0,2,168,0,10,170,0,8,162,0,10,2270O 170,0,10,10,0,2,168,0,2,8,0,10,10,0,0,0,0,0,40,0,0,170,0,2,170,128,2,40,128,2,170,128,2,130,128,0,170,0,0,130,0,2,130,128,23,0,93,128,119,96,2649PO 221,192,119,80,93,128,22,0,0,0,0,0,0,0,255,240,170,160,170,160,170,160,255,240,0,0,0,0,0,0,0,0,0,0,255,240,85,80,85,80,85,80,255,240,0,0,0,0,0,0,4320P 0,0,0,0,0,0,0,241,224,0,241,224,0,42,128,0,170,160,0,138,32,0,170,160,0,160,160,0,42,128,0,160,160,0,0,0,0,60,120,0,60,120,0,10,160,0,42,168,0,34,3514QƆ 136,0,42,168,0,40,40,0,10,160,0,40,40,0,0,0,0,15,30,0,15,30,0,2,168,0,10,170,0,8,162,0,10,170,0,10,10,0,2,168,0,10,10,0,0,0,0,3,199,128,2006R$І 3,199,128,0,170,0,2,170,128,2,40,128,2,170,128,2,130,128,0,170,0,2,130,128,0,0,0,15,0,0,63,192,0,118,224,0,255,240,0,249,240,0,191,208,0,191,208,0,57,192,4603Rچ 0,249,240,0,0,0,0,3,192,0,15,240,0,29,184,0,63,252,0,62,124,0,47,244,0,47,244,0,14,112,0,62,124,0,0,0,0,0,240,0,3,252,0,7,110,0,15,255,0,15,3444SX 159,0,11,253,0,11,253,0,3,156,0,15,159,0,0,0,0,0,60,0,0,255,03,142,6,0,48,31,38,252,57,52,80,236,193,237,129,236,193,237,129,236,196,237,129,51,200,124,236,193,237,58180.҆ 129,236,193,237,129,236,196,237,132,53,80,57,52,80,236,129,237,193,236,129,237,193,236,129,237,196,51,200,124,236,129,237,193,236,129,237,193,236,132,237,196,53,80,57,131,28,0,52,4,196,78020܆ 128,253,77,66,68,86,68,86,243,77,66,195,2,0,31,2,53,4,84,84,196,31,49,165,57,52,16,52,4,31,48,247,77,68,116,77,68,141,211,53,4,247,77,66,246,77,68,32,38,52,43391 32,198,5,166,128,168,164,167,164,49,168,32,90,38,244,53,32,122,77,66,38,3,53,16,57,124,77,68,246,77,68,196,1,38,2,49,33,142,77,112,196,1,39,211,142,77,117,32,206,52,471326 38,189,68,236,230,97,196,3,88,134,10,52,6,52,4,236,129,253,77,63,127,77,65,53,4,93,39,12,116,77,63,118,77,64,118,77,65,90,38,244,252,77,63,168,164,232,33,237,161,182,53472 77,65,168,164,167,164,49,168,30,53,6,74,38,203,53,38,57,52,38,189,68,236,230,97,196,3,39,6,48,136,30,90,38,250,134,10,183,77,66,198,3,166,128,168,164,167,160,90,38,247,53193 49,168,29,122,77,66,38,237,53,38,57,253,75,111,48,137,0,128,191,75,113,252,75,111,189,68,236,48,169,255,96,252,75,113,189,68,236,198,6,182,75,112,132,2,39,6,198,96,49,33,56254R 48,1,49,169,0,128,16,191,77,66,247,77,68,232,132,231,132,246,77,68,48,136,32,188,77,66,35,241,57,122,75,141,39,18,252,75,147,39,3,189,70,244,252,75,143,39,85,189,70,244,56464 32,80,134,4,183,75,141,252,75,147,39,5,204,0,0,141,97,252,75,143,39,5,204,0,0,141,109,122,75,142,38,5,134,6,183,75,142,252,75,143,39,35,182,75,140,129,4,38,23,16,46505" 142,255,128,189,70,216,190,75,121,48,136,122,188,75,143,36,5,134,255,183,75,139,204,4,4,141,59,252,75,147,38,1,57,182,75,140,129,3,38,21,16,142,0,128,141,90,190,75,121,48,54466l, 5,188,75,149,37,5,134,255,183,75,139,204,3,3,253,77,68,134,6,176,75,142,198,128,61,243,75,147,190,75,149,191,75,113,32,19,253,77,68,182,75,142,74,198,128,61,243,75,143,190,599176 75,145,191,75,113,52,6,142,80,214,189,69,153,53,16,252,77,68,237,132,237,2,237,4,31,16,195,3,0,16,179,75,113,35,226,57,16,191,77,68,141,12,252,75,121,243,77,68,253,75,54347@ 121,141,1,57,252,75,121,142,78,206,189,69,153,57,142,1,244,48,31,38,252,57,134,16,32,2,134,5,52,52,142,77,51,95,169,132,25,167,128,52,1,140,77,57,39,5,79,53,1,32,44248{J 239,53,1,16,142,2,33,142,77,56,166,132,38,9,48,31,140,77,50,38,245,32,38,230,132,189,68,92,93,39,2,141,70,230,132,196,15,141,64,140,77,51,39,17,48,31,230,132,189,68,466192T 92,141,50,230,132,196,15,141,44,32,234,95,141,39,182,77,52,132,240,177,77,50,38,26,182,77,50,139,16,25,183,77,50,182,75,120,129,153,39,10,139,1,25,183,75,120,141,32,141,30,50279^ 53,52,57,52,48,142,82,125,134,7,61,48,139,198,7,166,128,167,164,49,168,32,90,38,246,53,48,49,33,57,204,28,121,142,78,206,189,69,153,246,75,120,16,142,2,60,189,68,92,93,4986:h 39,4,141,205,32,11,111,164,49,168,32,16,140,3,28,38,245,16,142,2,61,246,75,120,196,15,141,181,57,16,142,2,54,134,96,167,164,49,168,32,16,140,2,246,38,245,134,126,167,164,4980;\r 246,75,119,16,142,2,56,189,68,92,39,6,141,145,16,142,2,57,246,75,119,196,15,141,134,57,183,255,199,183,255,200,183,255,202,183,255,204,183,255,192,183,255,195,183,255,197,134,255,183,7563<| 255,34,57,183,255,198,183,255,201,183,255,203,183,255,205,183,255,192,183,255,194,183,255,196,134,7,183,255,34,57,52,48,16,142,75,231,182,75,151,52,2,236,164,142,81,78,189,69,153,49,7658< 47,106,228,38,242,53,2,252,75,152,39,6,142,81,198,189,69,153,53,48,57,182,75,189,39,250,122,75,131,39,31,16,142,76,125,174,164,39,6,204,12,12,189,68,97,49,168,16,16,140,5076= 77,29,38,237,142,7,208,48,31,38,252,57,182,75,126,76,183,75,131,16,142,76,125,236,164,39,93,142,80,74,189,69,153,166,35,38,23,206,0,128,174,164,166,137,1,0,129,12,36,27,5052>6 170,137,1,5,39,21,134,8,167,35,106,35,206,255,128,129,5,36,3,206,0,128,230,34,29,51,203,255,77,66,236,164,243,77,66,16,131,47,0,37,6,111,164,111,33,32,23,237,164,142,4939> 80,74,189,69,153,238,164,48,36,189,68,172,174,164,204,12,12,189,68,97,49,168,16,16,140,77,29,38,150,182,75,127,129,5,36,36,122,75,132,38,31,134,8,183,75,132,141,25,38,22,4829? 190,75,192,39,8,134,2,141,35,141,12,38,9,190,75,190,39,4,134,254,141,22,57,16,142,76,125,236,164,39,11,49,168,16,16,140,77,29,38,243,77,57,79,57,48,137,255,0,230,132,4779@U 234,5,38,31,175,164,167,34,134,6,167,35,238,164,48,36,189,68,172,236,164,142,80,74,189,69,153,204,12,12,174,164,189,68,97,57,182,75,134,39,250,122,75,135,38,245,198,2,247,75,6006A † 135,16,142,77,29,52,2,236,164,142,79,210,189,69,153,174,164,204,0,0,189,68,97,174,164,230,34,29,48,139,166,132,170,5,39,5,80,231,34,32,42,238,164,175,164,182,75,13,0,128,39,21,140,255,128,39,16,166,169,1,0,129,12,36,14,166,169,1,5,129,12,36,6,4004] \ 16,191,75,152,32,40,190,75,154,140,0,128,39,26,140,255,128,39,21,182,75,155,246,75,169,38,5,183,75,169,32,8,177,75,169,39,3,183,75,168,115,75,154,112,75,155,254,75,152,142,5451]f 75,156,189,68,172,252,75,152,142,78,86,189,69,153,190,75,152,204,14,14,189,68,97,57,134,10,52,2,141,7,106,228,38,250,53,2,57,182,75,198,39,3,122,75,198,189,73,98,189,70,5507^sp 9,189,68,58,189,72,89,189,61,166,189,58,151,189,67,245,189,68,164,57,79,95,142,2,0,237,129,140,48,0,38,249,142,75,133,167,128,140,77,50,38,249,189,71,2,189,71,154,189,71,5761_'z 203,182,75,126,183,75,127,183,75,125,190,75,115,206,30,8,166,128,31,137,132,15,38,23,93,38,10,31,48,198,8,76,31,3,126,67,160,189,68,92,51,197,51,197,126,67,160,129,1,38,4903_ 22,189,68,92,52,4,189,69,11,53,4,134,1,167,192,167,192,90,38,249,126,67,160,129,2,38,11,124,75,136,52,16,142,78,26,126,66,227,129,3,38,37,196,240,38,15,252,75,143,38,4788` 5,255,75,143,32,18,255,75,145,32,13,252,75,147,38,5,255,75,147,32,3,255,75,149,51,70,126,67,160,129,4,38,46,52,4,182,75,134,124,75,134,198,3,61,16,142,77,29,49,171,4773a7 239,164,53,4,134,1,196,240,38,2,134,255,167,34,52,16,134,2,183,75,135,134,5,142,79,210,126,67,53,129,5,38,31,51,201,255,0,252,75,194,38,5,255,75,194,32,3,255,75,196,5433a 51,201,1,0,134,6,52,16,142,78,46,126,66,227,129,6,38,20,52,16,134,8,142,77,122,196,240,16,39,0,142,74,142,77,142,126,66,227,129,7,38,8,255,75,123,51,70,126,67,160,4486b 129,8,38,42,16,142,75,211,236,164,39,4,49,34,32,248,239,164,31,48,52,16,142,79,190,189,69,85,53,16,204,10,10,237,193,237,193,237,200,124,237,200,126,126,67,160,129,9,38,12,55892,74,142,77,142,126,66,227,129,7,38,8,255,75,123,51,70,126,67,160,4486b 129,8,38,42,16,142,8m& 1:50,&H61FF&%"WORKING..."&A&H629A:I100184:C0:J150:M:A,M:CCM:AA1::M:CM "CHECKSUM ERROR IN LINE"I:"WAS"C"SHOULD BE"M:&(CSCSCM::CS748254"OVERALL CHECKSUM BAD.":''2"SAVE TO (T)APE OR (D)ISK";A$:A$(A$,1):A$"D"A$"d"80:A$"T"A$"t"50'P<"PRESS ENTER WHEN TAPE IS READY";B$'sFM"PROS2",&H629A,&H7334,0:90'PM"PROS2",&H629A,&H7334,0'Z"OKAY, NOW RUN SCRN1":50,&H7FFF:(od 52,16,255,75,121,79,142,78,206,126,67,53,129,11,38,27,255,75,171,189,68,123,198,1,129,128,36,2,198,255,29,253,75,173,134,14,52,16,142,79,70,32,112,129,12,38,37,183,75,189,5147)n 196,240,38,5,255,75,190,32,3,255,75,192,52,16,134,1,183,75,132,79,142,80,194,52,2,31,48,189,69,85,53,2,32,80,129,13,38,38,52,16,182,75,151,124,75,151,198,15,61,142,4747)x 75,231,48,139,239,129,189,68,123,198,1,129,128,36,2,198,255,231,132,134,13,142,77,162,32,29,129,14,38,74,255,75,152,189,68,123,198,1,129,128,37,2,198,255,29,253,75,154,134,14,5864* 52,16,142,78,86,52,2,31,48,189,69,153,53,2,53,16,31,137,237,193,237,193,237,193,129,2,39,84,129,5,39,80,129,6,39,76,129,7,38,3,204,8,8,237,200,122,237,200,124,237,5011+9 200,126,32,58,129,15,38,54,196,240,38,53,134,1,183,75,119,189,71,203,142,2,57,79,167,132,48,136,32,140,3,25,38,246,182,75,128,139,64,38,12,134,64,122,75,126,38,5,198,3,4804+ 247,75,126,183,75,128,142,84,0,191,75,115,126,65,126,191,75,117,134,6,183,75,142,134,4,183,75,141,252,75,143,39,12,190,75,145,189,69,197,204,4,4,189,70,166,252,75,147,39,12,5766, 190,75,149,189,69,197,204,3,3,189,70,144,57,182,75,139,38,23,52,16,134,5,183,77,75,183,77,77,189,73,221,134,10,183,77,77,189,73,221,53,16,134,10,183,75,198,57,182,77,47,5354-S 39,36,74,183,77,47,129,2,38,9,252,77,48,131,0,1,253,77,48,134,3,176,77,47,198,20,61,142,82,195,48,139,252,77,48,189,69,85,57,189,65,47,173,159,160,10,252,1,90,129,4895. 8,37,242,129,56,36,238,193,8,37,234,193,56,36,230,57,182,75,189,39,22,16,142,76,125,238,164,39,5,48,36,189,68,204,49,168,16,16,140,77,29,38,238,57,131,28,0,89,73,57,4853. 84,84,84,84,57,237,129,237,129,237,132,129,5,39,9,48,136,124,237,129,237,129,237,132,57,141,4,177,75,128,57,52,4,198,8,182,77,73,72,72,72,184,77,73,72,72,121,77,70,121,5401/jȆ 77,71,121,77,72,121,77,73,90,38,230,182,77,70,53,4,57,142,16,0,32,6,169,1,0,129,8,16,39,0,152,129,11,16,36,0,146,166,169,1,5,129,8,16,39,4661JX 0,136,129,11,16,36,0,130,22,0,94,140,255,128,38,13,166,169,1,0,129,7,16,38,0,112,22,0,76,166,169,0,128,129,8,38,28,166,169,0,133,129,8,38,20,182,75,187,38,10,3705Kb 182,75,108,177,75,107,39,80,36,5,142,255,128,32,32,166,169,1,0,129,7,38,65,166,169,1,5,129,7,38,57,182,75,187,38,8,182,75,107,177,75,108,36,44,142,0,128,127,75,187,4573LUl 127,75,188,32,30,142,0,1,189,68,117,37,14,189,68,117,37,9,189,68,123,132,1,39,10,32,5,189,61,149,37,3,142,255,255,191,75,173,252,75,171,142,79,70,189,69,153,182,75,130,5156Mv 39,7,16,190,75,109,126,61,75,252,75,173,16,190,75,171,49,171,166,169,1,0,170,169,1,5,16,38,0,138,182,75,174,129,1,39,6,129,255,16,38,0,204,246,75,171,196,127,193,16,5015M 16,37,0,193,193,112,16,36,0,187,190,75,171,48,137,1,21,129,1,39,3,48,136,224,166,132,16,39,0,167,129,3,37,10,129,7,39,6,129,9,16,38,0,153,190,75,171,48,11,182,3915Nc 75,174,129,1,39,3,48,136,216,134,5,183,75,109,134,11,161,132,37,127,48,6,122,75,109,38,245,76,183,75,170,182,75,139,38,12,134,2,183,77,75,74,183,77,77,189,73,221,252,75,5214O 173,88,247,75,174,190,75,171,48,139,48,136,128,191,75,171,32,119,166,169,1,0,129,5,39,71,166,169,1,5,129,5,39,63,166,164,129,12,36,57,166,37,129,12,36,51,166,169,0,128,4895O 129,12,36,43,166,169,0,133,129,12,36,35,190,75,173,140,0,128,39,21,140,255,128,39,16,166,169,1,0,129,12,36,14,166,169,1,5,129,12,36,6,16,191,75,171,32,40,190,75,173,4258P 140,0,128,39,26,140,255,128,39,21,182,75,174,246,75,188,38,5,183,75,188,32,8,177,75,188,39,3,183,75,187,115,75,173,112,75,174,254,75,171,142,75,175,189,68,172,252,75,171,142,5997Q7 79,70,189,69,153,190,75,171,204,12,12,189,68,97,57,182,75,172,132,127,246,75,122,196,127,247,75,109,177,75,109,57,190,75,152,39,6,204,14,14,189,68,97,190,75,171,39,6,204,14,5685Q 14,189,68,97,182,75,151,16,142,75,231,52,2,174,164,204,13,13,189,68,97,49,47,106,228,38,242,53,2,182,75,127,74,39,40,183,75,127,129,10,38,3,189,72,48,182,75,151,142,0,4942RƆ 200,48,31,38,252,74,38,246,252,75,152,16,39,3,40,142,1,224,48,31,38,252,126,65,33,182,75,126,183,75,127,182,75,151,122,75,129,38,3,183,75,129,142,75,231,52,2,183,75,109,5263SMІ 127,75,130,52,16,238,132,48,3,189,68,204,53,16,16,174,132,182,75,198,38,58,166,169,1,0,230,169,1,5,16,131,6,6,38,44,254,75,194,16,188,75,196,39,3,254,75,196,166,196,5133Sچ 129,12,36,23,166,69,129,12,36,17,31,50,16,191,75,109,134,255,183,75,130,189,67,211,126,63,3,16,174,132,230,2,49,165,166,169,1,0,170,169,1,5,39,36,166,169,1,0,129,5,4531T 39,28,129,12,36,24,166,169,1,5,129,5,39,16,129,12,36,12,166,164,129,12,36,6,166,37,129,12,37,8,230,2,80,231,2,126,63,46,182,75,129,177,75,109,38,85,254,75,121,166,4155U^ 201,1,3,129,5,39,74,182,75,133,186,75,140,186,75,137,38,63,189,68,117,36,58,189,68,117,36,36,182,75,205,246,75,210,16,131,8,8,39,41,31,32,196,127,182,75,122,132,127,183,5099V 75,107,241,75,107,37,18,32,12,189,68,117,36,17,189,68,123,129,128,36,4,198,255,32,2,198,1,231,2,32,43,236,132,52,16,142,77,162,189,69,153,53,16,16,190,75,109,182,75,130,4876V 38,7,16,174,132,230,2,49,165,16,175,132,236,132,52,16,142,77,162,189,69,153,53,16,238,132,52,16,48,3,189,68,172,174,228,174,132,204,13,13,189,68,97,53,16,48,15,106,228,166,5275W 228,16,38,254,204,53,2,252,75,152,16,39,1,203,189,68,86,183,75,107,252,75,121,189,68,86,183,75,108,127,75,130,254,75,152,142,75,156,189,68,204,182,75,198,38,56,16,190,75,152,6027X5 166,169,1,0,230,169,1,5,16,131,6,6,38,38,254,75,196,16,188,75,194,39,3,254,75,194,166,196,129,12,36,20,166,69,129,12,36,14,134,255,183,75,130,255,75,109,189,67,211,126,5333X 64,103,16,190,75,152,190,75,154,140,0,128,38,35,166,169,1,0,129,8,16,39,0,163,129,11,16,36,0,157,166,169,1,5,129,8,16,39,0,147,129,11,16,36,0,141,126,64,59,140,3802Y* 255,128,38,13,166,169,1,0,129,7,16,38,0,123,126,64,59,166,169,0,128,129,8,38,28,166,169,0,133,129,8,38,20,182,75,168,38,10,182,75,108,177,75,107,39,91,36,5,142,255,4426Z>4 128,32,32,166,169,1,0,129,7,38,76,166,169,1,5,129,7,38,68,182,75,168,38,8,182,75,107,177,75,108,36,55,142,0,128,127,75,168,127,75,169,32,41,189,68,117,37,12,189,68,4411Z> 123,142,0,1,129,128,36,26,32,21,182,75,153,132,127,246,75,122,196,127,247,75,109,142,0,1,177,75,109,37,3,142,255,255,191,75,154,252,75,152,142,78,86,189,69,153,182,75,130,39,5742[H 7,16,190,75,109,126,64,216,252,75,154,16,190,75,152,49,171,166,169,1,0,170,169,1,5,39,79,166,169,1,0,129,5,39,71,166,169,1,5,129,5,39,63,166,164,129,12,36,57,166,4623\SR 37,129,12,36,51,166,169,0,128,129,12,36,43,166,169,0,133,129,12,36,35,190,75,154,1408,19,246,75,122,196,127,193,3,16,37,1,85,43598T 193,121,16,36,1,79,32,83,129,8,39,79,129,10,36,75,127,75,137,52,2,134,1,183,77,75,134,6,183,77,77,189,73,221,53,2,129,3,39,4,129,4,38,47,183,75,140,32,42,182,39919x^ 75,133,38,37,190,75,121,166,132,230,5,16,131,8,8,39,24,166,137,1,0,230,137,1,5,16,131,0,0,16,39,1,2,16,131,9,9,16,39,0,128,189,73,98,189,70,9,189,72,89,3636:$h 189,61,166,189,58,151,189,67,245,182,75,139,16,38,0,225,254,75,121,182,75,137,39,47,129,8,36,43,166,201,1,0,129,3,39,16,129,4,39,12,166,201,1,5,129,3,39,4,129,4,4556:r 38,19,183,75,140,127,75,137,134,1,183,77,75,134,6,183,77,77,189,73,221,142,75,199,189,68,172,182,75,199,246,75,204,129,12,16,36,0,152,193,12,16,36,0,146,182,75,205,129,12,5401;| 16,36,0,137,182,75,210,129,12,16,36,0,128,189,68,164,126,52,14,134,50,183,77,77,134,5,183,77,75,183,75,139,252,75,121,253,75,109,142,77,122,189,69,85,189,73,221,122,77,77,5310j 189,71,154,182,75,120,139,153,25,183,75,120,189,71,154,182,75,120,38,31,142,82,62,16,142,3,172,134,7,52,2,134,9,230,128,232,164,231,160,74,38,247,49,168,23,106,228,38,238,53,5710? 2,189,65,34,182,75,120,39,6,189,68,31,126,52,7,189,65,34,189,65,34,182,75,103,16,38,249,183,142,77,62,16,142,77,56,166,164,161,132,16,37,249,168,38,13,140,77,57,16,39,4652? 249,159,48,31,49,63,32,233,142,77,51,166,128,167,5,140,77,57,38,247,189,58,37,142,28,165,198,65,134,6,231,132,48,4,92,140,29,173,36,8,74,38,243,48,136,40,32,236,142,0,5063@† 8,16,142,75,69,189,58,58,142,1,177,189,58,58,142,0,65,16,142,77,62,189,58,72,142,28,197,16,142,28,80,134,94,167,132,191,75,105,167,168,32,189,72,21,173,159,160,10,190,75,5010A3̆ 105,182,1,90,129,56,37,29,134,96,167,132,48,4,140,29,221,38,5,142,28,197,32,44,31,16,196,31,193,29,38,36,48,136,40,32,31,129,8,36,27,134,96,167,132,48,28,140,28,193,4109Aֆ 38,5,142,29,217,32,11,31,16,196,31,193,1,38,3,48,136,216,134,94,167,132,191,75,105,141,91,38,171,190,75,105,140,29,217,39,48,140,29,213,38,17,16,140,28,80,39,32,134,96,4567B 167,168,32,49,63,167,164,32,16,16,140,28,86,39,15,166,136,224,167,160,134,96,167,168,31,134,94,167,168,32,141,25,126,57,2,16,142,28,80,142,75,96,166,160,167,128,16,140,28,86,5047CO 38,246,141,3,126,50,69,189,68,123,182,255,0,132,1,39,246,57,142,56,0,182,255,0,132,1,39,6,48,31,38,245,134,255,57,198,4,247,75,105,141,66,52,16,173,159,160,10,53,16,5061C 134,3,183,75,104,198,4,182,1,90,129,21,37,18,198,2,247,75,104,198,12,129,42,37,7,198,1,247,75,104,198,23,52,4,246,75,105,141,33,53,4,247,75,105,141,12,52,16,141,174,4752D 53,16,38,194,246,75,104,57,166,133,129,96,39,7,132,191,167,133,92,32,243,57,166,133,129,96,39,249,138,64,167,133,92,32,243,142,28,0,204,96,96,237,129,140,30,0,38,249,57,142,5669Ej 1,226,16,142,74,108,48,137,28,0,166,160,39,65,138,64,167,128,32,246,48,137,28,0,51,58,255,75,105,166,164,38,10,49,63,16,188,75,105,39,34,32,242,132,240,39,16,16,188,75,4669F$ 105,39,22,166,164,68,68,68,68,139,112,167,128,166,164,49,63,132,15,139,112,167,128,32,228,134,112,167,132,57,52,2,68,68,68,68,139,48,167,128,53,2,132,15,139,48,167,132,57,254,5118F 75,171,16,39,2,246,182,75,170,16,39,0,141,74,183,75,170,142,75,175,189,68,204,252,75,171,142,79,70,189,69,153,252,75,173,190,75,171,48,137,0,128,48,139,182,75,170,129,9,37,5765G}& 4,48,137,255,0,191,75,171,129,9,16,36,2,161,166,137,1,0,39,12,129,3,37,30,129,7,39,26,129,9,39,22,166,137,1,5,16,39,2,135,129,3,37,10,129,7,39,6,129,9,3187H00 16,38,2,121,127,75,170,182,75,174,71,183,75,174,189,68,117,36,14,142,0,1,189,61,149,37,3,142,255,255,191,75,173,182,75,139,38,13,134,1,183,77,75,134,6,183,77,77,189,73,5236H: 221,126,61,121,122,75,125,39,8,142,0,250,48,31,38,252,57,182,75,126,183,75,125,252,75,171,189,68,86,183,75,107,252,75,121,189,68,86,183,75,108,127,75,130,254,75,171,142,75,175,6069ID 189,68,204,182,75,198,38,56,16,190,75,171,166,169,1,0,230,169,1,5,16,131,6,6,38,38,254,75,196,16,188,75,194,39,3,254,75,194,166,196,129,12,36,20,166,69,129,12,36,14,4986JJN 134,255,183,75,130,255,75,109,189,67,211,22,0,174,16,190,75,171,190,75,173,140,0,128,38,35,16<& 1:50,&H61FF&%"WORKING..."&A&H6200:I100184:C0:J150:M:A,M:CCM:AA1::M:CM "CHECKSUM ERROR IN LINE"I:"WAS"C"SHOULD BE"M:&(CSCSCM::CS835250"OVERALL CHECKSUM BAD.":''2"SAVE TO (T)APE OR (D)ISK";A$:A$(A$,1):A$"D"A$"d"80:A$"T"A$"t"50'P<"PRESS ENTER WHEN TAPE IS READY";B$'sFM"PROS1",&H6200,&H729A,0:90'PM"PROS1",&H6200,&H729A,0'Z"OKAY, NOW RUN PROS2":(dd 26,80,142,77,57,111,128,140,77,63,38,249,142,50,17,159,114,18,26,80,127,255,64,127,255,32,127,255,222,134,60,183,255,35,16,206,128,0,142,2,0,204,85,85,237,129,140,26,0,37,5362)n 249,189,71,250,182,255,0,132,1,38,249,189,57,165,142,50,69,159,114,16,206,128,0,189,58,37,142,84,0,191,75,115,134,4,183,75,131,74,183,75,126,183,75,120,134,64,183,75,128,134,5883)x 16,183,77,50,134,1,183,75,119,142,0,43,16,142,74,22,189,58,58,142,0,73,189,58,58,142,0,103,189,58,58,142,1,10,189,58,58,142,1,34,189,58,58,189,58,51,142,77,57,79,4245*} 170,128,140,77,63,38,249,186,75,103,39,46,142,0,161,16,142,74,136,189,58,58,142,0,193,189,58,58,142,0,173,16,142,77,62,189,58,72,142,0,205,16,142,77,56,189,58,72,142,0,4960+. 186,16,142,75,96,189,58,58,189,72,21,95,52,4,173,159,160,10,53,4,182,1,90,129,32,37,14,134,96,183,29,69,198,255,134,94,183,29,89,32,11,134,96,183,29,89,95,134,94,183,4870+ 29,69,182,255,0,132,1,38,209,247,75,103,189,57,165,246,75,103,16,39,0,211,189,58,37,16,142,74,158,142,0,6,189,58,58,142,0,97,189,58,58,142,0,161,189,58,58,142,1,9,4872, 189,58,58,142,1,36,189,58,58,142,1,101,189,58,58,142,1,132,189,58,58,173,159,160,10,182,75,120,246,1,90,193,8,36,9,139,153,25,38,15,134,153,32,11,193,56,37,7,139,1,4513-> 25,38,2,134,1,183,75,120,142,28,112,189,58,132,189,57,176,38,208,189,57,165,173,159,160,10,182,75,119,246,1,90,193,8,36,9,139,153,25,38,17,134,80,32,13,193,56,37,9,139,4844- 1,25,129,81,38,2,134,1,183,75,119,142,28,177,189,58,132,189,57,176,38,206,182,75,119,142,84,0,139,153,25,39,8,230,128,193,255,39,245,32,248,191,75,115,189,57,165,142,29,32,5511. 189,57,193,247,75,126,92,247,75,131,189,57,165,142,29,128,189,57,193,198,4,240,75,104,134,64,61,247,75,128,189,57,165,142,77,51,111,128,140,77,57,38,249,189,58,37,142,1,3,16,5838/dȆ 142,75,42,189,58,58,182,255,0,132,1,38,249,189,57,165,189,71,250,16,206,128,0,189,65,80,142,255,0,134,251,167,2,166,132,132,64,38,6,183,75,120,126,56,84,134,253,167,2,166,58810҆ 132,132,64,38,10,134,254,167,2,166,132,132,64,38,246,182,75,151,16,142,75,231,52,2,238,164,48,35,189,68,204,49,47,106,228,38,243,53,2,254,75,152,39,6,142,75,156,189,68,204,57090܆ 254,75,171,39,6,142,75,175,189,68,204,189,68,58,182,75,198,39,3,122,75,198,182,75,137,39,34,74,183,75,137,16,39,3,138,246,75,138,190,75,121,48,133,129,8,39,11,36,6,48,50401{ 137,0,128,32,3,48,136,128,126,54,1,127,75,138,173,159,160,10,26,80,190,75,121,182,75,198,38,34,166,137,1,0,230,137,1,5,16,131,6,6,38,20,31,18,190,75,196,16,188,75,43372* 194,39,3,190,75,194,189,67,211,126,54,1,246,1,91,193,8,36,99,246,75,133,39,59,127,75,133,204,1,1,237,132,237,2,237,4,198,3,31,19,189,69,11,48,136,128,122,75,136,38,51622 62,52,16,190,75,123,204,9,9,237,132,237,2,237,4,252,75,123,142,78,66,189,69,85,134,80,189,71,2,53,16,32,30,166,132,230,5,16,131,8,8,39,20,166,137,0,128,230,137,0,48283y 133,16,131,7,7,39,6,16,131,8,8,38,96,48,136,128,32,44,182,75,133,16,38,0,200,246,1,91,193,56,37,77,166,137,1,0,230,137,1,5,16,131,0,0,39,12,16,131,7,7,34054 39,6,16,131,8,8,38,18,48,137,0,128,52,16,142,0,160,48,31,38,252,53,16,126,54,1,16,131,2,2,38,27,134,255,183,75,133,189,71,0,48,137,1,0,52,16,31,16,142,78,33434 26,189,69,85,53,16,126,54,1,166,137,1,0,129,9,39,20,74,129,7,37,15,166,137,1,5,129,9,39,7,74,129,7,16,36,1,98,182,1,90,129,8,36,9,48,31,198,254,247,75,35445l" 138,32,11,129,56,37,7,48,1,198,2,247,75,138,182,255,0,132,1,38,54,16,190,75,121,166,169,1,0,230,169,1,5,16,131,0,0,39,36,127,75,140,134,12,183,75,137,246,75,138,44886, 29,190,75,121,48,139,48,136,128,52,16,134,2,183,77,75,74,183,77,77,189,73,221,53,16,188,75,121,16,39,0,125,52,16,189,70,234,53,16,191,75,121,134,10,161,132,39,8,161,3,464566 39,4,161,5,38,98,16,142,75,211,252,75,121,163,164,195,0,5,16,131,0,9,37,10,49,34,16,140,75,231,38,234,32,70,174,164,191,77,48,204,0,0,237,132,237,2,237,137,0,128,48547@ 237,137,0,130,237,164,134,4,183,77,47,189,70,252,182,75,127,129,11,36,3,189,72,48,182,75,128,67,128,31,183,75,127,134,2,183,77,75,134,15,183,77,77,189,73,221,134,5,183,77,55688,J 77,189,73,221,189,70,234,182,75,137,39,87,190,75,121,129,8,36,20,166,137,1,0,39,8,129,8,39,4,129,10,37,33,166,137,1,5,3T WORD DO NOT CHANGE SCORE, BUT EXECUTE REPEAT PROCEDURE8x J1 TT1 : *** T --> NO. OF ORIGINAL WORDS ASKED SO FAR8*PST100: : *** P --> % ... S --> NO. CORRECT (FIRST TRY ONLY)84A$"TRY AGGIN LAITER":1430:9?>KK1:R(K)I:KKKK1 : *** IF 3 WRONG TRIES, SPELL OUT AND SAVE FOR LATER REPEAT IN R(K)9jHA$"HERE IS THE ANNSER":XB2800:14509RB$" ":A$W$(2,I)" IS SPELLED ":1430:15609\2:X8(W$(1,I)):@193,(31," ");:_f X91 X8:A$(W$(1,I),X9,1):B$B$" "A$:@192,B$;:XB800:1450: X9:X9400 : *** VERBALLY SPELLS OUT WORD WITH TIMED DELAY AFTER EACH LETTER:rp@293,W$(1,I);:zA$W$(2,I)" NOW REMEMBER THAET":1430 : *** REPRONOUNCES WORD AFTER SPELLING OUT VERBALLY:B$"":;!65494,0:1000 : *** TEST IS COMPLETE -->SUMMARIZE RESULTS;KA$"CONGRATULATIONS":@392,A$;:1430;rA$"U COMPLEETED THEE TEST":1430;PP(P.5):@448, Z$;S,T,P;ENS:1190:S$E$;ENT:1190:T$E$;ENPP:1190:PP$E$<6A$"YOUR SCORE IS "S$" UV A POSSIBLE "T$" 4 A FI NUL GRADE UV "PP$" PERCENT":1430<<ފ<`:200,1: : *** CLS WITH BEEP<: *** CONGRATULATORY REMARKS<C$(1)"OUT STANDEENG"<C$(2)"VERY GOOD KEEP GOEENG"<C$(3)"YOUR ABOUT REDDEE 4 THE NEXT LEFVEL NOW"="C$(4)"SEEMS LIKE U HAFVE THAT 1 DOWN NOW"=K$C$(5)"WAY 2 GO FAR OUT EARTHLEENG"=.C$(6)"DARTH VAIDER ONLY WISHEZ HE COULD SPELL THAET WELL"=8C$(7)"WILL MIRRAKULLS NEFVER SEESS"=BC$(8)"NOW THATSS THE WAY 2 DO THIS GAME"=L: *** CHIDING REMARKS>8VD$(1)"HOO R U TRYEENG 2 KID THIS IZ SERIOUS BIZZENESS">p`D$(2)"I CAN C WE R GOEENG 2 HAFV 2 WORK ON THIS 1">jD$(3)"ARNT U ABOUT REDDY 2 TRY 4 REEL">tD$(4)"NOPE TRY AGGIN">~D$(5)"KEENG UV THE SPELLING BEEZ YOUR NOT"?"D$(6)"I WOE NNT COUNT THAET 1 IF U GIFV ME 5 BUCKSS"?^D$(8)"I CAN DO BETTER THAN THAET WITHOUT PRO GRAMMING"?d?: *** ROUTINE TO PRONOUNCE NUMBERS > 9 PROPERLY?ED(EN10):ER(EN10ED.5)? ER0 ER$"": ER$(ER)?ą ER0 ED1 E$"TEN":@7Έ ED 1250,1320,1330,1340,1350,1360,1370,1380,1390,1400@IED$"":1410@ ER 1260,1270,1280,1290,1300,1310,1310,1310,1310,@E$"ELEVEN":@E$"TWELVE":@E$"THIRTEEN":@ E$"FOURTEEN":@E$"FIFTEEN":@E$ER$"TEEN":A(ED$"TWENTY":1410A&2ED$"THIRTY":1410A= TEST OR PRACTICE(x#1(: *** CHANGE FILE NAME TO EXECUTE)81000:@192,"SELECTED TEST IS: ";F$;:@268,"FOR ";TP$(TP);:@352,"change file?";)h Y1300 : *** SHORT INTERRUPT-LIKE DELAY)Y$: Y$"Y"170: Y:190*1000:@17,"--------";:@49,"/TST ASSUMED";:@0,"";:"enter file name: ";F$:F$F$"/TST" : *** CHANGES FILE NAME*v@330,"TEST OR PRACTICE?";:@367,"<1> test";:@399,"<2> practice";:1570:TP(Y$): TP1 TP2 120,3:180*: *** LOAD SPELLING WORDS FROM F$*J0:"D",#1,F$,51*#1,20 B$(1),20 B$(2),11 B$(3)*E(1)* I1 E+1#1,I:W$(1,I)B$(1):W$(2,I)B$(2):W$(3,I)B$(3): I+9#1+: *** DISPLAY NOTE TO EXPLAIN PROCEDURE TO ASK COCO FOR WORD REPEAT+4:200,1: X9412:@32X98,(16," ");: X9+@171,"n o t e";,G"@232,"YOU MAY ASK TO";:@264,"HAVE ANY WORD";:@296,"REPRONOUNCED AT";:@328,"ANYTIME ....";:@393,"JUST PRESS <^>";,Z,XB1200:1560,v6: *** COMMENCE SESSION,@: 1000:A$"O K WE WILL START NOW":1440:XB1000:1560-JENE:1190:A$"THIS TEST HAS "E$" WORDSS GET READY":1430:1000-*TZ$"score = ### out of ### = ###.# %"-^65495,0:K0:S0:T0:P0:KK0:1020 : *** SPEEDUP POKE AND INITIALIZE VARIABLES-h I1 E.rC1C1C:C0 : *** C1 --> TOTAL NO. REPEAT REQUESTS THIS SESSION ... C --> NO. REPEAT REQUESTS PREVIOUS WORD (IF ANY), SO MUST BE RESET TO 0.V|: *** SHORTEN WORD OF BLANK SPACES AT END, IF ANY. X92011: (W$(1,I),X9,1)" " W$(1,I)(W$(1,I),X9): X9.: *** SAME FOR PRONUNCIATION/ X92011: (W$(2,I),X9,1)" " W$(2,I)(W$(2,I),X9): X9/?: *** LL --> COUNT OF WORDS TO REDO (IF PRACTICE)/WIII:LL0:J1:C$""/: *** IF ANY REPEATS EXIST (I.E.- KK<>0), THEN 1 IN 10 CHANCE, ONE OF THEM WILL BE ASKED HERE (NO CREDIT BASIS), UNLESS A GRADED EXAM0… KK0460: R(99): R89 R(K):IR(R):LL10TB$"": : *** RESET INPUT STRING VARIABLE (B$) TO NULL0fև Z$;S,T,P;0@163,C$; : *** C$ IS SET TO LAST INCORRECT SPELLING OF THIS WORD (IF ANY)0ꁦ1560:A$"SPELL":1450:A$W$(2,I):14200100,11N@256,"ANSWER: ";B$;:Y$ : *** PRINTS CURRENT ENTRY FOR THE ANSWER AND CLEARS KEYBOARD1Y$: Y$""520: Y(Y$) : *** WAIT ON KEYSTROKE2 Y64 Y91 B$B$Y$:240,1:510: Y$(8)570: Y$(94) CC1:1450:510: Y$(13)580: 100,1:51023: *** CHR$(8) --> BACKSPACE (LEFT ARROW)2k&: *** CHR$(94) --> REPEAT PRONUNCIATION (UP ARROW)20: *** C --> NO. OF REPEAT REQUESTS THIS WORD2:B(B$): B1500: B$(B$,B1):@256,(32," "):5003>DB(B$): (B$,1)" " B$(B$,B1): 580 : *** DELETES BLANKS FROM START OF WORD, IF ANY3NB(B$): (B$,1)" " B$(B$,B1):590 : *** DELETES ANY BLANKS FROM END OF ANSWER3X B$W$(1,I) C$"":720:620 : *** BRANCH IF CORRECT ANSWER4b770: TP1650: LL1620: JJ1:J4830:4604}l JJ2 1560: : *** JJ --> THIS IS A WORD REPEATED DUE TO PREVIOUS FAILURE IN THREE TRIES5v LL1 IIII1 : *** LL=1 --> WORD WAS BEING REPEATED BY RANDOM SELECTION,SO NOW MUST RESET 'I' TO ONE LESS TO GET WORD THAT WOULD HAVE BEEN STATED5) TP1 III5q I: TP1910 : *** DO NOT REPEATY WORDS IF THIS IS A GRADED EXAM5 KK0910 : *** NO REPEATS LEFT SINCE K<=05 KK1 A$"JUST 1 WORD LEFT": A$"SEEMS WE HAVE A FEW WORDS LEFT":1430:LL167 X1 K : *** K --> NO. WORDS TO REPEAT AFTER FIRST PASS6N:IR(X): I09106fLL1:JJ2:460: X6wƁ1560:9106D(8):A$C$(D):1430 : *** RIGHT ANSWER - GIVE CONGRATULATIONS7څ LL0 J1740:750 : *** IF REPEAT WORD, DO NOT CHANGE SCORE7TT1:SS1:PST100:7MA$"U FINE ULLY GOT THAET 1 RIGHT":14307bKKKK1:R(K)0:7D(8):C$B$" was wrong!": TP1 A$"RONG THATSS"(J):14307 A$D$(D):1430 : *** STATE CHIDING PHRASE87 LL1 TP1820 : *** IF REPEA1: I0238$dHYHY9: HY3623:988<eNSU2: N4 NN48Tf NHS SUHS 238fgHII:YC(F)HY8hJJ1:CO(T,J)CO(F,I):CO(F,I)0:II1: CO(F,I)01048iIHI:XCF4433: CO(F,1)0 (XC,45)(XC32,183),,BF8j218k HY45 YC(F)HY99l(XC,HY)(XC32,183),,BF:I209JmII1: I0 YC(F)45:YC45:17:1129^n CO(F,I)01099oCACO(F,I):11:YCYC(F):189pJHJ:YC(T)YC(T)9:XCT44339q CO(T,J)0349rYC(T)YC(T)9:CACO(T,J):11:YCYC(T):17:18:JJ1:113:sI20:HYYC(F):tII1: I023:/u CO(F,I)0116:QvCACO(F,I):11: RA13 121:dwII1: I023:xHYHY9: HY3623:118:yYC(T)45:YC(F)45:HII:J0:XCF4433:(XC,45)(XC32,183),,BF:XCT4433:YC45;HzJJ1:CO(T,J)CO(F,I):CO(F,I)0:CACO(T,J):11:18:II1: CO(F,I)0123: YC(T)YC(T)9:YCYC(T):17:122;{XCF4433:IHI1: CO(F,1)0 YC45:17:22:34;| CO(F,2)0 22;}CACO(F,I):11:YCYC(F):18;~II1: CO(F,I)034: CO(F,I)0:126;: Start of left-arrow.<,"BM192,13;H4E4D2R5D4L5D2": DE(1)123YS$(1)"BR2H3UERFERFDG3U3GU2GUR4DLD":S$(2)"R3HUEFU3GHEL3FGHD3EFD2U4RDL":S$(3)"BU3F2E2H2G2R3HD2":S$(4)"BRR2LU2L2R4UL4E2FL"?'C$(1)"HUH2UH2UH2UHU3EUE2R3F2E2R3F2DFD3GDG2DG2DG2DG":C$(2)"L3ER2HU5G3L3H2U3E2R3FEH2U3E2R3F2D3G2FER3F2D3G2L3H3D5F2L2":C$(3)"H3UH2UH3E3UE2UE3F3DF2DF3G3DG2DG3":C$(4)"L2EU7G3L2H2U4EUE7F7DFD4G2L2H3D7FL2"?-?0::"YOU PRESSED BREAK"::"PRESS ENTER TO CONTINUE GAME"::"PRESS SPACEBAR TO STOP"?Z$:Z$" " :Z$(13)59078,51:2:65434,8:38 :136?XC186:YC0:17:F17:I20@ CO(F,I)0 II1 : P(F)I:140@" I0138@(@L ST(1)ST(2)ST(3)ST(4)5239@[ "Q"5@wF17:IP(F): I0150@CACO(F,I):NCA:11: RAST(SU)1150@XCF4433:YCYC(F):17@CO(F,I)0: YC(F)45 YC(F)YC(F)9A CO(F,1)0 YC45:17:149A:CACO(F,I1):11:YCYC(F):18:P(F)P(F)1AsCAN:11:ST(SU)ST(SU)1:XCSU4433:YC0:17:18A:141F,I):NCA:11: RAST(SU)1150@XCF4433:YCYC(F):17@CO(F,I)0: YC(F)45 YC(F)YC(F)9A CO(F,1)0 YC450):NEXTP 790 PRINT " PRESS ANY KEY TO RETURN TO FIRST PAGE OF MENU" 800 PRINT "PRESS ^ (UP ARROW) TO EXIT MENU"; 810 XX$=INKEY$:IF XX$=CHR$(94) THEN CLS:END ELSE IF XX$=""THEN810ELSE650 820 PRINTSTRING$(32,45); 1000 DATA "OCTOBER" 1010 DATA " (22) HORROR"," (27) SCROLL"," (29) QUEENS"," (32) SCRNDMP"," (36) SCRNDMPS"," (38) LP78DMPS"," (39) TESTSCRN"," (46) ENERGY" 1020 DATA " (50) GRAFTRAN"," (63) DESKTOPL"," (68) DESKTOPH"," (72) GENFONT1"," (75) GENFONT2"," (78) FUNFACE"," (79) MARTIAN"," (80) COCOART"," (81) MIRORPIX" 1030 DATA " (82) P178&GL"," (82) WINDCHIL"," (83) FOOTBALL"," (95) CCBLITZ"," (99) MENUGEN"," (99) COCODRAW","(103) 3DLETTER","(107) READPROG","(118) ANIMATE","(124) PICTBOOK" 9999 DATA END ," (78) FUNFACE"," (79) MARTIAN"," (80&::0:40:135:&HF80F,0:&HF84F,0:&HF89C,0:0,0:2,28:4,2:3:65497,0:DE(52),CO(7,20),C$(4),S$(4),N$(14),YC(7),ST(4):R():130:24&N$: N$""6:&(272,9)(286,32),,BF:N1(D10):N2DN110: N21 N214' N11 N114'1 N1010:"BM272,32;XN$(N1);BR4XN$(N2);":'L "BM272,32;XN$(N2);":'f CA14 RACA:SU1:' CA27 RACA13:SU2:' CA40 RACA26:SU3:'RACA39:SU4:'(XC,YC)(XC11,YC1),,B:'(231,0)(263,39),,BF:((XC,YC)(XC32,YC39),,BF:(SU1SU3(XC,YC)(XC32,YC39),,B:3,2:"BM"(XC5)","(YC8)"XN$(RA);":"BM"(XC24)","(YC8)"XS$(SU);":"BM"(XC17)","(YC32)"XC$(SU);":4,2:(XC11,YC22),3,3)SU2SU4(XC,YC)(XC32,YC39),,B:12,2:"BM"(XC5)","(YC8)"XN$(RA);":"BM"(XC24)","(YC8)"XS$(SU);":"BM"(XC17)","(YC32)"XC$(SU);":4,2:(XC11,YC22),12,12)) CO(F,1)0 CO(F,2)022:)(XC,43)(XC32,44),,B:*'XC186:YC1:17:"BM195,20;U6F4D2U6BR5R2FD4GL2HU4E":N1500::17:34*11,0:3,2:"S O L I T A I R E";:11,1:"*****************":1,4:1,2:"PRESS: - SPACEBAR -";:3,2:1,5:"TO DISPLAY YOUR NEXT CARD":1,7:1,2:"- DOWN ARROW AND COLUMN NUMBER -";:3,2+1,8:"TO MOVE CARDS FROM DISPLAY TO COLUMNS":1,10:1,2:"- LEFT ARROW -";:3,2:1,11:"TO MOVE CARD FROM DISPLAY TO TOP STACK":1,13:1,2:"- UP ARROW AND COLUMN NUMBER -";:3,2,1,14:"TO MOVE CARD FROM COLUMN TO TOP STACK":1,16:1,2:"- RIGHT ARROW AND COLUMN NUMBERS -";:3,2,1,17:"TO MOVE CARDS FROM COLUMN TO COLUMN":6,20:7,0:"PRESS [Q] TO QUIT AT ANY TIME";:3,2:3,21:7,0:"MOVE ALL CARDS TO TOP STACK TO WIN";:3,2:3,23:3,2,B:"DECK BEING SHUFFLED";:3,2-I14:ST(I)0::I17:YC(I)45:J120:CO(I,J)0::-I152:DE(I)I::I152:J(52):NDE(J):DE(J)DE(I):DE(I)N::3,23:"DECK BEING SHUFFLED";:3,2,B:25,23:3,2,B:"PRESS ";:3,2:6:3,2-2:65434,8:2:4,2:59078,141. "BM26,190;XN$(14);":J26:I27:JJ44:"BM"(J)",190;XN$(I);":. J0:K24:I17:JJ1: N1 J:KK1:CO(I,N)DE(K):DE(K)1:::XC33:YC45:I17:CACO(I,I):11:XCXC44:18: I1 : (XC,43)(XC32,44),,B:.!CADE(3):11:XC231:YC0:18:D3:7." DE(1)037/ #N0:I2829244:(I,43)4 I292:N1/$: N0137/e%XC186:YC1:17:ST(1)ST(2)ST(3)ST(4)5239: XC187:YC15:15/&6: N$"Q"5: N$(32)41: N$(10)62: N$(9)85: N$(94)48: N$(8)128:380c'"BM122,110;F4NE4D6BR10H2U6E2R4F2D6G2NL4BR9H2U8BR8D8G2NL3BR3BE10D7F3E2F2E3U7BR7D10BR7U10F8D2U10":Z110:180,1:Z:(14,17),"PRESS ANY KEY":6:0}(: Start of spacebar.0)"BM188,13;E4NL4NH4NU4NE4NR4NF4D4":XC231:YC0:170* DE(1)1230+DD3: DE(D)0460,DD1: DE(D)0461$-DD1: DE(D)0 D0:XC231:YC0:17:421P.CADE(D):11:XC231:YC0:18:7:341i/: Start of up-arrow10"BM191,13;U5L2E4F4L2D5L4":XC204:YC15:15116: N$"Q"34: N$"1" N$"7"4912F(N$): COL(F,1)02313 F1 F1424I20:"BM207,13;XN$(F);": F14 F12D5II1: CO(F,I)053: CACO(F,I):112Z6 RAST(SU)12327ST(SU)ST(SU)1:XCSU4433:YC0:17:1828XCF4433:YCYC(F):1729CO(F,I)0: YC(F)45 YC(F)YC(F)92:212; CO(F,1)0 YC45:17:343!"BM193,13;H4R2U5R4D5R2G4": DECK(1)1233?CADE(D):11: RA1703@ 163AST(SU)ST(SU)1:XCSU4433:YC0:17:183B D0464CID:DD1:CADE(D):11:XC231:YC0:7: D0 184'D DE(I1)1 DE(I)1:344DEDE(I)DE(I1):II1:684ZFXC204:YC15:154G6: N$"Q"34: N$"1" N$"7"714HF(N$): F1 F144I"BM207,13;XN$(F);": F14 F14J RA13 CO(F,1)0235%K RA13 CO(F,1)0 16:CO(F,1)DE(D):XCF4433:YCYC(F):18:665:LC1RA:S1SU:I205MM CO(F,1)0235fNII1: CO(F,I)0785OCACO(F,I):11:NSU2: N4 NN45P NS1 SUS1 235Q C1RA1 235R166SYC(F)YC(F)9:XCF4433:YCYC(F):17:CO(F,I1)DE(D):CADE(D):11:18:6663T: Start of right-arrow.6dU"BM188,11;U4R5U2F4G4U2L5":XC204:YC15:156V6: N$"Q"34: N$"1" N$"7"866WF(N$): F1 F146X"BM207,13;XN$(F);": F14 F16YXC186:YC30:157 Z6: N$"Q"34: N$"1" N$"7"907"[T(N$): T1 T147F\"BM190,28;XN$(T);": T14 T17_]J20: CO(T,1)01157y^JJ1: COL(T,J)0947_CACO(T,J):11:HRRA:HSSU:HYYC(F):HJJ:I207`II1: I0237a CO(F,I)0967bCACO(F,I):11: HRRA1 1018 cII" (84) SCRN2"," (88) MAKEPROS"/'. END).9& SL$,R.J "DECEMBER". " (24) TREEPUZZ"," (30) HIPMAS"," (38) SOLTAIR3"," (46) ROMRAM"," (46) SETHELP"," (47) SPELLER"," (49) TAKETEST"/ " (58)*PROS"," (60) PROS1"," (72) PROS2"," (77) SCRN1",XREF","(182) COMMANDO"0. END) FILESRCH"/ "(102) LOADER","(103) CADPRINT","(108) RESTORE","(117) ROBOCISE","(135) WHO AM I"/ "(146) TIN EAR","(147) KOLAROLA","(150) SUBTRACT","(162) SUPERCLS","(166) SOUND 2"0$ "(167) SOUNDGEN","(172) &::@69,"CHRISTMAS TREE PUZZLE":@200,"BY MIKE MOORE"&J 1::X05&xY05:(30X,30Y)(30X30,30Y30),,B&Y,X&#1,1&(P(5,5),T(9),C(4)&2"BM15,177C2U6L6E6L6E6L4E4R4F4L4F6L6F6L6D6L4&<(17,170),2,2:(2,152)(28,178),T,G'F(152,2)(178,28),T,'3PI05:J05:P(I,J)1:J,I'IZP(0,5)2:P(5,0)2'Sd730'ynS$"*PD^"(10)(9)(8)"RQ"'sR75:D75'x720'(S$,)130,140,150,160,170,180,190,200,210:130'X(R15)30:Y(D15)30:P(X,Y)1200,2:130( (R13,D13)(R13,D13),T,(JPP1:P10P(X,Y)2:730:115:500(~X(R15)30:Y(D15)30:P(X,Y)2200,2:130( (X5Y0)(X0Y5)250,3:130:PP1(P(X,Y)1:X05:Y05)P(X,Y)2P(X,Y)1:C30X2:D30Y2:(C,D)(C26,D26),,BF)Y,X:730:115);720:D15DD30:D165)E120)c720:D165DD30:D15)m120)720:R165RR30:R15)120)720:R15RR30:R165)Á120)ȁ220:A :1,1:130)ҁ220:A :1,1:130* ܞ:@233,"SURE(Y/N)"*.A("*NY",)2:A0230:*["T20ABCDABCDABCD"::@233,"WELL DONE!!"*tI0500::""*1,1:I0999::500*(R2,D)(R6,D),T,:(R2,D4)(R2,D4),T,:*ڀJ05*I05*P(I,J)2800*I,J:+P(X,Y)0:C30X2:D30Y2+1 (C,D)(C26,D26),,BF+7+D I5850+U*YJ:XI15+g4P(X,Y)2840+>X05:P(X,Y)770+H+RJ5+\UJ15+fA05+pP(A,U)2960+zAB(AI):AB0ABUJ SU1:SA(AI):920,AB2(UJ) SU1:SA2(AI):920,<UJAB2960: SU2:SA(AI),HXI:YJ,{XXSA:YYSU:X0X6Y6P(X,Y)770:930,XI:YJ,XXSA:YYSU:X0X6Y0P(X,Y)770:950,A,U:,ʿ1,1:X2:Y5:U0:980,P10:Y4:980:X4:980-Y1:X1:980:Y3:980-4X0:980:730:115-zP(X,Y)2:(30X2,30Y2)(30X28,30Y28),T,:AX:XY:YA:U1U-ޅU 980:XXSA:YYSU:X0X6Y0P(X,Y)770:950,A,U:,ʿ1,1:X2:Y5:U0:980,P10:Y4:980:X4:980????????? OHH???? OHH?? OHH????C J2C???<C J2C???? C J2C???<?C J2C?? TO CONTINUE";+JX$:X$""330+TX$" "370+^I114:X$B$(I)500+hI:330+r 330,|: " (XX)= PAGE NUMBER OF LISTING",",OP1524:B$(P)A$(P),B$(10P)A$(P10):P, " PRESS TO RETURN TO FIRST PAGE OF MENU", " PRESS ^ (UP ARROW) FOR ";,XX$: XX$""430,XX$(94) ::,…XX$" "240-̀I15 NP:XX$B$(I)500-$֋I:430-3XX$430-=ꁥ240-]Q$A$(I):(Q$,1)"*"540-:@138,"SORRY, BUT"::8)Q$::" IS A MACHINE LANGUAGE PROGRAM.".:" THE MENU PROGRAM HAS NOW BEEN CLEARED SO YOU MAY THE PROGRAM BY ITS FILENAME.". .-Q(Q$):QQ6:SL$(Q$,Q).9& SL$,R.J "DECEMBER". " (24) TREEPUZZ"," (30) HIPMAS"," (38) SOLTAIR3"," (46) ROMRAM"," (46) SETHELP"," (47) SPELLER"," (49) TAKETEST"/ " (58)*PROS"," (60) PROS1"," (72) PROS2"," (77) SCRN1",𕚟𥪀 ꀰꀯ𥪀紀Я匆𯀥𠯥Я    $%'(,-/012345789:;<>?@AB FALSOFT PRESENTS! RAINBOW" ON # DISK  MENU BAS-TREEPUZZBASHIPMAS BAS&SOLTAIR3BASROMRAM BAS)VSETHELP BAS*SPELLER BAS+TAKETESTBAS&PROS BIN.PROS1 BASPROS2 BAS pSCRN1 BAS6SCRN2 BAS=MAKEPROSBAS߀߀셀߀ꀀڀ߀ڀ߀ڀ߀ꀀ ڀ߀ꀀڀ߀ꀀڀ߀ꀀ󀓟 ÀππĀ΀̀π̀ʀʀπʀππππʀʀπππڀ߀ꀀڀ߀ꀀ󀓟 ÀππĀ΀̀π̀ʀʀπʀππππʀʀππ???????????? 0 0 0?&J L120:5:0:5:0:5:7:L:"T2O4L8.A-L16G-L8FL8E-L8D-L8E-L8FL8D-"&UX17&4:0:4:0:"T80O5L16D-O4L16G-L16FL16D-"&(X&23,1:2:1,0&<"BM88,36D20R8U20L8BR16D8R8D12R8U12R8U8L22BR30D8R4D4R2U12L6BR36L22D8F4L4D8R22U6H6R6U8"'F"BM2,84D20R22U8L14U6R14U8L22D2BU2BR30D22R8U8R10D8R8U22L8D8L10U8L8BR34D22R8U8F8R8U4H9R8U9L22BR30D22R8U22L8BR36L22D9F4L4D9R22U7H6R6U8BU1BR8D9R8D13R8U13R8U9L24BR30D22R8U8F5E5D8R8U22L8G5H5L8BR32D22R8U8R6D8R8U22L22BR7BD5D4R6U4L6"(P"BM230,82D9F4L4D9R22U8H5R6U9L22"(Z(90,38),4,4(%d(124,39),4,4(7n(140,39),4,4(Ix(164,39),4,4(Y(8,88),4,4(j(36,88),4,4({(80,88),4,4((102,88),4,4((128,88),4,4((160,88),4,4((190,88),4,4((218,88),4,4((250,88),4,4(܀P12000:P)8:@41,"hip xmas songs";:@106,"for a merry";:@169,"*** HIPMAS ***";:@239,"by";:@268,"VAL BURKE";:@324,"press <1> <2> <3> or <4>";)I$:I$""231)I$"1"1000)I$"2"2000)I$"3"3000)I$"4"4000*NI$"1"I$"2"I$"3"I$"4"200,5:@384,"<1> thru <4> ONLY.";:@416,"press TYPE &"*X250*h4,1::1,1*"BM128,4G20R12G30R12G50R70D20R8U20R70H50R12H30R12H20"*(128,72),5,5*"BM 0,148E16R8D4F8R4E20R20E8R4F10R4E16R42F50R10F4R20F16"+(2,172),5,5+S11200:S+ $P13+/.(24,12),3+>8(36,32),3+MB(56,24),2+[L(96,6),1+kV(176,30),3+{`(200,20),3+j(228,16),2+t(244,4)(244,5),+~(252,8)(252,9),+NS1800:NS:+P,"BM128,4G20R12G30R12G50R70D20R8U20R70H50R12H30R12H20",!(128,72),5,5,"BM12,12D12BU12R2F4R2E4R2D12BR8U12R8BL8BD6R8BL8BD6R8BR8U12R8D6L8F6BR10U12R8D6L6F6BR10BU12F4D8BU8E4","BM176,12F12BU12G12BR20U12R2F4R2E4R2D12BR8U12R8D6L8BR8D6BR8BU12BR8L8D6R8D6L8",ĀB1100:B-/"O2T2L8E-O1P8L8B-O2P16P32L16E-P16L16E-L16DP16L16CO1P16L16B-"-"P16O2T2L4L8GP4P8L8G+L8GL16.G-L16GP16L2G+P16L16.AL16A+P16O1L16B-P16L16B-L16AP16L8A-P16P32O3L16CL16.DL16D+P16L64DL64E-L64EL8.FL32.E-L32.DL32.E-L32.DL32.CL32.DL32.CO2L8.B-"."O1P16P32L8B-O2P8L16E-L16L16E-L16DP16L16CO1P16L16B-P16O4T2L16B-L16A-L16GL16FL16E-L16DL16CO3L16B-L16A-L16GL16FL16E-L16FL16GL16A-L16B-O4L16CL16DL16E-L16FL16GL16G+L16GL16E-L8B-L32.G-L32.E-O3L32.BO4L16.B-L16A-"/5"P16P32O4T2L8.GL16GL16GL16.GP64L16G+P16L16.GP16L16FP16L16.E-L4.FP8P32L4B-V25L64AL64A-L64GL64G-L64FL64EL64E-L64DL64D-L64CV15"/K؀B1200:B:230/[3,1::1,0/q(128,96),50,,.250"BM78,96E25U2R1U2R1U2R1U2R1U2R1U2R1U2R1U2R1U2R1U2R1U2R1U2R1U2R1U2R1U1R1U1R1U1R1U1R1U1R1U1R9D1R1D1R1D1R1D1R1D2R1D2R1D2R1D2R1D2R1D2R1D2R1D2R1D2R1D2R1D2R1D2R1D2R2D2R2D2"00"BM178,96H25"0Q"BM129,96D13F4D2G4L2H4U2E4"0c(126,94),4,40v (126,110),4,40(124,56),3,40 (40,140),30,,.251]*"BM12,140E15U2R1U2R1U2R1U2R1U2R1U2R1U2R1U1R1U1R1U1R1U1R1U1R1U1R3D1R1D1R1D1R1D1R1D1R1D1R1D2R1D2R1D2R1D2R1D2R1D2R1D2R1D1R1D1R1D1R1D1R1D1R1D1R1D1R1D1R1D1R1D1R1D1R1BL26BD2D10F3D2G3L2H3U2E3"1o4(40,116),2,41>(38,138),4,41H(38,150),4,41R(216,140),30,,.252y\"BM188,140E15U2R1U2R1U2R1U2R1U2R1U2R1U2R1U1R1U1R1U1R1U1R1U1R1U1R3D1R1D1R1D1R1D1R1D1R1D1R1D2R1D2R1D2R1D2R1D2R1D2R1D2R1D1R1D1R1D1R1D1R1R1R1D1R1D1R1D1R1D1R1D1R1D1R1D1R1D1R1D1R1D1R1BL29BD2D7F3D2G3L2H3U2E3"2f(220,116),2,42p(220,140),4,42z(216,150),4,42P1500:P:(4,4),2,43"T3O1L16DL4GL4FL4EL4A+L4AL4D+L4DP4O3L8BP8L8BP8L4BP4L8BP8L8BP8L4BP4L8BP8O4L8DO3P8L8GP8L8AP8L2BP2O4L9CL9DL9CO3L9BL9AL9GL9F+L9DL64B-L8BP9L64B-L8BL8AL8GP9L16BP8L16BL16BP8L8AP8L8AP8L8BL2AO4L2D"4F"T3O3L64B-L8BP9L64B-L8BP9L64B-L4BP4L64B-L9BP8L64B-L8BP9L64B-L4BP4L8BP8O4L8DO3P8L8GP8L8AP8L2BP2O2L9AL9BO3L9CL9DL9EL9F+L9GL9AL9BO4L8CL8DL8EL8FL8EL8DO3L8BO4L8DP9L8DP9L8CO3P9L8AL2G"4Q 2304d 3,1:3: 1,04x (128,96),70,,14 (128,96),50,,14 (128,36),1,45f "BM100,161U1L2U1L2U1L2U1L2U1L2U1L2U1L3U1L3U1L3U1L3U1L3U1L3U1L3U1L3U1D42U1R3U1R3U1R3U1R3U1R3U1R3U1R3U1R3U1R3U1R3U1R3U1R4U1R4U1R4U1R4U1R4U1R4D4F3R8E3U4R3D1R3D1R3D1R3D1R3D1R3D1R3D1R3D1R3D1R3D1R3D1"5 "BM166,182R3D1R3D1R3D1R3D1R3D1R3D1R4D1U42L3D1L3D1L3D1L3D1L1D1L1D1L1D1L3D1L3D1L3D1L4D1L4D1"5 (80,168),4,46 "C2BM34,8D8BU8R4D4L4BR4D4BR16BU8BR4L4D8R4BR4BU8BR4L4D8R4U8BR8L4D8R4BR8L4U8R4D8BR20L4U8R4BR4D8BR4U4L4BR4U4BR4BD8U8R4D4L4F4BR4U8BR8L4D4R4D4L4BR8BU8R2D8BU8R2BR4BD8U8F2E2D8BR4U8R4D4L4BR4D4BR4BU8BR4L4D4R4D4L4"7 "C2BM179,8D8E2F2U8BR4BD8U8R4D4L4F4BR8L4U4R4BL4U4R4BR4BD8U8R4D4L4BR4D4BR4BU8R2D8BU8R2BR4BD8U8BD4R4BU4D8"7( P1400: P7 "O1T3L4FO2L9CP78L9DP78L9CP8O1L4CP78L9AP8L6GP9L4FO2L9CP78L9DP78L9CP8O1L4CP78L9AP8L6GO4L9CL9FP8L9FL9GL9FL9EL9DP7L9DP4L9DL9GP7L9GL9AL9GL9FL9EP8L9CP4L9CL9AP8L9AL9B-L9AL9GL9FP8L9DP8L9CL9CL9DP8L9GP8L9EP8L4FP2"8 &"O1T3L4FO2L9CP78L9DP78L9CP8O1L4CP78L9AP8L6GP9L4FO2L9CP78L9DP78L9CP8O1L4CP78L9AP8L6GO4L9CL9FL9GL9AL9GL9FL9EL9DL9FO3L9B-O4L9CL9DL9FL9GL9AL9B-L9AL9GL9FL9EL9GL9CL9DL9EL9GO5L9FL9EL9DL9CO4L9B-L9AL9GL9FL9EL9DL9EL9FL9GL9AL9B-P8L9EP8L4.F"8 0 P1400: P: 2309 3,1::1,09-"BM33,180U120R190D120L190"9J(129,180),86,,1.2,.50,09[(40,84),4,4:="BM42,180E20BR130F20BH20U8BD8D8L130U16R130BL20U10L90D10BU6L10D6BR110U6L10BU4BL80H6U2L1U2L1U3E8U3H6R6D1R1D1R1D1R1F6D3G6D3L1D1L1D6BR35H10U6E12U4H8R6D1R2F10D6R1D1R1D1R1D1R1D1R1D1R1D1R1D1G18BR26H6U3E12U3F4D4G6D1R1D1R1D1R1G6":i"BM95,142E4R2D1F2R2E8D4F4BR16E3R3U3F6":{(88,136),2,4:(110,172),3,4:(110,162),2,4:(120,150),2,4:(174,150),2,4:(78,150),2,4:(128,130),2,4:"(88,130),2,4;,(99,140),2,4;#6(108,140),2,4;6@(138,140),2,4;IJ(150,135),2,4;zT"BM124,8G10F25G8D6E22H28U2R2D2L2BD17BL4E10";^(134,32),4,4;h(122,12),3,4;r(248,184),2,4;|P1100:P< RE12:"T3O1L4CP8L8O2GP64L8GO1P9L7GP9O1L4CP8L8O2GP64L8GO1P9L7GP8":RE<"T3O4L2CO3L4.BL8AL2GP4L8FP8L2EL2DL4.CO2L8GP64L8GO1P9L7GP8O3L2.AP16L8AP9L2.BP16L8BP9O4L4.CO2L8GP64L8GO1P9L7GP8O2L8C": AG13:"O2T40L16BL16B-L16AL16A-L16GL16G-L16FL16EL16E-L16DL16D-O1L16CL16BL16B-L16AL16A-L16GL16G-L16FL16EL16E-L16DL16= AG=;6:@74,"***surprise***";:@138,"press any key";=UNY$: NY$"" 4270=f3,1:7:1,1="C6BM22,42H16BF8E8BH8F16BG8BD8G16BE16F8G8H8BF8G8BD8G8F16BH8E8H8BG8BF16BD8G16BE16F8G8H8BG8BD8BR10F8G8H8BF8E4F8">"C8BM40,16D150BU150R5D10R5D10R5D10R5D10R5D10R5D10R5D10R5D10R5D70BU70U80BR16D150R45BL45BU70R45BL45BU80R45BR16D150R5U10R5U10R5U10R5U10R5U10BD10R5D10R5D10R5D10R5D10R5U150"?"C6BM242,16G8F8E8BG8H4G8BD8G8F16E8BH8G8BF8BD8G16BE16F8G8H8BF8G8BD8G8F16BH16BE8F8G8R12BL12BF8BD8G10BG4G2H2E2F1BF2G2BD8BE6E10BG14F2G2H3E2F1"?4P1 400: P: X1 4?b"O1T2L16GL8G+L16AL16A+P16O2L16B-P8L8.B-"?iX@F"P16O2T2L8B-P16P32O3L2E-L8DP16P32L4E-P8L4GP8L8FL8GL8E-L8FL8GL8E-L8FP8L32FL32F+L16GP16L32E-L32EL16FP16L32D-L32DL2E-P16L8E-P16L4GP8L4B-P8T5O4L16CO3L16BO4L16CO3L16BO4L16CO3L16BO4L16CO3L16BO4L16CO3L16BO4L16CO3L16BO4L1C"@"P2P4T2O4L8E-P4O3L2B-P9L8GP16L8.GP7L8E-O5P4L4.FP8L8E-L8FP16O1L4GO3L8GP16L8FO4L2E-L8CP16L4CO3P8L8B-P4O4L2E-P4O1L2E-"@P1400:P:230-L32DL2E-P16L8E-P16L4GP8L4B-P8T5O4L16COS&:ROMRAM 8/85 RAINBOW&% 999&O 26,80,190,128,0,183,255,222,166,128&| 183,255,223,167,31,140,224,0,37,241,57& I1 21: A:A$A$(A): I&P(A$)1& P,126& P& &HD7C0,0:&HD816,20:-> 6MS DISK ACCESS TIME'* X5518055182:X,18: X:QUICKENS DISK I/O TIME'C 150,18 :2400 BAUD'R "SPELLER" 183,255,223,167,31,140,224,0,37,241,57& I1 21: A:A$A$(A): I&P(A$)1& P,126& P& &HD7C0,0:&HD816,20:-> 6MS DISK ACCESS TIME'* X5597)(202)R$(207)R$(202)(207)R$(207)R$;1(207)R$(202)(197)(202)(197)(199)(202)R$(197)(202)R$(207)R$(207)R$(199)(203)(192)R$(199)(203)(197)(203);2g(193)(207)(195)(202)(207)(195)(207)(193)(207)(195)(202)(199)(203)(192)(197)(203)(192)(199)(203)(192)(207)(195)(207);2I11000:""I22,1:1:1,1:1:0:1,1:65314,24822,3:1:1,32 "BM0,100C1U20R45U4R156D4R45D20L45D4L156U4L45"3e!(50,80)(78,100),,BF:(194,80)(166,100),,BF:(102,80)(142,100),,BF:(86,84)(94,96),,BF:(150,84)(158,96),,BF3s"31:423#2,3:1:1,34,$"BM3,120C1U5LU5LU5R45U4NR166M+10,-6R146M+10,+6D4R45D5LD5LD5L45D4L160U4L45BM0,104M+50,-30R156M+50,+30M-50,-30BG4M+28,+16L201M+28,-16R144BD28L144M+2,+12R140M+2,-12"4%(128,116),1,1:"BL28BDC4M-2,+12L2M+2,-12L16D12NR14L2U12BL40D12L2U12L16M+2,+12NR14L2M-2,-12"4&(128,90),3,1:"BU20C1NL20C4R76C1R20"4'31:424(2,3:1:1,35E)"BM8,150C1H8R45U2R166D2R45G8L40D2L160U2L40H8M+32,-80R192M+32,+80L45H20L128NG20L40M+18,-52R176M+18,+52L42"5*(76,94),14,1,.8:(176,94),14,1,.8:(76,94),1,1:(176,94),1,15+(76,86)(176,102),,B:(96,90)(156,96),,BF:(128,74),3,16C,"C1BM50,144R154L2D2L150R2D2R146BL36C4U4L18D4BL40U4L18D4BU12C1BL14L4U2R4BR18R4U2L4BR32BU4R4U2L4BR32BD6R4D2L4BR26L4D2R4"6Q-31:426."BM0,54C1U42R20":(16,24),16,1,.8,.8,.17:"BD22BR4F2RDRM+2,+17L8U4LU7LU3L2UL2UL7D16NL8U16BU7U12R8DR2DRFRD2RD2LD2LGLGLDL8"7b/"BR25BD23M+12,-42R10M+10,+42L8M-2,-8NL11BU6BL2M-3,-14LM-3,+14NR7BD6BL2M-2,+8NL8BR28U42R10D42NL10BR8U42R16M+14,+32U32R10D42L16M-14,-32D32L10"70"BR48U42R20":(154,24),16,1,.8,.8,.17:(154,44),16,1,.8,.8,.17:"BD42NR4L20R9BU6U12R8DR2DRFRD2RD2LD2LGLGLDL8BU18U12R8DR2DRFRD2RD2LD2LGLGLDL8"81(190& "D",#1,"HELP/SCN",130&.#1,130 A$&ZMU12 : *** MU --> NO. OF HELP SCREENS&i( I1 MU&~2B$(130,(0))&< B$&F A$B$&P #1,I1&Z I&d "DONE"&n&: *** (1-7) FROM speller LINE 800'" E ENTER MORE WORDS"'" d ELETE DELETE A WORD YOU WILL BE ASKED WHICH IF YOU CHANGE YOUR MIND, PUSH ANYTHING EXCEPT A NUMBER"'" s ave SAVE WORDLIST TODISK ... USES SELECTED WORDS"(k" c HANGE PERMITS CHANGING PRONUNCIATION OF A WORD"(" v OICE TOGGLES VOICE ON OR OFF"))$"UP UP ARROW go back to previous screen")."DN DOWN ARROW go down to next screen"): *** (8-12) FROM speller LINE 530*چ" WORD IS OKAY GO ON TO NEXT"*h" CHANGE PRONUNCIATION"*" DELETE THIS WORD"+)" r EVIEW REVIEW WORDS YOU HAVE ENTERED SO FAR"+" s AVE SAVE TEST TO DISK ... USES WORDS IN REVIEW SECTION" DELETE THIS WORD"+)" r EVIEW REVIEW WORDS YOU HORROR"," (27) SCROLL"," (29) QUEENS"," (32) SCRNDMP"," (36) SCRNDMPS"," (38) LP78DMPS"," (39) TESTSCRN"," (46) ENERGY"? " (50) GRAFTRAN"," (63) DESKTOPL"," (68) DESKTOPH"," (72) GENFONT1"," (75) GENFONT2"," (78) FUNFACE"," (79) MARTIAN"," (80) COCOART"," (81) MIRORPIX"? " (82) P178&GL"," (82) WINDCHIL"," (83) FOOTBALL"," (95) CCBLITZ"," (99) MENUGEN"," (99) COCODRAW","(103) 3DLETTER","(107) READPROG","(118) ANIMATE","(124) PICTBOOK"?' ENDNT2"," (78) FUNFACE"," (79) MARTIAN"," (80) COCOAR&? 1:5000:XB500:50 : *** INITIALIZE (XB -> DELAY TIME)&65494,0:"D",#1,"HELP/SCN",17 : *** STORE NAME OF TEST, TEST OR PRACTICE (TP) & DATE IN HELP/SCN RECORD NO. 1&#1,12 A$,2 B$,3 C$'( A$F$: B$"0"(TP): C$DA$:#1,1:#1: : *** STORE NAME OF FILE'J2 W$(3,50),A$(3,100),S$(100),D$(68),B$(6)' ";, N3010: Y$(12)530: Y$"H" HS8:HE12:4010::"verify:";:570,aX Y$"S" Y$"R"610: NNI: I1 NN:(W$(3,I),5,3)DA$: I: Y$"S"910:710,ub Y$(32)630,l Y$(13)520:590,v@352,Z4$;Z4$;Z4$;:@352,"";: "new sound: ";A$: A$""630: W$(2,I)A$:2010:570- : *** REVIEW WORDS SUBROUTINE-nV0:Z2:: L09 : *** V=0 --> VOICE 'OFF'; Z=2 --> DON'T REPRONOUNCE FOR AT LINE 2090-X80:3110:"review test words";: L0 100,1:L0 :V=0 SETS VOICE 'OFF'-ڀ P1 10:I10LP: INN 770.@32(P2)," ### % %";I,W$(1,I).X V1 A$W$(2,I):2010 :PRONOUNCE IF V=1 --> VOICE 'ON'_.` P.@484," ";. 3010: Y$"D" B$"DELETE":1010:720: Y$"V" V((V21)):730 : V --> TOGGLE VOICE ON/OFF/ Y$"S"910: Y$(95) LL1:720: Y$"E" INN:Z1:510: Y$(91) L:910: Y$"C" X81:B$"CHANGE":1010:630:720/ Y$"H" HS1:HE7:4010:720:7800: *** ENTER NAME OF TEST HERE AND STORE DATA TO DISK IN HELP/SCN ; THEN STORE TEST TO DISK0p3110:@270,"--------/TST";:@311,"(assumed)";:@256,"";: "name of test: ";F$:F$F$"/TST"0@352,"test OR practice?";:@389,"<1> test";:@421,"<2> practice";:3010:TP(Y$): TP1 TP2 100,3:920020:"D",#1,F$,511#1,20 A$,20 B$,11 C$1+ I1 NN1V A$W$(1,I): B$W$(2,I): C$W$(3,I)1h#1,I: I:#11{Ԟ4:"TAKETEST"1: *** DELETE AN ENTRY SUBROUTINE1@479,Z4$;:A$"ENTER NUMBER TO "B$:XB50(A$):2020:@480,A$;": ";:30102 X81 I(Y$)10L:2- (Y$)57 (Y$)48 2NNNNN1:Y(Y$): Y0 Y102Y10LY: IY NN: P13:W$(P,I)W$(P,I1) : P,I:2: *** PROGRAMMABLE TIME DELAY2XB40(A$)3%X&HFF00:Y&HFF7E: X1,52: X3,63: X35,60 : *** SPEECH SUBROUTINE ... FROM TANDY'S SS/C MANUAL3 65407,34: M1 (A$) : *** 65407 POKE TOGGLES MULTI-PAK POSITIONS ... SEE MULTI-PAK MANUAL3 (Y)128020403 Y,((A$,M,1))3 M3 (Y)128020703 Y,13:3210:65407,51:4 : *** STROBE KEYBOARD FOR INPUT4$ Y$4; Y$: Y$""30204 օ Y$(94) Z2 2020 : *** REPEAT PRONUNCIATION IF UP ARROW WAS PRESSED, EXCEPT DURING REVIEW (THEN Z=2)4 4 : *** SCREEN CLEAR SUBROUTINE4 &:200,1:5 : *** VARIABLE TIME DELAY SUBROUTINE5- X91 XB: X9:XB500:5U: *** BEGIN HELP SCREEN SUBROUTINE5y65494,0:"D",#2,"HELP/SCN",1305#2,130 H$5 HHS HE:65494,0:#2,H1:65495,0 : *** SLOW DOWN POKE FOR DISK I/O5Ȟ8:@43,"H E L P";6JҀ HT613:@32HT8,(16," ");: HT : *** DRAWS A BOX IN THE MIDDLE OF THE SCREEN6H1$(H$,1,2): H1$" " @110,"<%%>";H1$; : *** DISPLAY THE COMMAND STROKE, IF ANY, ABOVE THE BOX7 H118:@32(4H1)8,(H$,16(H11)3,16);: H1 : *** DISPLAY THE MESSAGE INSIDE THE BOX74@488,"AIT ETURN";7~Y$: X91200:Y$: Y$"" X9 : *** INTERRUPT-LIKE SUBROUTINE7 Y$"R" #2:65494,0:7 Y$"W" H:4030: HT198X9(HT,H$," "): X9HT1 A$(H$,HT1,130HT): HTX91:41208\"A(A$):HT(HT,A$," ")1: HT14140: A$(A$,1,HT1)(A$,HT1,AHT):41308,XB20(A$):2020:@504,"(other)";:3010:41004,0:7 Y$"W" H:4030: HT198X9(HT,H$," "): X9HT1 A$(H$,HT1,130HT): HTX91:D2PM9oM?&2rP@ ކ<#΀UU큌%G&92Er΀:%TKsKJK~Kx@KM2Kw+J::I::g:: ::":::3M9OM?&Kg'.J::::M>:HM8:HK`::H_4 5Z %`E^Y `Y_^E&Kg9Kg'ӽ:%J::a:::: ::$::e:::: KxZ$ & 8%&Kxp:9&н9 KwZ$ &P 8% Q&Kw:9&ζKwT'' Ks9 9K~\K99Kh@=K9M3oM9&:%K*::&9G΀AP@&Kx~8T@& @&KK40#D1/j&5K'KDK'KD̽D:K'zKƶK'"JK'KKy0' $0 0~6K PKyK&"&KK'K½C~6[$cK';KE 0zK&>4K{ K{NBEUPG5 ''&`0 ,K&[8%M' '&040&5~6&KG04NEU5~6 'J% 'J$bZ$ 0K 8%0K&6Ky'$K KKKy004MKJMMI5Ky'}4F5Ky ''&bKKy % 1"K& FM0M/FK $H0KCKMKMMI݆MMIݽFK'WKy$'' %!&Kz%Uy$O S'O $KK4MKMMI5'&/K *K&%Ky'' 'IbF HY=:CK&KyK'/$+'' '&KKMKMMIݎKǽDKḰ $ $Ḱ $Kҁ $D~42MMMKKKyKmMzEUIzMMDKm$MMFKy%0KyFIݽA/D 4GA/j&5A"KuKsKwKwD~4KK'KyE KMKMMFKy0$0KyFA/I|MM GKxKxGKx&R>4 J&1j&5A"Kx'D~4A"A"Kg&M>M8%& M9'01? M3M9&:%A0\$J&0( KE::::AM>:HP^Ki H KiZ8%`0& ,&$0( $`0& &0؆^Ki[&Ki'0&P' ` 1? V'ৠ`^ ~9PK`V&~2ED{'98'0&9KiB4 5KhZ%Kh *%Kh4Ki!5Ki 45&Kh9`'\ 9`'@\ ``큌&9Jl0'A@ 03:Ki& 1?Ki'" 'Ki'DDDDp1?p p94DDDD0509K'K'JKKDKOFEKK00K %0K $' %' ''% ' &yKKGKDu$=%KK& MKMMI~=yzK}'0&9K~K}KDVKkKyDVKlKKKD̶K&8K&&KK'K¦ā $E $KKmCKK&#' $' $^& &pL&&K& KlKk'P$ &A&9K&KkKl$,KK Du%Du% D{' =%KKOFEK'Km~=KKK1&K'&K%p$K0'0঄'% ' &K0 K'0؆Km %0zKm&LKK& MKJMMIKXKK00K w'G'? $9% $3 $+ $#K'' $ $K (K''KK&K K'KsKpKKKDKOFEK Da9KKzKmKm9K'DaK'DaKK4 Da1/j&5KJ'(K &H0K0&J&K'(0&~A!K~KKzK&KK4KmK40D5K&:&,KK'KĦā $E $2KmKC~?1'$' $' $ $% %P~?.KKm&UKy'JKKK&?Du$:Du$$KK') KzKkKk% Du$D{$  +4ME5KmK&14ME540D䮄 Da50j&5K'˽DVKkKyDVKlKKKD̶K&8K&&KK'K¦ā $E $KKmC~@gKK&#' $' $~@;& &{~@;&&K& KlKk'[$ &L&DK&KkKl$7KK )Du% D{$ KKzKmKm%KKNVEK'Km~@KK1'O'G'? $9% $3 $+ $#K'' $ $K (K''KK&K K'KsKpKKKDKNVEKDa9 4j&59K'zKƽIbF D:HY=:CD9O_큌0&KM2&GGG˶K~KK}Ks&]& 0L~CD\33~C&D\4E 5Z&~C& |K4N~B&%&K&K K K&K K3F~C&.4K|K=M15&"4KO~C5&3K&K K34N.~B&4Mz'JM~B&K{3F~C&*K'1" 04OEU5 |~~C & 4KyON~C5 &KD{$K4OF p &%K&K K4KOP40EU5 P &&4K|K=K0D{$焆 M &JKD{%K4NV40E55'T'P'L&z|~ :&6&5KwGˎ9O0 &K@& @zK~&K~KTKs~A~KuKKK' KEFK' KEF9K&4MKMMI݆ MMI5 K9M/'$JM/& M0M0M/=R0M0EU9A/ Z%8$%8$9K'L}'0$D1M&9YI9TTTT9턁' 0|9K94MIHHHMIHHyMFyMGyMHyMIZ&MF59 0&94P3|5P94P3|5P94ĀMBDVDVMB5TT19440MDtMD5MBMD &4 1 Z&5 zMB&59|MDMD&1!Mp'ӎMu 4&DaX 44M?MA5]' tM?vM@vMAZ&M?!MA15J&5&94&Da'0Z& MBZ&1zMB&5&9Ko0KqKoD0`KqDKp'`1!01MBMDMD0 MB#9zK'K'FK'UF PKK'aK'mzK&KK'#K&FؾKy0zK$K;K&9K&ZKy0K%KMDKƀ=KKKq MDKJƀ=KKKq4PֽE5MDKq#9MD KyMDKy9KyNνE90&9 44M3_4M9'O5 5!M8& 0M2& &愽D\]'F@M3'0愽D\2, _'M4M2&M2M2Kx' Kx 54940R}=01 Z&501!9yNνEKx|//p>|n <ۀ@@``x jʰ0p$$82" 08   B@***@~*UUUUUPUP@TTP@UUTPU@U@U@EUPPP@@@PP@PDTP@PPTQUTPTU@U@A@UUAA@*** B@>|>|q$q\@ \@@UPEUPPP@@PP@PTDTPPTUQUTUU@@U@A@UAA@@UPEUPPP@PPDDPTDTPTUQUT@@UU@@U@A@UA@x0?gx0ff`0ff`>fg0ff0c`x?`0HHHHH0 ` pp0@p0p0Pppp @ppppxp.Upk'040 0 0<aݰ!8 0 0 037,38,63,189,68,117,36,58,189,68,117,36,36,182,75,205,246,75,210,16,131,8,8,39,41,! !} Հ! 3 Hך֭  컈jMT-18,32,12,189,68,117,36,17,189,68,123,129,128,3SCRN29p=9=q6!217Q6Q012!6qpp`=pp=`2!62q26!2 ((A612p216A@@=PA61216APP=``=Q6Q2P2Q6QP( == (222P=(=P9P(!612A7A612A0!612A    a26!p=A612!P26121p=p( =6!2aq26!@p(0!6a21=A26QP12Q6p(=@=a6!21!6a21 @ =P(`>=2A0!2q2!021 (== (Q2Q6QA2A6Q2Q ==`!612217122q 3  =a21121!2!61P(9`(!621!216!  ==612!6211216@@@( =Q2!БQ2QP3 (9(A6!2!4Q!2!6A@@p=`=p2!61416!2` (`(a2716102a=16aP1221Pa610(`==`(Q612141216QPPp=@=p2AA2p=P=!2!6!2!02!6!20!2!6!2!pp=p(@@(p=!2q6!2!@@!2!6q2!(=(Q22A5A22Q (=`=( Q2Q6116Q2Q@0>@91617a62526a016100==2p2p=P=<121676121 A0P0A(P(62a9a260Q6Q0=PP=!62!!26! `` (PP(6!2!0qPPq0!2!6pp=(pp(=!61212!pp!21216! `` =00=2Q`Q`Q2(==(16Q2a61716a2Q6100=0;6!222!6=A22Q6Q22A(`= 9=`(Q626!00!626QPPPPP= =PA612q61016q216A@( == (2P2(==(A2A60626762606A2A00000=000= 122161221==161626162616100000(=`00>00`=(A2q0012100q2A  `162P261(@=9=@(122!pp!221@9=A6qP16!12@p3@`(=@7A6P16A2A(@>p16!2!0=0P610=pq2621pA2((1602a00!2!0!2!0p=2A0121 392 A6A 222(==0`=(!61210122171216!  16222610(=p=(262(=`(!6!@a22a@!6!  q2p2p2q (=92512APA2A6AP3(= (A2A6!A212A6@=@A2121pq21=!6A2AQ2a2Q6A  `=(=0 (2A121712(=`(q2aQ2Q5Q2QP3(=`9`=(!262!!6!!262!P00P==2!6A0Q7A6!2@= q22!5!22q(=;(A2A6A2Q5Q2A6A2A=`=A2610!2!0162A@(==(a22!0!22a(=26@==(@6A2A6Q2Q61@(=16Q2(= (0@16a062q0p00(=00a2Q626a0>0 `160 00(=`001612620` 0`p=p 9q222q7Q=9=16121161121610PP0PP614p16(`p==p`(262==12161p161210(@=@( 16Q20a2a72Q61P( =0= (2!4!2=(@9=A6A2A2A0Q6!712161@@=62q612(@<0(122Q6P61213P(P=Pp!261121=`P26Q2a6!121P(0P2qP12q3(p==(Q2Qa612Aa2aQ2Q P=((A6!21Q2Q= P=(0a2a A6A Q2Q=@@q62!@@12!6!=Pa2a@7 9`12q=!6!1216!2!  ==2221(=`=(16A2A4A2A6100P9P4A6A(==(!2!62!4pp!26!2!pP0( =>= (7Q6122216Q`3`0!62Q!2!Q26!  ==2!!2!!2 3=` (=16A2A6!0Q2Q00(9=(q6!07A2Q(=(601216121 `3 (=` a2!6aA221=P(1610a216q2q00==0a2A212A213(= =(16!2!61716!2!610pp=0>pp0@16a626a61@0=@`P`@=20P02pP=(0P0(=16!2!610P016!2!610p`= `p0@16661@0pp6pp69(`==`(12q21 12q21(<!62PqP1214pA6A   =(2A02qP16!7q2p=@24`6A2Ap@161@=(90pA6!20!2P2`(`=A2121PQ2a(==(a2a016q2q2q`===1612172!!2161030 9 (P!66@2=Q2QP=(61(ap((=0Q2Q12039=(16`6a2q2a6`610``(`=`(a6716A2Q2A6106a``@```=`!2A6016!212!6106A2!```=`P=P`=12a6016!2!6106a21`p`(` > `(60Q6Q06`=`@(  (@`=a2@@2a (= A2Q2Q6@<(512Q6 =@(p5Q2Q6qA2A6A2!  6467 =P(!612q21=@(`A26!0P( @!6!6` P=p9==A20!2!pa20!2a(=9=(12A217!2!6!2!012A21`=(@@(=a2a6A@@A6a2a!614`4`4``16!  `>`q2!0!6a2a6!0!2q (==(Q612216QP =0=0=210q2q012(===(!62226!  =0;0=A61216q2q61216A@ ( = (!62pQ2!6!2Qp26! `` `=016!6!2q2!6P7!610 (=(!62!PQ2!6!2QP!26! `` `90q4q=(@(=16A2Q0!272!0Q2A6100 090<2!P6P!26P2P2P2P2P2P6 (@=@(21`!262!`12(=(612A`!2Q2!`A216  QP2P2P2P2P2PQ(==(a2!6!2aP512!6!2a 9`=!6!0q2a6a2q0!6! ``=p((p=A216A0a2a7A612A==A6A2A2APA2A2A6A@=A2AP16A2A61PA2A@(==(a2q215Pa2q2aP=(626761216062606!2!P00P0P0=`0P0=62A0616a0P0q6016`A2A=`16=(P6260612Q6!21pA61P0@P0>@62A062`=62606609P=P(P0161Pq2A6P0P=0pP0616Q0=P(@P00!62@A2A01P12==161211216100P<(`( P2!6`6!2(==(Q2662Q0=@@=165!2qq2!56109==026!!627  24p`p2(= !2!6!2!pp=26QpQ611216!P P=( (P=!616!2 0=0!2!6!a260= 612!P=!62Qp( 9q21pA2A7P(=`=`=(A6!20A21612A72!6A@@@=@9=26Q6!PP!6Q62PPP (Pp>P( q0215120q @(`=`(@<6q2012!5!2102q6 =(@(=A01261416210A@(p= =p(0a2qq2a(==(16A2Q6Q2Q6Q2A6100=P>P=6!222!60(`==`(12a2!676!2a21PP3 `9`2A`4`A2(=(QA21612AQ=2122123(=>1621675216!0pQ26@0@93@A216=`a6A2``=2q6AQ2a2Q6!p(pA20( 121PA6a(A2Q61121=(A21a2a5p3>==9672q6q206pp=@@=Q2!6Q00Q6!2Q!52a61416a25!@(==(Q6!202!6QPP= ( <( =16121`Q2Q`1216100=p=21`!212!`129((>617160A2A=A2A02!62p26! `=` q2q(P121 121P(162=2610!2!6!2!(PP(6==6A26!00!62A(6(A2112A121p=@121@!2q2!(= @(A62!p2Q6!@@@(=(2!702qP!6!2!pp=!6121a2Q2Q2A6!  =6!<!6pA6(`P!209(=P2121(==(a22Q5Q22a=!6201612Q2161726!   p=p1661216461000(090(06!2!!6!4!2!6ppp=@Q@16A22A61@Q(=@=(A22q5q22A09(=@(16Q016Q2Q6Q2Q6100=a6A2161216Q026Q``=p=0(267q2!(p=<12162!412!=12q6!!2!6!P!2!p(;pA24P!2!>=9!21606q2q67612!P P = =  6162616P6162616!62A0q626q0A26!  P  (P=P(!6260q626q0626! a62P26ap3pP=0=!62a2a26!   p((p2121203(==(Q2Q6a2a7a2a610=p (16!2p6a2q00(612!p22a6A9@(<=`q@6`1216!@(0=`( !2!p!6A2!0@=(!2!p2a2Q`121=9=A6Q2Q01617Q2Q6A@@@( == (a6!2!PP!2!6a`p`==2A612qp2A2`3(0;12q!2!A62!==@(16!2!!2!6!00P(@=2!!2!!2 3(>`9(2676!2!662@61p16@16P6116P61pA6A@A6Ap( =`= (p6Q6@6Q6@61P1661P166A16=@61A60Q6Q0`=((=`6A2A`(@=(`A2A6 62126 62AA26= 6AA6 =A2A0A2A=P=6Q2Q@61216P!2Q2!  =`P((2Q@a2aPa5613@0(=!2!6Q2Q@61216@ 09P=q2Q@a2a`=(!2!162712!6016!pp(@==@q21@5Q2q3(=P=`=1622A!6q03p0=@(@9q261161P6!  ( =A2p!2q`3=`=(162PA6A2A2A00=(=6A72A2Q61P(=P=Q2a2QA6a2apP(=16a2q216100==216AA612@(p9p=(2A22A=@=16222610p3009pq261`12>(=0(A2`72A61@(=A612A`162q@@@@=`(6!`2!6`=0=Q2`Q2`p3==12!6!25`7`52!6!210 9<!62Q262Q26! `` `(`(PP(`(`6121`!2!6!2!`1216pp>@pQp6q6pQ`p(= p =(26`!6q0q6!`62@ ( == (`q2q2q`@ <0!21612!((2!057!2 (p9p(24642==0!6q2A2q6!P3P=0=0Q26562Q@(PP(012aa21@3(==(a2q6!2!7!2!6q2a =   =!2!626!2!p3(PPP(A2A2A2A(p< p(1612!2!216100P9P6Q60(=000=(12a2a2103(=9>(16!2A2!514A2A6100=P(=2116q2(=2Q2Aa22A6!`30<26Q22!62QPp(0p=61716!2!0p=0P(5!2a22!P322!216100P9P6Q60(=000=(12a2a2103(=9>(16!2A2!514A2A6100=P(=2116q2(=2Q2Aa22A6!`30<26Q22!62QPp(0p=61716!2!0p=0P(5!2a22!P37& 1:50,&H53FF:J&H5400&."WORKING..."&ZA$:A$"0F"J,("&H"A$):JJ1:30&e((J)&2"SAVE TO (T)APE OR (D)ISK";A$:A$(A$,1):A$"D"A$"d"80:A$"T"A$"t"50&<"PRESS ENTER WHEN TAPE IS READY";A$'FM"SCRN1",&H5400,J1,0:90'PM"SCRN1",&H5400,J1,0'<Z"OKAY, NOW RUN SCRN2":'Ed:#1'n70,3D,F0,10,39,F0,10,3D,0,71,36,21,32,31,37,51,36,51,30,31,32,21,36,71,0,70,6,F0,10,6,F0,10,6,0,70,6,60,3D,70,6,70,3D,60,6,0,C1,32,21,36,11,32,71,32,11,36,21,32,C1,0,F0,20,6,F0,6,0(x10,28,E0,6,F0,6,E0,28,0,41,36,31,32,B1,70,B1,32,31,36,41,0,40,6,F0,F0,B0,6,0,40,6,F0,3D,F0,80,6,0,B1,50,41,36,31,32,31,36,41,50,B1,0)&F0,50,6,90,6,0,B0,3D,60,6,90,6,60,3D,0,51,36,51,32,91,50,91,32,51,36,51,0,50,6,F0,F0,90,6,0,10,28,20,6,90,3D,F0,3D,90,6,20,28,0,F1,32,81,32,81,32,F1,FF)/:#2)50,3D,A0,28,3D,F0,50,39,50,28,0,21,36,31,32,41,37,41,36,31,32,41,30,21,36,31,32,41,0,20,6,F0,20,6,F0,6,0,20,6,F0,20,6,F0,6,0,61,32,11,36,21,70,6,3D,A0,41,36,31,32,21,0*A0,6,50,11,32,11,36,31,32,31,70,6,0,3D,70,6,A0,6,C0,28,20,6,3D,0,11,36,21,32,61,80,6,C0,71,32,36,21,0,10,6,F0,40,6,F0,70,6,0,10,6,90,28,30,21,36,61,32,31,D0,6,3D,0,41,32,36,51,50,6,F0,31,32,51,36,11,0+j70,6,80,28,6,3D,F0,80,6,0,40,3D,6,80,61,36,21,32,31,E0,6,0,21,36,61,32,11,90,6,B0,31,96,91,0,20,6,F0,40,6,E0,6,0,20,6,3D,50,28,60,3E,6,E0,6,3D,0,81,32,41,30,21,32,71,32,21,30,91,32,31,FF+s:#3,20,28,A0,3D,F0,E0,3D,20,28,0,51,32,51,36,51,80,41,32,41,36,51,32,51,0,B0,20,6,F0,90,6,0,A0,3D,6,F0,3D,60,6,0,21,36,31,32,91,32,31,37,31,32,B1,32,71,0,Ȇ20,6,B0,33,F0,20,3,0,20,6,F0,F0,F0,3D,0,61,32,31,B0,31,32,31,B0,21,32,21,36,31,0,F0,F0,F0,50,6,0,28,F0,90,39,F0,60,6,10,28,0,21,36,11,32,31,B0,91,B0,21,32,31,36,21,0-҆20,6,F0,F0,F0,10,6,0,20,6,3D,F0,F0,A0,3D,6,0,11,36,31,32,21,B0,36,32,31,B0,31,32,31,36,11,0,10,6,F0,40,6,F0,B0,6,0,10,6,F0,40,6,40,28,F0,20,3D,6,0,51,32,21,D0,91,B0,51,32,51,0,B0,50,33,F0,20,3,FF-:#4.(28,F0,90,39,F0,90,28,0,41,36,21,32,21,34,80,51,80,4,21,32,21,36,41,0,40,6,F0,F0,B0,6,0,40,6,70,3D,F0,60,3D,70,6,0,91,32,21,36,31,34,C0,31,36,21,32,91,0.E0,6,F0,60,6,0,20,28,A0,6,F0,60,6,A0,28,0,61,32,B1,37,31,36,31,30,B1,32,61,0,F0,B0,6,0,F0,B0,6,3D,0,31,36,61,50,31,32,91,32,31,50,61,36,31,0/d30,6,F0,F0,D0,6,0,28,10,6,60,3D,F0,A0,3D,60,6,10,28,0,51,36,31,32,31,34,F0,4,31,32,31,36,51,0,50,6,F0,F0,90,6,0,50,6,70,3D,F0,40,3D,70,6,0,C1,32,41,E0,4,41,32,C1,FF/m:#50;70,3D,F0,F0,50,3D,0,21,32,21,36,21,32,21,30,11,32,21,36,21,32,11,30,21,32,21,36,21,32,21,0,70,6,F0,10,6,F0,10,6,0,70,6,3D,70,28,40,6,40,28,70,3D,6,0,21,32,71,36,21,32,21,40,6,40,21,32,21,36,71,32,21,00C0,6,B0,6,B0,6,0,28,A0,6,3D,80,6,B0,6,A0,28,0,51,32,B1,32,41,35,41,32,B1,32,51,0,0,20,28,A0,3D,F0,60,3D,A0,28,0,20,51,32,51,36,31,D0,31,36,51,32,51,01"F0,6,F0,40,6,0,30,3E,90,6,F0,40,6,90,39,0,31,36,31,37,61,36,11,32,11,35,11,32,11,36,61,30,31,36,31,0,30,6,C0,6,D0,6,C0,6,0,30,6,90,3D,6,D0,6,3D,90,6,0,A1,32,B1,70,B1,32,A1,FF1,:#6216F0,70,3D,50,3D,0,3C,A0,31,32,31,36,11,37,11,36,31,32,31,A0,C,0,41,F0,30,6,50,6,F0,30,41,0,A0,28,A0,6,50,6,A0,28,0,36,32,61,A0,6,10,39,10,6,A0,61,32,36,02@6,F0,30,51,36,51,F0,30,6,0,6,3D,F0,50,6,F0,50,3D,6,0,21,36,11,32,21,F0,6,F0,21,32,11,36,21,0,20,6,F0,60,6,F0,60,6,0,20,6,E0,28,50,6,50,28,E0,6,0,11,36,21,32,21,30,71,50,6,50,71,30,21,32,21,36,11,03J10,6,F0,70,6,F0,70,6,0,10,6,3D,A0,28,70,6,70,28,A0,3D,6,0,21,36,31,32,31,32,21,70,6,70,21,32,31,32,31,36,21,0,20,6,F0,60,6,F0,60,6,0,20,6,3D,F0,30,6,F0,30,3D,6,0,B1,32,51,60,51,60,51,32,B1,FF3T:#74i^28,F0,3D,F0,3D,F0,28,0,31,36,51,32,61,36,31,37,31,36,61,32,51,36,31,0,30,6,E0,6,90,6,E0,6,0,30,6,E0,6,3D,30,3B,6,E0,6,0,A1,36,21,32,81,32,81,32,21,36,A1,05,hA0,6,F0,E0,6,0,A0,6,D0,3D,D0,6,0,41,32,B1,32,51,36,51,32,B1,32,41,0,F0,B0,6,0,28,60,3D,F0,6,20,39,A0,3D,60,28,0,51,36,11,32,11,36,21,30,D1,30,21,36,11,32,11,36,51,0,50,6,50,6,F0,80,6,50,6,05r50,6,50,6,3D,F0,20,3D,6,50,6,0,41,36,31,32,71,36,31,30,31,36,71,32,31,36,41,0,40,6,D0,6,90,6,D0,6,0,28,20,6,3D,A0,6,90,6,A0,3D,6,20,28,0,C1,32,A1,50,A1,32,C1,FF5|:#8610,28,80,3D,F0,C0,3D,80,28,0,41,32,41,36,30,36,32,36,37,36,32,36,30,36,41,32,41,0,B0,6,30,6,30,6,30,6,30,6,30,6,0,B0,6,3D,6,30,6,30,6,30,6,3D,6,0,20,31,32,C1,32,31,36,31,32,C1,32,31,0,F0,B0,6,0,F0,80,3D,6,3D,07}80,31,36,31,36,32,36,31,36,32,36,31,36,31,0,B0,6,30,6,30,6,30,6,30,6,30,6,0,28,3D,60,6,30,6,30,6,3E,6,30,6,30,6,60,3D,28,0,41,32,71,30,6,30,31,32,31,30,6,30,71,32,41,0,F0,20,6,F0,6,0,F0,20,6,F0,6,08 60,31,36,11,32,11,81,50,81,11,32,11,36,31,0,90,6,F0,F0,10,6,0,28,40,3D,6,E0,39,E0,6,3D,40,28,0,31,32,81,32,21,70,4,70,21,32,81,32,31,FF8:#9840,39,F0,3D,0,41,36,71,50,31,36,21,31,E1,32,91,0,40,6,F0,6,70,33,0,40,6,60,28,3D,40,6,0,91,37,41,36,91,0,F0,10,6,F0,50,31,36,41,32,41,0,28,40,3E,70,6,F0,80,6,09H31,36,21,32,21,30,6,F0,80,6,3D,0,30,6,A0,6,F0,50,B1,36,31,0,30,6,3D,70,6,F0,F0,10,6,0,71,32,11,36,81,32,31,F0,70,6,0,B0,6,F0,A0,41,32,A1,09†28,90,6,B0,28,0,31,36,30,A1,32,61,0,30,6,F0,F0,30,21,32,21,30,21,32,21,0,30,6,70,3D,0,91,32,41,30,31,32,31,0,F0,F0,20,33,FF9:#10:ֆF0,B0,39,0,11,32,11,F0,20,41,36,41,F0,20,11,32,11,0,A0,11,32,11,B0,6,B0,11,32,11,0,28,3D,F0,3D,30,6,F0,60,3D,28,0,21,36,31,32,31,30,31,32,91,32,31,37,31,32,31,36,21,0,20,6,F0,F0,F0,6,0;20,6,F0,F0,F0,6,0,31,36,11,80,32,80,32,80,32,80,11,36,31,0,30,6,F0,F0,D0,6,0,28,10,6,3D,F0,F0,70,3D,6,10,28,0,D1,32,A1,36,A1,32,D1,0;F0,B0,6,0,28,F0,90,6,3D,F0,60,28,0,21,36,21,40,61,32,F1,32,61,40,21,36,21,0,20,6,F0,F0,F0,6,0,20,6,F0,F0,F0,6,0,71,80,32,70,11,32,11,70,32,80,71,FF;:#115&28,3D,F0,60,39,F0,60,3D,28,0,21,32,36,32,21,B0,21,36,21,B0,21,32,36,32,21,0,50,6,F0,30,6,F0,30,6,0,50,6,3D,F0,6,F0,3D,6,0,A1,32,21,36,41,30,51,37,41,36,21,32,A1,0>0F0,6,F0,40,6,0,F0,6,E0,3D,20,6,0,71,32,B1,32,21,35,21,32,B1,32,71,0,0,28,F0,3D,F0,3B,F0,28,0,41,32,41,36,41,32,51,35,51,32,41,36,41,32,41,0,B0,6,F0,C0,6,0?l:B0,6,3D,F0,60,3D,6,0,41,32,81,36,31,30,21,32,21,30,31,36,81,32,41,0,F0,6,F0,40,6,0,28,D0,6,3D,D0,3D,6,D0,28,0,61,32,C1,32,21,30,21,32,C1,32,61,FF?vD:#13@N28,3D,0,81,32,81,36,40,3D,C0,3D,90,28,0,F0,40,36,41,32,41,36,51,32,51,36,31,0,F0,40,6,B0,6,D0,6,0,28,3D,E0,6,B0,6,D0,6,0,31,36,51,32,B1,10,28,3D,20,6,D0,6,10,28,0@X30,6,F0,40,31,36,61,30,11,36,11,32,71,0,30,6,F0,70,6,A0,6,0,30,6,30,28,E0,3D,6,A0,6,0,30,6,30,61,32,51,36,81,32,11,36,61,30,3E,0,30,6,F0,20,6,C0,6,60,31,36,0,30,6,F0,20,6,C0,6,90,6,0,30,6,30,28,C0,6,C0,6,3D,60,6,0Aub30,6,30,31,36,31,32,B1,36,91,32,91,0,30,6,60,6,F0,20,6,0,30,6,60,6,70,3D,70,6,F0,20,39,0,71,32,C1,32,D1,32,71,37,51,FFAl:#14B$v80,3D,F0,39,F0,3D,0,31,36,31,32,31,80,31,36,31,80,31,32,31,36,31,0,30,6,F0,50,6,F0,50,6,0,30,6,F0,50,6,F0,50,6,0,91,36,31,34,F0,70,31,36,91,0,90,6,F0,F0,10,6,0B10,28,60,6,70,3D,B0,3D,70,6,60,28,0,F1,32,81,36,81,32,F1,0,F0,B0,6,0,80,3D,F0,6,F0,3D,0,31,32,31,36,31,F0,70,4,31,36,31,32,31,0,90,6,F0,F0,10,6,0Cd30,28,40,6,E0,3D,E0,6,40,28,0,20,31,36,51,32,11,30,61,32,61,37,11,32,51,36,31,0,50,6,F0,F0,90,6,0,10,28,20,6,3D,F0,F0,30,3D,6,20,28,0,81,32,21,34,F0,B0,21,32,81,FFCn:#15D=B0,3D,90,28,40,39,F0,3D,0,41,36,41,32,41,32,41,30,51,36,21,37,31,32,31,36,31,0,40,6,F0,B0,6,E0,6,0,40,6,F0,B0,6,B0,3D,6,0,A1,36,11,32,11,D0,71,36,31,32,91,0,A0,6,F0,A0,6,0,28,80,6,40,3C,F0,30,6,D0,28,0D31,32,D1,32,51,36,50,91,36,31,32,31,0,D0,33,B0,6,E0,6,0,F0,50,28,50,6,E0,6,3D,0,F0,50,A1,70,21,32,81,36,31,0,31,32,31,F0,F0,B0,6,0,F0,F0,B0,3D,60,6,0,F0,50,11,32,11,36,90,51,32,61,36,21,0E\31,32,31,F0,10,6,F0,80,6,0,F0,50,28,30,6,F0,80,6,0,F0,50,81,32,71,50,31,32,71,0,D0,33,FFEf:#16FƆ10,28,70,3D,F0,90,3D,E0,28,0,51,32,51,F0,90,61,36,31,32,41,0,D0,61,32,61,F0,6,0,F0,D0,51,32,51,20,6,50,3D,28,0,10,28,F0,F0,80,41,36,21,32,31,0,51,32,51,C0,3D,F0,20,6,0FІ50,3D,28,30,61,32,61,F0,20,6,0,41,36,41,F0,20,51,32,51,10,3D,6,0,40,6,F0,F0,40,71,36,32,21,0,40,6,F0,40,31,32,21,36,21,90,6,0,B1,3D,F0,50,6,B0,6,0,B0,61,32,61,80,6,40,37,C1,0,20,39,F0,60,31,32,71,3D,0GQچ21,36,21,F0,F0,31,32,31,36,21,32,21,0,20,6,F0,F0,B0,6,0,20,6,B0,3D,D0,3D,B0,6,0,D1,32,81,32,81,32,F1,31,FFG[:#17H28,C0,3D,F0,60,3D,C0,28,0,31,36,41,32,41,90,34,90,41,32,41,36,31,0,30,6,F0,F0,D0,6,0,30,6,F0,50,39,F0,50,6,0,91,34,A0,41,36,41,A0,4,91,0,F0,B0,6,0,28,B0,3D,A0,6,A0,3D,B0,28,0H21,32,21,36,11,32,21,34,70,4,70,4,21,32,11,36,21,32,21,0,70,6,F0,F0,50,6,0,30,28,20,6,3D,D0,3E,D0,3D,6,20,28,0,37,51,36,31,32,91,32,91,32,31,36,51,0,80,6,60,33,F0,3,60,6,0,80,6,F0,F0,30,6,0I^21,36,32,51,B0,21,32,21,B0,51,32,36,21,0,20,6,F0,F0,F0,6,0,20,6,3D,F0,F0,90,3D,6,0,81,32,21,B0,21,32,21,B0,21,32,81,0,F0,20,33,F0,3,FFIh :#18J B0,3D,F0,60,C,28,80,3D,0,31,36,41,32,41,80,A1,36,21,30,51,32,51,0,30,6,F0,E0,6,0,30,6,10,28,F0,80,39,6,D0,3D,28,0,91,80,71,36,21,30,91,37,41,32,51,0,F0,90,6,0J 90,28,D0,6,F0,3D,90,28,0,90,81,36,C1,30,31,32,31,36,31,32,31,0,F0,20,6,60,33,F0,6,0,20,28,D0,6,F0,3D,60,6,0,20,61,32,21,36,61,B0,41,32,A1,32,31,0,D0,6,0KD*D0,6,F0,F0,3D,50,28,0,31,36,31,30,61,32,11,B0,31,36,71,32,71,0,30,6,F0,F0,6,0,30,6,F0,3D,90,3D,6,0,30,61,32,41,32,31,B0,A1,32,41,32,31,0,F0,B0,33,FFKN4:#19K>28,E0,3D,F0,20,3D,E0,28,0,31,36,21,32,21,36,31,37,E0,31,36,21,32,21,36,31,0,30,6,70,6,70,3D,30,3E,70,6,70,6,0,30,6,40,31,36,61,36,11,32,11,36,61,36,31,40,6,0LH30,6,3D,40,6,60,6,50,6,60,6,40,3D,6,0,81,32,81,30,6,50,6,30,81,32,81,0,F0,70,6,50,6,0,3D,E0,28,30,6,50,6,30,28,E0,3D,0,31,36,21,32,21,36,31,30,6,50,6,30,31,36,21,32,21,36,31,0,30,6,70,6,60,6,3D,20,6,60,6,70,6,0MR30,6,40,31,36,A1,36,A1,36,31,40,6,0,30,6,70,6,A0,6,A0,6,70,6,0,81,36,81,70,6,70,81,36,81,0,80,6,F0,6,F0,6,0,80,6,F0,6,10,39,B0,6,0,28,60,6,3D,80,B1,80,3D,6,60,28,0,31,32,71,32,31,F0,20,31,32,71,32,31,FFM\:#20NOf0,28,E0,3C,0,21,36,32,11,50,71,50,31,32,31,34,70,41,36,41,0,20,6,F0,F0,E0,6,0,20,6,F0,F0,E0,6,0,20,6,3D,F0,B0,28,D0,6,0,81,32,41,30,11,32,71,50,31,36,21,37,71,32,11,0NpF0,F0,70,6,0,F0,3D,F0,40,6,0,32,34,60,11,36,41,32,41,70,91,40,31,36,31,0,D0,6,F0,F0,40,6,0,D0,6,3D,F0,80,28,39,30,6,0,70,41,36,21,32,11,30,21,32,91,50,E1,0O?z11,32,11,60,6,0,B0,6,0,28,60,3D,6,0,41,32,91,90,4,31,32,31,50,51,32,61,FFOI:#21O10,28,90,3D,F0,3D,F0,28,0,61,32,61,30,31,36,71,32,71,32,71,0,F0,60,6,B0,3,0,90,3D,90,6,3D,F0,3D,0,31,36,31,32,31,37,81,32,21,B0,21,32,31,36,31,0,30,6,C0,33,F0,E0,6,0P30,6,20,39,F0,F0,20,28,50,6,0,E1,F0,D0,E1,0,0,F0,A0,21,36,11,0,11,36,11,40,11,32,11,D0,6,F0,3D,0,10,6,F0,80,6,C0,51,32,51,0,10,6,50,3D,28,D0,6,0P81,36,31,B0,28,6,0,80,6,E0,61,F0,70,28,0,28,3D,30,6,F0,F0,10,51,32,51,0,31,32,81,0,F0,30,33,E0,3,FFP:#22Q39,F0,80,3D,F0,90,28,0,31,36,60,36,61,32,71,32,61,36,60,36,31,0,30,6,60,6,F0,A0,6,60,6,0,28,10,6,60,6,B0,3D,B0,6,60,6,10,28,0,61,36,37,31,36,41,32,51,32,41,36,31,30,36,61,0,60,6,60,6,F0,40,6,60,6,0R60,6,60,6,80,3D,80,6,60,6,0,21,32,41,36,30,31,36,21,32,31,32,21,36,31,30,36,41,32,21,0,90,6,60,6,D0,6,60,6,0,60,3D,6,60,6,50,3D,50,6,60,6,3D,0,31,32,61,36,30,31,36,21,32,21,36,31,30,36,61,32,31,0SFʆC0,6,60,6,70,6,60,6,0,28,A0,6,60,6,20,3E,20,6,60,6,A0,28,0,F1,36,30,51,36,51,30,36,F1,0,F0,6,80,6,80,6,0,60,3D,60,6,40,28,20,6,20,28,40,6,60,3D,0,61,32,91,40,B1,40,91,32,61,FFSP:#23T)ކF0,F0,20,28,80,3D,0,F0,F0,20,41,32,51,32,51,36,11,0,40,3C,F0,28,F0,D0,6,0,35,31,32,51,36,81,F0,C0,6,0,E0,6,F0,F0,10,0C,10,6,0,B0,3D,6,40,28,70,35,51,32,51,36,71,0,41,32,41,36,41,32,21,F0,80,6,0,B0,6,F0,F0,20,6,0TB0,6,F0,F0,20,6,0,11,36,11,34,A0,11,36,11,37,F0,20,3D,6,50,28,0,10,6,F0,6,A0,21,36,31,32,71,32,31,0,10,6,3D,40,28,60,6,C0,6,0,41,32,11,36,21,30,91,50,28,20,6,0,80,6,F0,40,21,36,21,B0,4,11,36,11,0U^80,6,F0,60,6,F0,20,6,0,50,3D,6,70,39,B0,6,3D,B0,3D,6,0,41,32,81,30,21,32,21,70,61,32,11,30,21,32,61,FFUh:#24V'28,A0,3D,B0,39,B0,3D,A0,28,0,31,32,41,32,31,37,21,32,21,36,21,32,21,30,31,32,41,32,31,0,F0,B0,6,0,60,3D,B0,28,40,6,40,28,B0,3D,0,61,32,61,36,41,40,6,40,41,36,61,32,61,0,F0,6,80,6,80,6,0VF0,6,80,6,80,6,0,21,36,31,34,60,34,60,34,60,4,60,4,31,36,21,0,20,6,F0,F0,F0,6,0,20,6,F0,60,3E,F0,60,6,0,71,32,21,30,21,36,61,32,61,36,21,30,21,32,71,0,F0,20,6,F0,6,0,28,3D,C0,6,F0,6,C0,3D,28,0Wi51,36,31,32,91,90,91,32,31,36,51,0,50,6,F0,F0,90,6,0,20,3D,6,F0,30,3D,F0,30,6,3D,0,A1,32,31,30,71,32,71,30,31,32,A1,FFWs$:#25X0.28,A0,3D,B0,3D,B0,3D,A0,28,0,21,36,91,32,91,32,91,32,91,36,21,0,20,6,F0,F0,F0,6,0,20,6,3D,F0,30,3B,F0,30,3D,6,0,41,36,31,32,31,36,71,32,71,36,31,32,31,36,41,0,40,6,90,6,F0,20,6,90,6,0Y828,20,6,90,6,3D,E0,6,90,6,20,28,0,21,36,32,11,70,51,32,21,36,21,32,51,70,11,32,36,21,0,20,6,F0,60,6,F0,60,6,0,20,6,F0,60,6,3D,F0,30,6,0,31,36,21,80,36,21,32,71,32,21,36,50,37,21,36,31,0,30,6,A0,6,F0,20,6,A0,6,0YB28,10,6,A0,6,E0,3D,6,A0,6,10,28,0,21,36,11,32,21,50,51,32,21,36,21,32,51,50,21,32,11,36,21,0,20,6,F0,60,6,F0,60,6,0,20,6,F0,60,6,39,F0,30,6,0,71,C0,34,B1,4,C0,71,FFYL:#26ZsVD0,3D,28,F0,40,28,3D,0,31,36,41,32,51,30,21,32,37,32,21,30,51,32,41,36,31,0,30,6,F0,F0,D0,6,0,30,6,E0,C,30,39,30,3C,E0,6,0,81,32,21,50,81,36,81,50,21,32,81,0,F0,B0,6,0,F0,B0,6,0[5`11,36,11,50,32,50,32,50,32,50,32,50,32,50,11,36,11,0,10,6,F0,F0,F0,20,6,0,10,6,F0,10,28,40,3D,40,28,F0,10,6,0,81,32,31,60,21,32,11,36,11,32,21,60,31,32,81,0,F0,B0,6,0,B0,28,D0,6,3D,A0,28,0[j11,36,31,32,41,60,21,32,51,32,21,60,41,32,31,36,11,0,10,6,F0,F0,F0,20,6,0,10,6,F0,F0,F0,20,6,0,51,50,32,50,32,50,32,50,32,50,32,50,51,FF[t:27\~10,28,F0,3D,D0,3D,F0,28,0,61,32,21,36,21,32,61,50,35,31,32,21,36,21,32,61,0,B0,6,F0,C0,6,0,20,39,F0,60,3D,0,21,36,21,30,71,32,61,36,61,32,71,30,21,36,21,0,20,6,F0,60,6,F0,60,6,0]lB0,3D,70,28,90,28,70,3D,0,41,32,31,36,41,30,61,32,61,37,41,36,31,32,41,0,A0,6,F0,E0,6,0,B0,3D,F0,C0,3D,0,41,36,41,32,41,32,41,50,41,32,41,32,41,36,41,0,40,6,F0,F0,B0,6,0,F0,B0,3D,0,41,32,41,50,31,36,41,32,41,36,31,50,41,32,41,0]F0,40,6,B0,6,0,28,90,3D,F0,C0,3D,90,28,0,61,32,71,32,31,35,50,61,32,71,32,61,FF]0F,41,0,A0,6,F0,E0,6,0,B0,3D,F0,C0,3D,0,41,36,41,32,40& 1:50,&H65FF:J&H66B4&."WORKING..."&XA$:J,("&H"A$):JJ1:A$"0F"30&c((J)&2"SAVE TO (T)APE OR (D)ISK";A$:A$(A$,1):A$"D"A$"d"80:A$"T"A$"t"50&<"PRESS ENTER WHEN TAPE IS READY";A$'FM"SCRN2",&H66B4,J1,0:90'PM"SCRN2",&H66B4,J1,0'=Z"OKAY, NOW RUN MAKEPROS":'Gd:#28(!nF0,50,3D,F0,F0,10,28,0,36,11,32,11,36,37,36,31,32,31,36,30,36,11,32,11,36,30,36,21,32,21,0,6,50,6,30,6,90,6,30,6,50,6,30,6,0,6,50,6,30,6,3D,60,6,30,6,50,6,30,6,3D,0,36,11,32,41,30,36,31,36,61,30,6,50,6,30,71,36,0(x6,B0,6,30,31,36,60,41,32,41,A0,6,0,6,3D,80,6,60,31,36,3D,E0,28,50,6,0,36,11,32,11,36,30,36,31,32,51,36,21,32,31,70,41,36,31,0,6,50,6,30,6,B0,6,F0,40,6,0,6,50,6,30,6,3E,80,6,F0,40,6,0)36,11,32,41,30,36,11,32,11,60,6,F0,10,3D,6,0,6,B0,6,B0,36,11,32,11,36,30,36,81,36,0,6,30,39,50,6,3D,50,28,10,6,50,6,30,6,80,6,0,31,36,31,50,71,32,41,36,50,6,30,6,50,3D,6,0,30,6,F0,70,6,50,6,30,36,31,36,51,0*30,6,80,3D,50,28,40,6,50,6,30,6,30,21,36,0,D1,32,81,40,41,32,41,30,31,50,31,32,FF*:#29*B0,3D,F0,D0,3D,0,31,36,31,32,31,F0,B0,31,32,31,36,31,0,30,6,F0,F0,E0,6,0,30,6,50,3C,90,28,60,28,90,C,50,6,0,81,32,21,36,91,60,91,36,21,32,81,0,D0,6,F0,90,6,0,28,3D,80,6,F0,90,6,80,3D,28,0+{51,32,A1,36,11,C0,11,36,A1,32,51,0,F0,30,6,E0,6,0,B0,3D,40,6,E0,6,40,3D,0,31,36,11,35,21,32,71,C0,71,32,21,35,11,36,31,0,30,6,F0,F0,E0,6,0,39,6,D0,3D,C0,3D,D0,6,0+91,30,11,32,11,36,21,C0,21,36,11,32,11,37,91,0,F0,20,6,F0,10,6,0,F0,20,6,F0,10,6,0,11,32,11,34,70,A1,60,A1,70,4,11,32,11,FF,:#30,Ȇ28,C0,3D,F0,D0,C,0,21,32,21,36,21,32,21,A0,F1,E1,0,70,6,F0,A0,3,0,70,6,F0,F0,3D,0,11,32,11,36,51,70,51,36,31,B0,31,32,31,36,21,0,50,6,F0,20,6,F0,80,6,0,50,6,E0,3D,6,10,28,F0,20,28,10,6,0,50,6,3D,A0,A1,B0,21,36,91,0-҆31,36,21,32,11,F0,F0,20,6,0,30,6,F0,F0,80,6,3D,0,30,6,D0,21,32,21,36,21,B0,61,32,11,36,11,0,30,6,3D,F0,20,6,F0,80,6,0,11,36,31,32,21,E0,6,F0,50,3D,6,0,10,6,F0,C1,B0,21,36,11,32,51,0.܆10,6,F0,F0,A0,6,0,10,6,70,28,F0,F0,10,6,20,39,0,71,32,31,70,41,32,41,B0,B1,37,0,F0,F0,50,3,FF. :#31.28,3D,F0,60,3D,F0,60,3D,28,0,41,36,21,32,11,30,41,32,31,36,31,32,41,37,11,32,21,36,41,0,40,6,F0,40,6,F0,40,6,0,10,3D,6,F0,40,6,39,F0,10,6,3D,0,11,32,11,36,51,36,21,50,91,50,21,36,51,36,11,32,11,0,50,6,50,6,F0,80,6,50,6,0/20,28,10,6,50,6,70,3E,D0,6,50,6,10,28,0,20,71,30,81,32,31,35,31,32,81,30,71,0,0,B0,C,40,28,60,3D,60,28,40,3C,0,11,36,71,32,11,30,31,32,21,35,21,32,31,30,11,32,71,36,11,0,10,6,F0,F0,F0,20,6,0,10,6,90,3D,28,F0,40,28,3D,90,6,00O41,30,31,32,36,31,34,E0,31,36,32,31,30,41,0,D0,6,F0,80,6,0,40,28,70,6,3D,F0,20,3D,6,70,28,0,30,61,32,71,E0,4,71,32,61,FF0Y:#321/28,F0,3D,F0,3D,F0,28,0,31,36,41,32,51,36,51,32,51,36,51,32,41,36,31,0,30,6,C0,6,D0,6,C0,6,0,30,6,3D,90,6,50,3E,50,6,90,3D,6,0,81,36,21,32,A1,32,A1,32,21,36,81,0,80,6,F0,F0,30,6,0,28,60,6,3D,F0,C0,3D,6,60,28,01"31,32,61,32,21,36,37,C0,36,21,32,61,32,31,0,90,3,50,6,F0,6,50,33,0,F0,20,6,60,39,60,6,0,11,32,11,B0,41,60,34,60,41,B0,11,32,11,0,0,28,F0,90,3D,F0,90,28,0,51,B0,41,32,31,36,31,32,41,B0,51,02J,F0,B0,6,0,F0,80,3D,6,0,11,32,11,B0,31,32,B1,32,31,B0,11,32,11,0,90,3,F0,F0,10,33,FF2T6:#333@28,3D,F0,F0,C0,3E,0,31,36,11,32,31,36,F0,80,37,35,32,31,36,21,0,30,6,70,51,32,81,36,F0,40,6,0,30,6,40,39,90,33,40,41,32,31,36,3D,60,6,0,61,36,41,F0,80,91,32,81,0,60,6,0,60,6,F0,F0,80,3D,03J11,32,71,36,41,B0,51,32,61,32,51,36,21,0,B0,6,F0,F0,70,6,0,28,90,6,F0,F0,70,6,0,41,32,B1,F0,30,28,80,C,20,6,0,F0,E0,31,32,31,50,41,36,61,0,28,F0,F0,F0,6,0,41,32,51,36,31,F0,E0,6,0,C0,6,E0,31,32,31,90,6,3D,10,28,04'TC0,6,F0,F0,10,41,32,31,0,61,32,61,35,0,F0,70,33,FF41^:#344h3E,F0,3D,D0,3D,F0,39,0,11,36,11,37,81,32,71,36,71,32,81,30,11,36,11,0,10,6,F0,70,6,F0,70,6,0,10,6,3D,F0,40,6,F0,40,3D,6,0,51,32,21,36,51,30,D1,30,51,36,21,32,51,05rA0,6,F0,E0,6,0,A0,6,F0,E0,6,0,21,35,11,32,61,36,31,34,A0,31,36,61,32,11,35,21,0,F0,6,F0,40,6,0,28,D0,6,3D,D0,3D,6,D0,28,0,51,36,21,32,D1,30,D1,32,21,36,51,0,50,6,F0,F0,90,6,06>|50,6,3D,20,28,90,C,10,3C,90,28,20,3D,6,0,31,36,31,32,31,60,51,32,51,60,31,32,31,36,31,0,30,6,F0,F0,D0,6,0,30,6,3D,F0,F0,70,3D,6,0,91,32,31,60,21,32,31,32,21,60,31,32,91,FF6H:#357"10,39,10,28,F0,F0,B0,28,10,3E,0,11,36,31,37,F0,F0,80,31,36,11,0,10,6,30,41,32,41,80,3D,80,41,32,41,30,6,0,10,6,E0,81,32,81,E0,6,0,21,36,32,11,F0,F0,70,11,32,36,21,0,20,6,F0,60,3D,F0,60,6,0,20,6,E0,71,32,71,E0,6,0728,6,50,31,32,31,F0,20,31,32,31,50,6,28,0,31,36,32,11,F0,10,3D,F0,10,11,32,36,31,0,30,6,D0,21,32,21,36,21,32,21,D0,6,0,28,10,6,F0,50,6,F0,50,6,10,28,08A1,36,3D,A0,6,A0,3D,36,A1,0,A0,41,32,11,36,21,30,6,30,21,36,11,32,41,0,10,28,F0,81,36,81,F0,28,0,41,32,31,F0,10,6,F0,10,31,32,41,0,A0,31,32,31,70,6,3D,40,31,32,31,0,F0,40,21,32,71,32,21,FF8:#36940,10,28,3D,F0,F0,A0,C,40,28,0,41,36,11,32,21,70,81,32,51,36,F1,21,0,40,6,F0,E0,6,0,40,6,40,28,F0,80,6,3D,B0,28,0,81,32,21,37,F0,30,C1,32,71,0,F0,50,21,36,21,32,21,09†F0,70,6,0,F0,70,6,3D,0,21,36,31,32,31,80,61,32,51,32,51,32,41,36,21,0,20,6,F0,F0,F0,10,6,0,20,6,3D,F0,F0,D0,6,0,81,36,21,90,3C,F0,B0,6,0,80,6,90,21,36,91,70,41,36,81,0:?̆28,60,6,B0,6,F0,50,6,0,21,32,91,80,6,30,39,10,28,B0,6,3D,0,F0,50,81,32,31,80,81,32,31,FF:I:#37;10,28,F0,3D,D0,3D,F0,28,0,61,32,91,32,51,35,51,32,91,32,61,0,0,F0,B0,3D,0,21,36,11,32,11,30,31,36,31,32,51,32,31,36,31,37,11,32,11,36,21,0,20,6,B0,6,F0,20,6,B0,6,0,20,6,B0,6,70,3D,70,6,B0,6,0;31,36,11,A0,4,36,31,32,31,36,34,A0,11,36,31,0,30,6,E0,6,90,6,E0,6,0,30,6,30,28,90,6,30,39,30,6,90,28,30,6,0,11,36,21,32,21,A0,4,21,36,21,34,A0,21,32,21,36,11,0,10,6,F0,70,6,F0,70,6,0N90,6,0,90,6,3D,0,31,32,71,36,21,A0,4,21,32,21,36,21,50,21,32,21,0,D0,6,F0,70,6,0,28,3B,80,6,F0,70,6,0,41,32,D1,34,C0,81,50,21,32,21,FF>X&:#39?"080,3E,F0,3D,F0,39,0,21,32,31,36,11,30,11,36,71,32,71,36,11,37,11,36,31,32,21,0,80,6,50,6,F0,20,6,50,6,0,80,6,20,3D,6,F0,20,6,3D,20,6,0,20,36,31,36,11,32,11,36,31,36,50,36,31,36,11,32,11,36,31,36,0@:21,36,32,41,30,71,36,11,32,11,36,71,30,41,32,36,21,0,20,6,F0,20,6,50,6,F0,20,6,0,20,6,A0,28,50,6,10,3D,10,6,50,28,A0,6,0,21,36,32,36,11,30,71,36,11,32,11,36,71,30,11,36,32,36,21,0,20,61,36,11,32,A1,50,A1,32,11,36,61,0@D80,6,70,3,D0,33,70,6,0,50,3D,6,F0,F0,30,6,3D,0,21,36,32,61,B0,11,32,11,B0,61,32,36,21,0,20,6,F0,F0,F0,6,0,20,6,F0,F0,F0,6,0,20,6,70,28,F0,C0,28,70,6,0,81,32,31,B0,11,32,11,B0,31,32,81,0,F0,30,3,D0,33,FF@N:#40AX28,F0,3D,F0,3D,F0,28,0,51,32,51,36,61,32,61,37,61,32,61,36,31,0,D0,6,F0,F0,30,6,0,A0,3D,6,F0,70,C,80,6,10,28,0,31,36,21,32,91,70,91,36,61,32,71,0,30,6,F0,F0,6,0,30,6,F0,F0,6,E0,28,0BJb11,36,31,32,21,70,81,32,91,32,61,36,41,0,10,6,F0,F0,E0,6,0,10,6,39,40,28,80,3C,F0,3D,60,6,0,71,40,81,36,D1,60,31,32,31,36,21,0,F0,40,6,F0,D0,6,0,E0,28,30,6,3D,60,28,F0,20,6,0Bl21,32,21,70,21,36,41,32,21,30,B1,40,91,0,F0,10,6,0,F0,10,6,3D,F0,10,28,0,21,32,21,70,91,32,61,32,51,60,31,32,31,FFBv:#41CzF0,3D,80,39,80,3D,0,41,36,51,32,51,30,31,36,31,37,51,32,51,36,41,0,40,6,F0,40,6,F0,40,6,0,28,20,6,3D,F0,10,6,F0,10,3D,6,20,28,0,61,36,21,32,21,50,D1,50,21,32,21,36,61,0D60,6,F0,F0,70,6,0,60,6,3D,F0,F0,10,3D,6,0,11,32,41,36,31,32,71,70,11,32,41,32,D1,0,80,6,60,33,F0,3,0,28,30,3B,6,0,31,32,71,B0,21,32,21,B0,41,36,11,32,21,0DF0,F0,F0,10,6,0,A0,3D,F0,F0,3D,6,40,28,0,31,36,21,32,21,B0,21,32,21,B0,81,36,21,0,30,6,F0,F0,E0,6,0,30,6,50,28,F0,F0,40,3D,6,0,81,32,21,B0,21,32,21,B0,21,32,81,0,F0,20,33,F0,3,FFD:#42E28,3E,F0,60,39,F0,90,28,0,11,32,36,37,B0,36,21,32,21,36,E0,36,32,11,0,40,6,B0,36,31,70,31,36,B0,6,0,40,31,36,50,36,31,D0,31,36,50,36,31,0,70,41,36,41,F0,40,41,36,41,0,B0,6,F0,C0,6,0,70,28,20,6,3D,F0,60,3D,6,20,28,0Fa70,36,51,36,F0,40,36,51,36,0,40,36,31,50,31,36,D0,36,31,50,31,36,0,36,41,B0,31,36,3D,40,36,31,B0,41,36,0,6,F0,30,51,36,51,F0,30,6,0,6,60,3D,28,C0,6,C0,28,3D,60,6,0G!36,41,32,41,60,28,40,6,3D,10,28,60,41,32,41,36,0,6,F0,20,36,32,31,32,36,F0,20,6,0,6,90,36,11,32,41,90,41,32,11,36,90,6,0,6,3D,20,36,41,F0,A0,41,36,20,3D,6,0,41,32,41,F0,F0,30,41,32,41,FFG+:#43GІ80,3D,F0,F0,50,3D,0,36,51,32,51,40,36,31,32,31,36,50,21,32,51,32,21,0,6,F0,20,6,90,6,0,6,F0,20,6,3D,60,6,50,28,B0,28,0,81,32,51,40,61,32,61,50,61,35,36,31,0H~چC0,33,F0,F0,40,6,0,F0,F0,30,28,B0,3D,6,0,10,21,32,21,B0,36,51,32,51,40,36,31,32,31,36,0,F0,40,6,F0,20,6,90,6,0,30,39,D0,6,50,3D,90,6,90,6,0,10,71,B0,81,32,51,40,61,32,61,0I:0,F0,F0,60,3D,90,28,0,10,21,32,21,B0,31,36,11,32,11,37,31,32,21,36,11,30,31,36,21,0,F0,70,6,F0,10,6,70,6,0,10,28,F0,40,6,3D,D0,6,3D,40,6,0,10,71,B0,91,32,31,40,35,51,32,71,0,C0,33,FFID:#44IF0,B0,28,F0,3D,0,3C,F0,50,37,61,32,61,32,61,36,31,0,A1,F0,F0,A0,6,0,A0,91,F0,D0,3D,6,0,21,36,21,32,21,70,81,F0,10,11,36,32,61,0,20,6,F0,70,A1,70,6,0J28,6,3D,F0,F0,60,6,70,28,0,71,36,41,32,51,F0,60,41,32,36,31,0,70,6,F0,F0,A0,6,0,70,6,50,3E,50,3D,F0,60,3D,6,0,31,36,81,32,B1,32,41,90,21,36,71,0,30,6,F0,33,F0,70,6,0K/ 30,6,3D,F0,40,28,40,39,90,6,0,71,32,11,36,31,B0,31,36,31,50,91,36,21,0,B0,6,F0,20,6,F0,20,6,0,28,90,6,F0,20,6,E0,3D,6,0,41,32,A1,B0,91,70,21,32,71,0,F0,60,33,FFK9:#45K B0,3D,F0,F0,60,3D,28,0,31,36,81,32,81,50,41,36,41,32,41,32,41,0,30,6,F0,D0,6,0,30,6,3D,C0,28,3D,0,A1,36,41,37,E1,32,41,32,51,36,31,0,A0,6,D0,3,F0,50,6,0L*28,3D,50,6,F0,80,3D,0,51,32,61,32,51,B0,41,36,61,32,61,0,F0,F0,70,6,0,F0,F0,50,28,3D,0,31,36,61,32,71,B0,A1,32,31,36,31,0,30,6,F0,F0,D0,6,0,30,6,3D,F0,A0,3D,0,91,32,31,36,41,B0,41,36,31,32,91,0L4F0,6,F0,40,6,0,10,28,70,39,F0,F0,70,3D,28,0,91,32,A1,B0,41,32,81,32,41,0,F0,B0,3,FFM>:#46MHF0,3D,F0,40,3D,0,31,36,91,32,81,32,81,32,91,36,31,0,30,6,F0,3,70,33,F0,6,0,30,6,F0,F0,30,39,70,6,0,71,32,11,36,31,F0,60,31,32,A1,0,B0,6,0N R3E,80,6,10,28,F0,F0,3D,30,28,0,41,32,A1,F0,60,37,11,32,41,36,31,0,F0,F0,F0,40,6,0,28,3D,F0,F0,E0,6,0,41,36,31,32,41,F0,60,31,36,11,32,71,0N\40,6,F0,F0,40,6,0,40,6,F0,F0,40,6,3D,60,28,0,C1,36,21,F0,60,81,32,21,36,11,0,C0,6,F0,F0,60,6,0,90,3D,6,F0,F0,30,3D,6,0,51,32,91,F0,60,51,32,91,0,F0,60,3,70,33,FFNf:#47OpB0,3D,F0,C0,3D,0,31,32,21,36,21,32,11,35,60,37,60,35,11,32,21,36,21,32,31,0,80,6,F0,F0,30,6,0,80,6,B0,C,10,39,10,3C,B0,6,0,21,36,32,51,80,11,32,11,36,11,32,11,80,51,32,36,21,0,20,6,F0,60,6,F0,60,6,0Pcz20,6,60,28,60,28,50,6,50,28,60,28,60,6,0,11,36,31,32,31,60,21,32,21,36,21,32,21,60,31,32,31,36,11,0,10,6,F0,70,6,F0,70,6,0,10,6,3E,F0,40,6,F0,70,6,0,51,70,91,36,71,36,91,70,51,0,F0,60,6,70,6,0QE0,28,3D,20,6,70,6,20,3D,28,0,11,32,36,11,60,21,36,71,30,71,36,21,60,11,36,32,11,0,40,6,90,6,F0,20,6,90,6,0,28,20,6,90,6,3D,B0,3D,6,90,6,20,28,0,81,60,71,32,71,32,71,60,81,FFQ!:#48QF0,40,C,B0,3C,0,F0,30,21,32,31,36,31,32,21,0,F0,B0,6,0,A0,28,E0,6,E0,28,0,A0,81,32,21,30,35,37,21,32,81,0,0,20,28,F0,70,39,70,F0,28,0R410,81,32,11,34,90,11,36,11,90,34,11,32,81,0,F0,B0,6,0,A0,3D,D0,6,D0,3D,0,30,21,36,71,32,F1,41,32,71,36,21,0,50,6,B0,33,B0,3,B0,6,0R50,6,3D,F0,F0,30,3D,6,0,30,51,32,36,11,B0,35,B0,11,36,32,51,0,B0,6,F0,C0,6,0,40,28,50,6,F0,C0,6,50,28,0,30,31,32,61,F0,A0,61,32,31,0,F0,40,33,B0,3,FFR:#49S28,F0,3D,F0,3D,F0,28,0,61,32,71,36,21,32,21,37,21,32,21,36,71,32,61,0,F0,10,6,F0,20,6,0,B0,3D,20,6,F0,20,6,20,3D,0,21,32,21,36,F1,11,32,F1,11,36,21,32,21,0,70,6,80,3,D0,33,80,6,0,28,50,6,F0,F0,50,6,50,28,0Tzʆ41,32,41,E0,11,32,11,E0,41,32,41,0,0,28,70,3C,F0,F0,10,C,70,28,0,31,36,31,32,21,B0,11,32,11,B0,21,32,31,36,31,0,30,6,F0,F0,D0,6,0,30,6,F0,50,39,F0,50,6,0,81,36,11,D0,51,D0,11,36,81,0,80,6,F0,F0,30,6,0TԆ28,3D,30,6,F0,F0,30,6,30,3D,28,0,31,32,61,D0,11,32,11,D0,61,32,31,0,F0,30,3,D0,33,FFT:#50U28,A0,3D,80,39,F0,3E,A0,28,0,31,36,21,32,41,32,21,35,31,34,A0,41,32,41,36,31,0,30,6,E0,3,F0,C0,6,0,30,6,3D,50,28,F0,F0,10,3D,6,0,A1,32,31,B0,31,36,71,32,D1,0,F0,F0,6,0,E0,28,E0,6,3D,0VK11,32,51,32,41,B0,61,32,81,32,41,36,21,0,F0,F0,60,33,C0,6,0,30,3C,F0,F0,F0,6,0,11,32,11,36,51,32,11,A0,11,32,11,B0,21,36,32,51,0,50,6,F0,F0,70,6,0,28,30,6,F0,F0,70,6,3D,0VA1,36,31,C0,37,C0,31,36,21,32,21,0,A0,6,F0,F0,30,6,0,70,3D,6,F0,F0,30,6,50,28,0,35,21,32,61,D0,11,32,11,B0,81,32,21,0,F0,50,33,D0,3,FFV0F,F0,F0,F0,6,0,11,32,11,36,51,