samples/gen.bas
changeset 57 2f4ad3800a3f
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/samples/gen.bas	Wed Feb 27 14:43:35 2019 +0100
@@ -0,0 +1,6 @@
+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
\ No newline at end of file