samples/gen.bas
author Hartmut Goebel <h.goebel@crazy-compilers.com>
Thu, 27 Oct 2016 12:51:47 +0200
changeset 42 700f4d003349
parent 26 0c3815cbb51e
permissions -rw-r--r--
Catch missing xml2yml.ysl2 early.
110 DATA "Meier", "Uhlmannstrasse 42", "Laupheim"
120 DATA "Schmidt", "Haupstrasse 23", "Bad Waldsee"
1000 FOR I=1 TO 2 STEP 1
1010 READ NAME$, STREET$, VILLAGE$
1020 PRINT "INSERT INTO address (name, street, village) VALUES ('" + NAME$ + "', '" + STREET$ + "', '" + VILLAGE$ + "');"
1030 NEXT I