AutoHotkey Community

#SingleInstance, Force
#NoEnv
SetBatchLines, -1

;#Include, Gdip.ahk  http://www.autohotkey.com/forum/topic32238.html

If !pToken := Gdip_Startup()
{
   MsgBox, 48, gdiplus error!, Gdiplus failed to start. Please ensure you have gdiplus on your system
   ExitApp
}
data=
(
0xff00ff,0xffffff,0xff00ff
)

;read line count to get height of image

StringReplace,data,data,`n,`n,UseErrorlevel
height:=ErrorLevel + 1

;read "," to get width
loop,parse,data,`n
{
StringReplace,temp,A_LoopField,`,`,UseErrorlevel
width:=ErrorLevel + 2
Break
}

pBitmap := Gdip_CreateBitmap(width,height)
 
y=0
x=0
loop,parse,data,`n
{
  loop,parse,A_LoopField,`,
  {
  Gdip_SetPixel(pBitmap, x, y, A_LoopField+0xff000000)

  x++
  }
x=0
y++
}
;Gdip_SetBitmapToClipboard(pBitmap)  ; to set to clipboard
Gdip_SaveBitmapToFile(pBitmap, "File.bmp")

Gdip_DisposeImage(pBitmap)

Gdip_Shutdown(pToken)
ExitApp

oI := ComObjCreate("ImageMagickObject.MagickImage.1")
oI.convert("plasma1.txt", "plasma1.png")

# ImageMagick pixel enumeration: 200,200,255,rgb
0,0: (247,252,248)  #F7FCF8  rgb(247,252,248)
1,0: (242,247,243)  #F2F7F3  rgb(242,247,243)
2,0: (243,248,244)  #F3F8F4  rgb(243,248,244)
3,0: (250,252,247)  #FAFCF7  rgb(250,252,247)
4,0: (249,250,245)  #F9FAF5  rgb(249,250,245)
5,0: (253,252,247)  #FDFCF7  rgb(253,252,247)
6,0: (241,238,233)  #F1EEE9  rgb(241,238,233)
7,0: (245,237,234)  #F5EDEA  rgb(245,237,234)
8,0: (248,237,235)  #F8EDEB  rgb(248,237,235)
...