Unnamed

alias gfx2cpp { 
  if (!$exists($3-)) { noop $input(No such file: $3-, hod, Error) | halt } 
  var %iW = $pic($3-).width, %iH = $pic($3-).height 
  if ($window(@GFX)) { echo $color(info) -m Error! GFX2CPP window already open. If you are not using it, please close it. | halt }
  window -phfB @GFX -1 -1 %iW %iH 
  window -kdCfB @GFX2CPP -1 -1 320 240 $mircexe 44 
  titlebar @GFX2CPP - WRITING 
  aline -p @GFX2CPP Opening $qt($3-) - $bytes($pic($3-).size, b) bytes. 
  drawpic @GFX 0 0 $3- 
  aline @GFX2CPP Writing header data... 
  write -c $2 
  write $2 $chr(47) $+ * GFX2CPP - raw image data array * $+ $chr(47) 
  write $2 #define $1 $+ _WIDTH %iW 
  write $2 #define $1 $+ _HEIGHT %iH 
  write $2 const int $1 $+ $chr(91) $+ $chr(93) $+ $chr(91) $+ $1 $+ _WIDTH $+ $chr(93) = $chr(123) 
  aline @GFX2CPP Writing array... 
  if ($exists(WhileFix.dll)) aline 5 @GFX2CPP Press CTRL + Break to halt 
  var %iX = 0, %iY = 0, %dat = $null
  while (%iX < %iW) { 
    if ($exists(WhileFix.dll)) dll WhileFix.dll WhileFix . 
    %iY = 0 
    while (%iY < %iH) { 
      titlebar @GFX2CPP - WRITING $calc(((%iY * %iW) + %iY) + 1) of $calc(%iW * %iH) 
      var %tmp = $base($getdot(@GFX, %iX, %iY),10,16)
      %dat = %dat $+ $+ $chr(32) $+ $+ 0x $+ %tmp $+ $str(0,$calc(6 - $len(%tmp))) $+ $chr(44) 
      inc %iY
    }
    write $2 	 $+ $chr(123) $+ $right(%dat, -1) $+ $chr(125) $+ $chr(44)
    %dat = $null
    inc %iX
  } 
  write $2 $chr(125) $+ ; 
  aline @GFX2CPP Finished writing $calc(%iW * %iH) pixels to $2 $+ . 
  titlebar @GFX2CPP - FINISHED 
  window -c @GFX 
  run notepad.exe $2 
}