match the colours in as few goes as possible.
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
Show posts Menu
Android.startVKText("Title","mess","done","cancel")
REPEAT
h$=Android.getVKText$()
STDOUT "doing"
// STDOUT Android.getVKText$()
UNTIL h$=CHR$(13)
STDOUT "gone past"
STDOUT h$
LOCAL alpha#=1
FOR rim=0 TO 5
DEBUG "\n"+alpha
alpha#=alpha#-0.3
NEXT
LOCAL mx,my,b1,b2,phi
LOCAL ob=GENX_OBJ()
X_OBJSTART ob
X_OBJADDVERTEX -5, -10, -5, 0,0,RGB(0,0,255)
X_OBJADDVERTEX 5, -10, -5, 0,0,RGB(0,0,255)
X_OBJADDVERTEX 0, 0, 0, 0,0,RGB(255,255,255) // Peak
X_OBJADDVERTEX 5, -10, 5, 0,0,RGB(0,0,255)
X_OBJADDVERTEX -5, -10, 5, 0,0,RGB(0,0,255)
// ..new Group
X_OBJNEWGROUP
// ...or Bottom
// X_OBJADDVERTEX 5, -10, -5, 0,0,RGB(0,0,255)
// X_OBJADDVERTEX -5, -10, -5, 0,0,RGB(0,0,255)
X_OBJADDVERTEX -5, -10, -5, 0,0,RGB(0,0,255)
X_OBJADDVERTEX 0, 0, 0, 0,0,RGB(255,255,255)
X_OBJADDVERTEX -5, -10, 5, 0,0,RGB(0,0,255)
X_OBJEND
// X_SAVEOBJ "Pyramid.ddd", 5
// X_LOADOBJ "Pyramid.ddd", ob
WHILE TRUE
MOUSESTATE mx, my, b1 ,b2
phi=mx*360 / 640
X_MAKE3D 1,1000,45
X_CAMERA 0, 1500, -3000, 0 ,0 ,0
X_DRAWAXES 0, 0, 0
X_AMBIENT_LT 0, RGB(255,255,0)
X_MOVEMENT mx-230, 0, 0
X_SCALING 3, 3, 3
X_ROTATION phi, 0, 1, 0
X_DRAWOBJ ob, 0
X_MAKE2D
PRINT "RUNNING",100,100
SHOWSCREEN
WEND
END