**TI83F* Program file 02/05/06, 17:15d S SREFRACTS Q 0L?0M?0N??á?ç0 ?à1+1+*‚‚)SAMREFRACT)‚‚*?à3+1+*SAM)CHANGES*?à4+1+*SPEED)DEPENDING*?à5+1+*ON)THE)MEDIUM*?à6+1+*CBL2ƒLABPRO*?2011+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4+0+4 ëSSOFF?2011+2+0 ëSLTCH?çëSSOFF?çëSLTCH?à8+1+*kENTERl)TO)START*?Ø??ÖM?á?ç0 ?æ*REFRACT*+*SELECT)MEDIA*+SM+*MOVE*+MO+*QUIT*+Q??ÖSM?á?æ*FIRST)MEDIUM*+*VACUUM*+S1+*ICE*+S2+*FLINT)GLASS*+S3+*AS2S3)GLASS*+S4+*DIAMOND*+S5+*STYLOMMATOCINE*+S6+*MAIN)MENU*+M??ÖS1?1+5+0+4+1+5+0+4+1+5 ëM1?*VACUUM*ª?×R2?ÖS2?1+5+0+4+0+4+0+4+1+5 ëM1?*ICE*ª?×R2?ÖS3?1+5+0+4+1+5+1+5+0+4 ëM1?*FLINT)GLASS*ª?×R2?ÖS4?1+5+0+4+0+4+1+5+0+4 ëM1?*AS2S3)GLASS*ª?×R2?ÖS5?1+5+0+4+1+5+0+4+0+4 ëM1?*DIAMOND*ª?ÖS6?0+4+0+4+0+4+1+5+0+4 ëM1?*STYLOMMATOCINE*ª??ÖR2?á?æ*SECOND)MEDIUM*+*VACUUM*+T1+*ICE*+T2+*FLINT)GLASS*+T3+*AS2S3)GLASS*+T4+*DIAMOND*+T5+*STYLOMMATOCINE*+T6+*MAIN)MENU*+M??ÖT1?1+5+0+4+1+5+0+4+1+5 ëM2?*VACUUM*ª?×MM?ÖT2?1+5+0+4+0+4+0+4+1+5 ëM2?*ICE*ª?×MM?ÖT3?1+5+0+4+1+5+1+5+0+4 ëM2?*FLINT)GLASS*ª?×MM?ÖT4?1+5+0+4+0+4+1+5+0+4 ëM2?*AS2S3)GLASS*ª?×MM?ÖT5?1+5+0+4+1+5+0+4+0+4 ëM2?*DIAMOND*ª?×MM?ÖT6?0+4+0+4+0+4+1+5+0+4 ëM2?*STYLOMMATOCINE*ª??ÖMM?á?à2+1+*PLACE)SAM)IN*?à3+1+*MEDIUM)1+*?à4+1+ª?à7+1+*PRESS)kENTERl*?à8+1+*WHEN)READY*?Ø?á?ç1+1+12 ?ç1+2+12 ?à1+1+*MEDIUM)1+*?à2+3+ª?à4+1+*LEFT)j*?à5+1+*RIGHTj*?ç3+:01+5+0+0+1+0+0+0+0 ?èëE?!ëEE?à4+8+E+5?èëF?!ëFF?à5+8+F+5?à6+1+*kENTRl)TO)ACCEPT*?à7+1+*ANY)OTHER)KEY)TO*?à8+1+*REPEAT:*?0K?ÑKj0?­K?Ô?ÎKo105?×MM??á?à2+1+*PLACE)SAM)IN*?à3+1+*MEDIUM)2+*?à4+1+ª?à7+1+*PRESS)kENTERl*?à8+1+*WHEN)READY*?Ø?á?à1+1+*MEDIUM)2+*?à2+3+ª?à4+1+*LEFT)j*?à5+1+*RIGHTj*?ç3+:01+5+0+0+1+0+0+0+0 ?èëE?!ëEG?à4+8+G+5?èëF?!ëFH?à5+8+H+5?à6+1+*kENTRl)TO)ACCEPT*?à7+1+*ANY)OTHER)KEY)TO*?à8+1+*REPEAT:*?0K?ÑKj0?­K?Ô?ÎKo105?×MM??EpGƒ2L?FpHƒ2M?ElG‚2q1G?FlH‚2q1H?2011+1+5+0+4 +ëM1+0+4+1+5+1+5 +ëM1+0+4 ëSM11?2011+1+5+0+4 +ëM1+0+4+1+5+1+5 +ëM2+0+4 ëSM12?2011+1+5+0+4 +ëM2+0+4+1+5+1+5 +ëM1+0+4 ëSM21?2011+1+5+0+4 +ëM2+0+4+1+5+1+5 +ëM2+0+4 ëSM22?×M??ÖMO?á?à2+1+*LEFT)j*?à4+1+*RIGHTj*?à7+1+*kENTERl)TO)MOVE*?à8+1+*OTHER)KEYql)MENU*?ç102+°1 ?ç1+1+12 ?ç1+2+12 ?ç3+:2+1200+0 ?s4??0K?ÑKj0?ç8+1+0 ?èëE?ëE2E?ç8+2+0 ?èëF?ëF2F?à2+8+E?à4+8+F?­K?Ô?ÎKo105?×M??à7+1+*))))))))))))))))*?à8+1+*)ANY)KEY)TO)STOP*?°99P?0K?ÑKj0?ç8+1+0 ?èëE?ëE2E?ç8+2+0 ?èëF?ëF2F?à2+8+E?à4+8+F?0N?ÎEqL‚Gk0?2N?ÎFqM‚Hk0?Np1N?ÎNoP?Ï?ÎNj0?çëSM11?ÎNj1?çëSM12?ÎNj2?çëSM21?ÎNj3?çëSM22?çëSLTCH?NP?Ô?­K?Ô?×M??ÖQ?á?çëSSOFF?çëSLTCH?ç2011+0 ?i?ç0 ?»TëE?»TëF?»TëSSOFF?»TëSLTCH?•Å