cls
print"this program demonstrates all commands."
print
print "random test"
for i = 1 to 20: print random(10),:next
print
print "boolean logic test"
print "oper","0 op 0","0 op 1","1 op 0","1 op 1"
print "=",0=0,0=1,1=0,1=1
print "<",0<0,0<1,1<0,1<1
print ">",0>0,0>1,1>0,1>1
print "<>",0<>0,0<>1,1<>0,1<>1
print ">=",0>=0,0>=1,1>=0,1>=1
print "=>",0=>0,0=>1,1=>0,1=>1
print "<=",0<=0,0<=1,1<=0,1<=1
print "=<",0=<0,0=<1,1=<0,1=<1
print "and",0 and 0,0 and 1,1 and 0,1 and 1
print "or",0 or 0,0 or 1,1 or 0,1 or 1

input "enter a number for trig test:",a
print "sine a,arcsine  =",sin (a),asin(sin(a))
print "cos  a,arccos   =",cos(a),acos(cos(a))
print "tan  a,arctan   =",tan(a),atan(tan(a))
print "ln   a,expln    =",ln(a),exp(ln(a))
print
print "a*(2+3)",a*(2+3)
print"a+10="; a+10
print"continues",
print"tabbed"

a=1:b=2:print "a is "; a ,"b is ";b: print  "testing nested loops"
for x = 1 to 3:
    for y = 1 to 10
        print x;" ";y,
    next
next

gosub 300:print "Hi"
input "Enter value of H? ",h
input "Enter value of Y? ",y
print "You entered the following H,Y: ",h,y
if h>y then print "H is greater than Y"
if h<y then print "H is smaller than Y"
if h=y then print "H is equal to Y"
print "int h=;int(h)
if h<11 then 200
   print 12-4/2
   print 100
200 a = 100/2
if a>10 then print "a=";a;" is greater than 10"
print a+34;:print ", the result of a after adding to 34 to it"
print
input "Type 250 to continue tests (doing a goto 250 via variable): ",h
goto h
end
250 print "this is line 250":for i = 1 to 4:gosub 400 + i:next:end

300 print "this is subroutine 300":gosub 400:   return
400 print "this is subroutine 400":return

401 print "subroutine 401":return
402 print "subroutine 402":return
403 print "subroutine 403":return
404 print "subroutine 404":return
