Thursday, January 9, 2014

Tuesday, October 12, 2010

Code Booting

  dim p As Picture = bootImage                       //NAME OF INPUT IMAGE IN PROJECT
  dim m As MemoryBlock = NewMemoryBlock(p.Width * p.Height * 3)
  m.LittleEndian = false
  for i As integer = 0 to p.Width * p.Height - 1
    m.ColorValue(i*3, 24) = p.Graphics.Pixel(i mod p.Width, Floor(i / p.Width))
  next
  dim f As FolderItem = SpecialFolder.Desktop.Child("Cursor Editor.rbp")   //OUTPUT FILE NAME
  BinaryStream.Create(f).Write m.StringValue(m.Byte(0) + 4, m.Long(m.Byte(0)))

Wednesday, September 8, 2010

img test

ok, now compare retrieved image to original and see if bit accurate...

Monday, February 15, 2010

dancing squares


Saturday, February 13, 2010

Tall IFS


Thursday, February 11, 2010

Canvas Test

no canvas :(

Thursday, December 24, 2009

Test of html character <<<>>>

AAAAAAAAAAAAA
<<<<<<<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>>>
BBBBBBBBBBBBBBB
<><><><><><><><><><><>
CCCCCCCCCCCCC