MAP TO-SNAP extension is only relevant for MO6 TO8/TO9

This commit is contained in:
Thomas Bernard 2018-11-18 00:23:38 +01:00
parent 8354c548a0
commit 9dddfd5775

View File

@ -6104,10 +6104,12 @@ void Save_MOTO(T_IO_Context * context)
packed_data[i++] = 0; packed_data[i++] = 0;
break; break;
} }
// add TO-SNAP extension
// see http://collection.thomson.free.fr/code/articles/prehisto_bulletin/page.php?XI=0&XJ=13
if (i&1) // align if (i&1) // align
packed_data[i++] = 0; packed_data[i++] = 0;
if (machine != MACHINE_TO7 && machine != MACHINE_TO770 && machine != MACHINE_MO5)
{
// add TO-SNAP extension
// see http://collection.thomson.free.fr/code/articles/prehisto_bulletin/page.php?XI=0&XJ=13
// bytes 0-1 : Hardware video mode (value of SCRMOD 0x605F) // bytes 0-1 : Hardware video mode (value of SCRMOD 0x605F)
packed_data[i++] = 0; packed_data[i++] = 0;
switch (mode) switch (mode)
@ -6155,6 +6157,7 @@ void Save_MOTO(T_IO_Context * context)
// bytes 38-39 : TO-SNAP signature // bytes 38-39 : TO-SNAP signature
packed_data[i++] = 0xA5; packed_data[i++] = 0xA5;
packed_data[i++] = 0x5A; packed_data[i++] = 0x5A;
}
free(unpacked_data); free(unpacked_data);