lang/basic/test/test27.b

   1 0 rem string test
   2 110 yes$= "yes"
   3 120 no$="no"
   4 130 if "yes"="no" then  print "130 true" else print "130 f"
   5 140 if "yes"="yes" then  print "140 true" else print "140 f"
   6 150 if "yes"="" then print "150 true" else print "150 f"
   7 160 if "yes"=yes then print "160 true" else print "160 f"
   8 170 if yes="yes" then print "170 true" else print "170 f"
   9 180 print "yes or no"
  10 190 input answer$
  11 200 print answer$="yes"
  12 210 print answer$=no