Dim bmpTEMP As Bitmap=LoadBitmap(File.DirRootExternal & BoxFrontPath, BoxFrontFile)
Dim bc As BitmapCreator
bc.Initialize(bmpTEMP.Width, bmpTEMP.Height)
'Redraw Image
For i=0 To (bmpTEMP.height-1)
For j=0 To (bmpTEMP.Width-1)
If bmpTEMP.GetPixel(j, i)=Colors.RGB(255,255,255) Then bc.SetColor(j, i, Colors.Transparent)
If bmpTEMP.GetPixel(j, i)=Colors.RGB(0,0,0) Then bc.SetColor(j, i, DarkColor)
Next
Next
bc.SetBitmapToImageView(bc.Bitmap, imgDark)
AddBMP03.Initialize(File.DirAssets, "Blank.png")
AddBMP03=imgDark.Bitmap