™ "“";™ " LOTTO PICKER","BY MARK PERILLO"c™" SEND COMMENTS TO M.PERILLO"Š ********************************ą * USER INPUT *؏ ********************************í X˛1 ¤ 2000:‚ X (… "“ WHAT IS THE HIGHEST NUMBER";AH 2… " HOW MANY SETS WOULD YOU LIKE";BQ 7™"“"x < ********************************Ÿ F * PICK NUMBERS *Ć P ********************************Ô Z X˛1 ¤ Bé nC(1)˛ľ(ť(0)ŹA)Ş1÷ x M˛2 ¤ 6 ‚C(M)˛ľ(ť(0)ŹA)Ş1 Œ T˛1 ¤ MŤ12 –‹ C(M)˛C(T) § 130:  ‚ TB Ş‚ Mh ž *******************************Ž ȏ * BUBBLE SORT *´ ҏ *******************************Ç × U˛6 ¤ 2 Š Ť1Ö Ü S˛ 2 ¤ Uŕ áW˛SŤ1ř ć‹ C(S)ąC(W) § ‰ 250 đZ˛C(S):C(S)˛C(W):C(W)˛Z ú‚ S$ ‚ UJ  *******************************p  * CHANGE NUMBERS TO STRINGS *– " *******************************¤ , Z˛1 ¤ 6ś 6C$(Z)˛Ä(C(Z))Ü @‹ C(Z)ł10 § C$(Z)˛" 0"ŞÉ(C$(Z),1) J‹ C(Z)˛ą10 § C$(Z)˛" "ŞÉ(C$(Z),2) T‚ Z0 U *******************************V V * PRINT RESULTS *| W *******************************Š ^ L˛1 ¤ 6– h™C$(L);ž r‚ L¨ |™:‚ X˛ ™""Ó †™ "PICK MORE NUMBERS? (Y/N)"ę Ą Q$:‹ Q$˛"" § 400ţ š‹ Q$˛"Y" § ‰ 50 ¤‹ Q$˛"N" § € މ 390