Type 340 is alive!

[Bill E]

Ok, doesn't look like much:

But under the covers, it's pretty cool.

It's being drawn with no interaction with the main program other than starting it.

Note the jmp .-1, the main code just waits. There's a totally autonomus mode where

the main code doesn't even have to refresh anything itself.

Here's the entire program (am1 code):

Test of the Type 340 display
// Draw a triangle in vector mode
#include <TYPE340/type340defs.ah>

#define XORIGIN 0d512
#define YORIGIN 0d512
#define SIDE 0d120

100/
top, lio [prog
    dla
    dss
    jmp .-1
    jmp top

// Begins in PARAM mode
prog, SCALE(0) INTENSITY(0) NEXTMODE(POINT)
    POINTY(YORIGIN) NEXTMODE(POINT)
    POINTX(XORIGIN) DRAWPOINT NEXTMODE(VECTOR)
    VECVISIBLE UP DELTAY(SIDE) RIGHT DELTAX(SIDE/2)
    VECVISIBLE DOWN DELTAY(SIDE) RIGHT DELTAX(SIDE/2)
    VECVISIBLE DELTAY(0) LEFT DELTAX(SIDE)
    VECDONE
    STOP

start top

Still quite a lot more to implement, so not released yet. 

Bill