BiFrost Multicolour engine.

[slenkar]

ok I tried this code:

Code:

#include "bifrost.bas"

INK 5: PAPER 0: BORDER 0: CLS
PRINT INK 6;AT 4,22;"slenkars";AT 5,23;"ENGINE";AT 6,24;"DEMO"; INK 4; AT 10,24;"WITH";AT 11,23;"BORIEL";AT 12,22;"ZX-BASIC"
   BIFROSTstart()
   BIFROSTresetTileImages(@MyUdgBlock)


While 1
LET a$=INKEY$
IF a<>"" THEN
BIFROSTsetTile(0, 0, 0)
BIFROSTsetTile(0, 1, 0)
BIFROSTsetTile(0, 2, 2)
BIFROSTsetTile(0, 3, 3)
BIFROSTsetTile(1, 0, 4)
BIFROSTsetTile(1, 1, 5)
BIFROSTsetTile(1, 2, 6)
BIFROSTsetTile(1, 3, 7)

PRINT INK 6;AT 4,22;"slenkars";AT 5,23;"you";AT 6,24;"pressed"; INK 4; AT 10,24;"a";AT 11,23;"Button";
END IF
Wend

MyUdgBlock:
ASM
defb 255,129,129,129,129,129,129,255
defb 231,231,165,231,189,231,165,255
defb 0,248,190,255,127,255,213,255
END ASM

but the jester sprite doesnt look any different