Site hosted by Angelfire.com: Build your free website today!
Welcome to Gat Web
The personal pages of Zenda.
Index


Programming
Src
Obj
Opl
Html
------------------
Lit
Poems
Prose
------------------
Images
Photos
Graphic
------------------
Misc
Music
World of Computers
Xlock
Random Numbers

Random Numbers

PROC b:
global g, h
print "press a key"
g = get
do
h = int(rnd * 999) + 1
print h;
until h = g
ENDP
Download Source