 MEGA-BUCKS;  OK FOR NON-COMMERCIAL DISTRIBUTIONV —53280,0:—53281,0:™"Ÿ"z WRITTEN: 19-SEP-84 B. HAMMONDž 1520 ROUTINES ADDED 14-JUN-86°Ÿ 4,6: ASCIIÉŸ 2,6,2: PEN COLOURæŸ 3,6,3: CHARACTER SIZE ™ "“":™Ķ7);"M E G A - B U C K S":™9 († A(6): SET UP THE RANDOM NUMBER ARRAYe 2… "HOW MANY NUMBERS WOULD YOU LIKE";N:™n 3˜2,2w 4˜3,2 5˜4," MEGA-BUCKS"™ 6˜2,0Ē 7˜3,1° < Zē1 Ī Nņ F Xē1 Ī 6: GENERATE 6 RANDOM NUMBERS AND PUT THEM IN A(X) Pˆ A(X)ēĩ(ŧ(1)Ž35)Š1 Z‚ X0 d NOW WE SORT THEM ALL OUT> n Bē1 Ī 6l x CēB Ī 6: MAY HAVE TO CHANGE END VALUESƒ ‚‹ A(B)ģēA(C) ‰ 150Ÿ ŒDēA(B):A(B)ēA(C):A(C)ēD§ –‚ CŊ  ‚ BČ Š CHECK FOR A REPEATÖ ī Xē1 Ī 5í ū‹ A(X)ēA(XŠ1) § 70õ Ȃ X Ō TELL THE WORLD... ֘2,01 ܁ Xē1 Ī 6:˜4,A(X);:‚ X8 æ˜4@ ð‚ ZI ú˜3,1` Xē1Ī40:˜4,"-";:‚Xp ˜4:˜4:˜4:˜4}  2: 4: 3ƒ "€