Hi all!
This is my first real BASIC project. Any advice or constructive criticism is welcomed.
Anyways, the goal of SpriteX is to have the ability to draw sprites on the calculator, without having to use the Pen tool. Eventually, the program will be able to draw lines, erase lines and load and save sprites from a list.
The GUI looks a little something like this
*insert image here when the web filter isn't being stupid*
The code that I have right now to write the data to the screen isn't working, but here it is anyway.
Code:
This is my first real BASIC project. Any advice or constructive criticism is welcomed.
Anyways, the goal of SpriteX is to have the ability to draw sprites on the calculator, without having to use the Pen tool. Eventually, the program will be able to draw lines, erase lines and load and save sprites from a list.
The GUI looks a little something like this
*insert image here when the web filter isn't being stupid*
The code that I have right now to write the data to the screen isn't working, but here it is anyway.
Code:
:identity(5,"000000000000000000000000",0,0,1,8,3,0,1)
:identity(5,"7775DD400000000000000018",0,0,1,8,3,0,1)
:identity(5,"455490800000000000000008",0,0,1,8,3,0,1)
:identity(5,"77749C800000000000000508",0,0,1,8,3,0,1)
:identity(5,"146490800000000000000508",0,0,1,8,3,0,1)
:identity(5,"74549D40000000000000025C",0,0,1,8,3,0,1)
:identity(5,"000000000000000000000000",0,0,1,8,3,0,1)
:identity(5,"FFFFFFFFFFFFFFFFFFFFFFFF",0,0,1,8,3,0,1)
:identity(5,"008000000000000000100000",0,0,1,8,3,0,1)
:identity(5,"048000000000000000100714",0,0,1,8,3,0,1)
:identity(5,"0A80000000000000001008AA",0,0,1,8,3,0,1)
:identity(5,"148000000000000000100AA2",0,0,1,8,3,0,1)
:identity(5,"28800000000000000010092A",0,0,1,8,3,0,1)
:identity(5,"308000000000000000100A2A",0,0,1,8,3,0,1)
:identity(5,"008000000000000000100A2A",0,0,1,8,3,0,1)
:identity(5,"008000000000000000100414",0,0,1,8,3,0,1)
:identity(5,"008000000000000000100000",0,0,1,8,3,0,1)
:identity(5,"00800000000000000010071C",0,0,1,8,3,0,1)
:identity(5,"0880000000000000001008A2",0,0,1,8,3,0,1)
:identity(5,"148000000000000000100B2A",0,0,1,8,3,0,1)
:identity(5,"2280003FFFFFFFC000100A22",0,0,1,8,3,0,1)
:identity(5,"448000200000004000100B2A",0,0,1,8,3,0,1)
:identity(5,"2880002000000040001008AA",0,0,1,8,3,0,1)
:identity(5,"108000200000004000100714",0,0,1,8,3,0,1)
:identity(5,"008000200000004000100000",0,0,1,8,3,0,1)
:identity(5,"00800020000000400010071C",0,0,1,8,3,0,1)
:identity(5,"0080002000000040001008A2",0,0,1,8,3,0,1)
:identity(5,"008000200000004000100AAC",0,0,1,8,3,0,1)
:identity(5,"0080002000000040001009A2",0,0,1,8,3,0,1)
:identity(5,"008000200000004000100A9A",0,0,1,8,3,0,1)
:identity(5,"0080002000000040001008A2",0,0,1,8,3,0,1)
:identity(5,"00800020000000400010071C",0,0,1,8,3,0,1)
:identity(5,"008000200000004000100000",0,0,1,8,3,0,1)
:identity(5,"00800020000000400010001C",0,0,1,8,3,0,1)
:identity(5,"008000200000004000100022",0,0,1,8,3,0,1)
:identity(5,"008000200000004000100014",0,0,1,8,3,0,1)
:identity(5,"008000200000004000100014",0,0,1,8,3,0,1)
:identity(5,"008000200000004000100014",0,0,1,8,3,0,1)
:identity(5,"008000200000004000100014",0,0,1,8,3,0,1)
:identity(5,"008000200000004000100008",0,0,1,8,3,0,1)
:identity(5,"008000200000004000100000",0,0,1,8,3,0,1)
:identity(5,"00800020000000400010001C",0,0,1,8,3,0,1)
:identity(5,"008000200000004000100022",0,0,1,8,3,0,1)
:identity(5,"00800020000000400010002C",0,0,1,8,3,0,1)
:identity(5,"008000200000004000100022",0,0,1,8,3,0,1)
:identity(5,"00800020000000400010002C",0,0,1,8,3,0,1)
:identity(5,"008000200000004006100022",0,0,1,8,3,0,1)
:identity(5,"00800020000000400990001C",0,0,1,8,3,0,1)
:identity(5,"308000200000004008700000",0,0,1,8,3,0,1)
:identity(5,"4E800020000000400810001C",0,0,1,8,3,0,1)
:identity(5,"428000200000004030100022",0,0,1,8,3,0,1)
:identity(5,"4280003FFFFFFFC0C030002A",0,0,1,8,3,0,1)
:identity(5,"7E8000000000000100500022",0,0,1,8,3,0,1)
:identity(5,"008000000000000200900024",0,0,1,8,3,0,1)
:identity(5,"008000000000003C0690002A",0,0,1,8,3,0,1)
:identity(5,"008000000000004006500014",0,0,1,8,3,0,1)
:identity(5,"008000000000008000300000",0,0,1,8,3,0,1)
:identity(5,"3C8000000000008060500000",0,0,1,8,3,0,1)
:identity(5,"4A8000000000004062500000",0,0,1,8,3,0,1)
:identity(5,"7E8000000000002387900000",0,0,1,8,3,0,1)
:identity(5,"428000000000002442100000",0,0,1,8,3,0,1)
:identity(5,"42800000000000244C100000",0,0,1,8,3,0,1)
:identity(5,"7E8000000000002440100000",0,0,1,8,3,0,1)
:identity(5,"008000000000002380100000",0,0,1,8,3,0,1)