cos2000v1/programs/test2d.asm

49 lines
984 B
NASM

include "..\include\mem.h"
include "..\include\fat.h"
include "..\include\divers.h"
include "..\include\3d.h"
org 0h
start:
header exe 1
realstart:
invoke randomize
invoke savestate
invoke setvideomode,10
invoke clearscreen
mov cx,65535
show:
invoke random
and ax,1111b
push ax
invoke random
push ax
invoke random
push ax
invoke random
push ax
invoke random
push ax
invoke line
dec cx
jnz show
invoke bioswaitkey
invoke restorestate
retf
importing
use VIDEO.LIB,print
use VIDEO,savestate
use VIDEO,clearscreen
use VIDEO,setvideomode
use VIDEO,restorestate
use VIDEO,waitretrace
use GRAPHIC,line ;@x1:word,@y1:word,@x2:word,@y2:word,@color:word
use GRAPHIC,polyfill ;@pointer:word,@nbfaces:word,@color:word;
use SYSTEME,bioswaitkey
use MATH.LIB,randomize
use MATH.LIB,random
endi