I made a 5scale proof-of-concept program! It displays a 5scale gradient! The code is as follows:
.FIVEGREY
ClrDrawrr
RectI(16,0,48,64)r
RectI(80,0,16,64)r
RectI(48,0,64,64)
[55AA55AA55AA55AA]->Pic1
For(X,0,3)
For(Y,0,7)
Pt-Off(X*8+32,Y*8,Pic1)
Pt-Off(X*8+32,Y*8,Pic1)r
End
End
Repeat GetKey(15)
RectI(32,0,32,64)
RectI(32,0,32,64)r
DispGraphrr
End