**TI83F* Program file 12/05/05, 20:11G 6CLRSINES$64á?ç0 ?ç2001+0 ?1999+2000+80+800+40 ëSOUNA?»TëL?15µëL?à1+1+*‚)COLOR)SINES)‚*?à3+1+*CONTROL)RGB*?à4+1+*COLOR)ELEMENTS*?à7+1+*TI84qCBL2ƒLABPRO*?à8+1+*kENTERl)TO)START*?Ø?á??ÖME?æ*COLOR)SINES*+*SET)WHITE*+SW+*DIGITAL)COLORS*+DC+*CALC)COLORS*+CC+*QUIT*+Q??ÖSW?á?à1+1+*SET)WHITE*?à3+1+*ADJUST)THE)3*?à4+1+*POTENTIOMETERS*?à5+1+*FOR)THE)BEST*?à6+1+*WHITE:*?ç2011+7 ?çëSOUNA?à8+1+*kENTERl)TO)CONT:*?Ø?ç2001+0 ?×ME??ÖDC?á?à4+1+*DIGITAL)COLORS*?à6+1+*INPUT)INTEGERS*?à7+1+*FROM)0)TO)15*?15µëH?â1+ëH?ëHëI?ëHëJ?çëSOUNA?Ü*RED)))¯))*+H?0+15+±HH?ÎHj0?Ï?ëLëH?Ð?HµëH?ëH+ëLëH?15µëH?Ô?Ü*GREEN)¯))*+I?0+15+±II?ÎIj0?Ï?ëLëI?Ð?IµëI?ëI+ëLëI?15µëI?Ô?2‚ëIpëHëH?Ü*BLUE))¯))*+J?0+15+±JJ?ÎJj0?Ï?ëLëJ?Ð?JµëJ?ëJ+ëLëJ?15µëJ?Ô?4‚ëJpëHëH?1+3+5+7+9+11+13+15+2+4+6+8+10+12+14 ëSORT?ãëSORT+ëH?1+31+15 +ëHëH?ç1+3+14 ?çëH?ç3+:0001+30+2+3+5+50+0+0+0 ?á?à1+1+*DIGITAL)COLORS*?à3+1+*RED)))j*?à3+9+H?à4+1+*GREEN)j*?à4+9+I?à5+1+*BLUE))j*?à5+9+J?à7+1+*kENTERl)FOR)MENU*?à8+1+*OTHER)TO)REPEAT*?0K?ÑKj0?­K?Ô?ç0 ?ç2001+0 ?ÎKj105?×ME?×DC??ÖCC?á?à1+1+*CALCULATE)COLORS*?à2+1+*)USE)^)FOR)RED*?à3+2+*^)FOR)GREEN*?à4+2+*^)FOR)BLUE*?à5+1+*TIME)IN)SECONDS*?à6+1+*IS)VARIABLE+)T*?à7+1+*kENTERl)TO)START*?à8+3+*OTHER)FOR)MENU*?çëSOUNA?0K?ÑKj0?­K?Ô?á?ÎKo105?×ME??á?à1+1+*CALCULATE)COLORS*?à3+1+*RED)))j*?à4+1+*GREEN)j*?à5+1+*BLUE))j*?à6+1+*T)j))))))SECONDS*?à8+1+*kENTERl)TO)STOP*?ï B?0L?0M?0N?0K?0T?°5O?ÑKo105?15µëH?â1+ëH?ëHëI?ëHëJ?ÑTkOp5?ïBT?Ô?TO?^H?0+15+±Hp:5H?^I?0+15+±Ip:5I?^J?0+15+±Jp:5J?ÎHoL