godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
em
1985-01-24 11:27:36 +00:00
parent 7657fb8d45
commit a1c27b46db
51 changed files with 863 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
lang/basic/test/test27.b Normal file
View File

@@ -0,0 +1,12 @@
0 rem string test
110 yes$= "yes"
120 no$="no"
130 if "yes"="no" then print "130 true" else print "130 f"
140 if "yes"="yes" then print "140 true" else print "140 f"
150 if "yes"="" then print "150 true" else print "150 f"
160 if "yes"=yes then print "160 true" else print "160 f"
170 if yes="yes" then print "170 true" else print "170 f"
180 print "yes or no"
190 input answer$
200 print answer$="yes"
210 print answer$=no