1 '===================================
2 ' MO5BOOT - MO5SD BOOTSTRAP LOADER
3 ' (C) MAI 2012 - DANIEL COULOM
9 '===================================
10 CLS:CLEAR,&H5DFF:SCREEN0,8,8
20 LOCATE0,3
21 PRINT"MO5BOOT 2012.05.25"
22 PRINT"Chargement du secteur de boot"
30 FORI=&H5E00 TO&H5F2F: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&H5EF4,VAL("&H"+MID$(A$,1,2))
51 POKE&H5EF5,VAL("&H"+MID$(A$,3,2))
52 POKE&H5EF6,VAL("&H"+MID$(A$,5,2))
53 POKE&H5EF7,VAL("&H"+MID$(A$,7,2))
60 CLS:PRINT:EXEC&H5E00
70 R=PEEK(&H5EFB):PRINT"ERREUR";R
79 END
80 DATA 34,3E,1A,D0,86,A7,1F,8B,D6,C0,CA,41,D7,C0,8E,00
81 DATA 0A,17,00,A9,30,1F,26,F9,30,8D,00,E4,17,00,83,25
82 DATA 1F,30,8D,00,E2,8D,7B,C6,20,34,04,30,8D,00,DF,8D
83 DATA 71,30,8D,00,E0,8D,6B,35,04,A1,84,27,08,5A,26,E9
84 DATA BF,5E,FA,35,BE,30,8D,00,D3,8D,57,25,F3,8D,6E,48
85 DATA 30,8D,00,9E,A7,80,8D,65,8D,63,8D,61,10,8E,00,00
86 DATA 30,8D,00,8F,8D,3C,8D,55,81,FE,26,FA,8E,02,00,8D
87 DATA 4C,A7,A0,30,1F,26,F8,8D,44,8D,42,6D,8D,00,73,2B
88 DATA 0D,EC,8D,00,70,C3,00,02,ED,8D,00,69,20,0B,EC,8D
89 DATA 00,64,C3,00,01,ED,8D,00,5D,10,8C,00,00,23,C1,7E
90 DATA 00,00,8D,19,C6,06,34,04,A6,80,8D,22,6A,E4,26,F8
91 DATA 8D,0B,A1,84,27,05,6A,E4,26,F6,53,35,84,86,FE,D6
92 DATA C0,58,C6,3E,D7,C2,C6,36,D7,C2,49,25,F2,39,C6,08
93 DATA 34,04,D6,C0,48,24,03,CA,41,8C,C4,BF,D7,C0,C6,3E
94 DATA D7,C2,C6,36,D7,C2,6A,E4,26,E8,D6,C0,CA,41,D7,C0
95 DATA 35,84,80,51,00,00,00,00,FF,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