Main_Decoder.m

% Raphael BOICHOT 10/08/2021 Game Boy printer emulator
% multi OS compatibility improved by Cristofer Cruz 2022/06/21
% code can handle compression, palette tricks and multiple images
% for any question : raphael.boichot@gmail.com
% update V3 to follow compatibility with https://github.com/mofosyne/arduino-gameboy-printer-emulator
clear
clc
% Here you enter some parameters
%------------------------------------------------------------------------
paper_color=1;%6=random, 5=purple, 4=pink, 3=regular blue, 2=regular yellow or 1=regular white
%watermarking='Raphaël BOICHOT 2021';
file='Entry_file.txt';% enter text file to decode
color_option=1; %1 for Black and white, 2 for Game Boy Color, 3 for Game Boy DMG, 4 for CGA, 5 for salmon, for pixel perfect output
darkness=10; %1=lightest 10=darkest
scale_percentage=30; %100=full size, smaller values scale down image
Timeout_printing=0;  %0 to separate images automatically if margin >0
%1 for continuous printing with TimeOut or Manual dode, ignore margin > 0);
%------------------------------------------------------------------------

  try
    pkg load image % for compatibility with Octave in case the code directly targets a Putty log file for example
  catch
    % Nothing to do
  end

[ID]=get_unique_ID(8);
DateString = date;
copyfile (file,['Backups/',DateString,'_',ID,'.txt']);
raw_image=[];
num_image=0;
colored=[];
colored_image=[];
BandW=[];
BandW_image=[];
fid = fopen(file,'r');
while ~feof(fid)
    a=fgets(fid);
    % str='88 33 01';
    % if not(isempty(strfind(a,str)))
    % disp('INIT command received')
    % end
    
    % str='88 33 0F';
    % if not(isempty(strfind(a,str)))
    % disp('STATUS command received')
    % end
    
    str='88 33 04';
    if not(isempty(strfind(a,str)))
        if a(13:17)=='00 00'
            disp('Empty DATA packet received')
        else
            disp('DATA packet to process received')
            packet=decode_packet(a);
            raw_image=[raw_image;packet];
            %imagesc(raw_image);
            drawnow
        end
    end
    
    str='88 33 02';
    if not(isempty(strfind(a,str)))&&not(isempty(raw_image))
        disp('PRINT command received')
        [colored, margin]= color_packet(a,raw_image,color_option);
        colored_image=[colored_image;colored];
        [BandW, margin]= color_packet(a,raw_image,1);
        BandW_image=[BandW_image;BandW];
        [epaper,alpha]=epaper_packet(BandW_image,paper_color,darkness,scale_percentage);
        disp(['The after margin is 0x',num2str(dec2hex(margin))])
        raw_image=[];
        if not(margin==0)&&not(Timeout_printing);
            num_image=num_image+1;
            imwrite(epaper,['GameBoy e-paper_',num2str(num_image),'_',DateString,'_',ID,'.png'],'Alpha',alpha)
            imwrite(colored_image,['GameBoy pixel perfect_',num2str(num_image),'_',DateString,'_',ID,'.png'])
            imagesc(colored_image)
            pause(1)
            disp('Images written')
            raw_image=[];
            colored_image=[];
            colored=[];
            BandW=[];
            BandW_image=[];
            disp('Flush spooler by Print command')
        end
    end
    str='Memory Waterline';
    if not(isempty(strfind(a,str)))&&not(isempty(colored_image))&&(Timeout_printing)
        disp('Cut paper command received')
        num_image=num_image+1;
        imwrite(epaper,['GameBoy e-paper_',num2str(num_image),'_',DateString,'_',ID,'.png'],'Alpha',alpha)
        imwrite(colored_image,['GameBoy pixel perfect_',num2str(num_image),'_',DateString,'_',ID,'.png'])
        disp('Images written')
        imagesc(colored_image)
        pause(1)
        raw_image=[];
        colored_image=[];
        colored=[];
        BandW=[];
        BandW_image=[];
        disp('Flush spooler by Timed Out')
    end
end

if not(isempty(colored_image))
    num_image=num_image+1;
    imwrite(epaper,['GameBoy e-paper_',num2str(num_image),'_',DateString,'_',ID,'.png'],'Alpha',alpha)
    imwrite(colored_image,['GameBoy pixel perfect_',num2str(num_image),'_',DateString,'_',ID,'.png'])
    disp('Images written')
    imagesc(colored_image)
    pause(1)
    raw_image=[];
    colored_image=[];
    colored=[];
    BandW=[];
    BandW_image=[];
    disp('Flush spooler by force')
end
fclose(fid);
disp('Normal termination')