1 '=================================== 2 ' TO8BOOT - TO8SD BOOTSTRAP LOADER 3 ' (C) MAI 2012 - DANIEL COULOM 9 '=================================== 10 CLS:CLEAR,,,&H9DFF:SCREEN0,8,8 20 LOCATE0,3 21 PRINT"TO8BOOT 2012.05.25" 22 PRINT"Chargement du secteur de boot" 30 FORI=&H9E00 TO&H9F2F:READA$ 31 POKEI,VAL("&H"+A$):NEXTI 40 PRINT"Adresse du secteur dans la carte SD" 41 PRINT"(tapez 4 octets hexa. ex: 0004AA00)" 45 LOCATE0,8:INPUTA$ 50 POKE&H9EEF,VAL("&H"+MID$(A$,1,2)) 51 POKE&H9EF0,VAL("&H"+MID$(A$,3,2)) 52 POKE&H9EF1,VAL("&H"+MID$(A$,5,2)) 53 POKE&H9EF2,VAL("&H"+MID$(A$,7,2)) 60 CLS:PRINT:EXEC&H9E00 70 R=PEEK(&H9EF6):PRINT"ERREUR";R 79 END 80 DATA 34,76,1A,D0,CE,E7,CC,4F,A7,42,86,60,A7,C4,86,04 81 DATA A7,42,8E,00,0A,17,00,A9,30,1F,26,F9,30,8D,00,E0 82 DATA 17,00,83,25,1F,30,8D,00,DE,8D,7B,C6,20,34,04,30 83 DATA 8D,00,DB,8D,71,30,8D,00,DC,8D,6B,35,04,A1,84,27 84 DATA 08,5A,26,E9,BF,9E,F5,35,F6,30,8D,00,CF,8D,57,25 85 DATA F3,8D,6E,48,30,8D,00,95,A7,80,8D,65,8D,63,8D,61 86 DATA 10,8E,40,00,30,8D,00,86,8D,3C,8D,55,81,FE,26,FA 87 DATA 8E,02,00,8D,4C,A7,A0,30,1F,26,F8,8D,44,8D,42,6D 88 DATA 8D,00,6A,2B,0D,EC,8D,00,67,C3,00,02,ED,8D,00,60 89 DATA 20,0B,EC,8D,00,5B,C3,00,01,ED,8D,00,54,10,8C,40 90 DATA 00,23,C1,7E,40,00,8D,19,C6,06,34,04,A6,80,8D,22 91 DATA 6A,E4,26,F8,8D,0B,A1,84,27,05,6A,E4,26,F6,53,35 92 DATA 84,86,FE,E6,C4,58,C6,60,E7,C4,C4,DF,E7,C4,49,25 93 DATA F2,39,C6,08,34,04,48,56,54,E7,C4,CA,20,E7,C4,C4 94 DATA DF,E7,C4,6A,E4,26,EF,CA,40,E7,C4,35,84,80,51,00 95 DATA 00,00,00,FF,00,00,00,00,00,00,00,00,00,00,00,00 96 DATA 40,00,00,00,00,95,01,48,00,00,01,AA,87,00,77,00 97 DATA 00,00,00,65,00,69,40,00,00,00,77,00,7A,00,00,00 98 DATA 00,FD,00,00,00,00,00,00,00,00,00,00,00,00,00,00