Skip to content

Commit f448e7f

Browse files
chriswschrisws
committed
TEENSY: update sample main.bas
1 parent 7248205 commit f448e7f

File tree

2 files changed

+93
-47
lines changed

2 files changed

+93
-47
lines changed

‎src/platform/teensy/main.bas‎

Lines changed: 30 additions & 15 deletions
Original file line numberDiff line numberDiff line change
@@ -1,31 +1,46 @@
1-
21
import teensy
32
import ssd1306 as display
43

4+
const welcome = "Hello SmallBASIC!!"
55
display.init()
66
display.dim(1)
7-
display.print("Hello SmallBASIC!")
7+
display.print(welcome)
8+
9+
const sz = display.getTextSize(welcome)
10+
display.setCursor(0, sz.height + 2)
811
display.flush()
912

10-
out = teensy.openDigitalOutput(13)
11-
print "hello"
13+
const out = teensy.openDigitalOutput(13)
14+
const usb = teensy.openUsbSerial()
1215

13-
while 1
14-
display.print(sbver)
16+
sub show_data(byref s)
17+
display.clear()
18+
display.setCursor(0,0)
19+
display.print("Received:")
20+
display.setCursor(0, sz.height + 2)
21+
display.print(s)
1522
display.flush()
23+
end
1624

17-
value = false
18-
for i = 0 to 5
19-
out.write(value)
20-
value = !value
21-
delay 1000
22-
next
23-
25+
sub blink
26+
local i
2427
for i = 0 to 5
2528
out.write(value)
2629
value = !value
27-
delay 50
30+
delay 10 + (i * 10)
2831
next
32+
out.write(0)
33+
end
2934

35+
while 1
36+
if usb.ready() then
37+
s = usb.receive()
38+
if (len(s) > 0) then
39+
show_data(s)
40+
usb.send(sbver)
41+
blink
42+
endif
43+
else
44+
delay 10
45+
endif
3046
wend
31-

‎src/platform/teensy/src/main_bas.h‎

Lines changed: 63 additions & 32 deletions
Original file line numberDiff line numberDiff line change
@@ -1,37 +1,68 @@
11
unsigned char main_bas[] = {
2-
0x0a, 0x69, 0x6d, 0x70, 0x6f, 0x72, 0x74, 0x20, 0x74, 0x65, 0x65, 0x6e,
3-
0x73, 0x79, 0x0a, 0x69, 0x6d, 0x70, 0x6f, 0x72, 0x74, 0x20, 0x73, 0x73,
4-
0x64, 0x31, 0x33, 0x30, 0x36, 0x20, 0x61, 0x73, 0x20, 0x64, 0x69, 0x73,
5-
0x70, 0x6c, 0x61, 0x79, 0x0a, 0x0a, 0x64, 0x69, 0x73, 0x70, 0x6c, 0x61,
2+
0x69, 0x6d, 0x70, 0x6f, 0x72, 0x74, 0x20, 0x74, 0x65, 0x65, 0x6e, 0x73,
3+
0x79, 0x0a, 0x69, 0x6d, 0x70, 0x6f, 0x72, 0x74, 0x20, 0x73, 0x73, 0x64,
4+
0x31, 0x33, 0x30, 0x36, 0x20, 0x61, 0x73, 0x20, 0x64, 0x69, 0x73, 0x70,
5+
0x6c, 0x61, 0x79, 0x0a, 0x0a, 0x63, 0x6f, 0x6e, 0x73, 0x74, 0x20, 0x77,
6+
0x65, 0x6c, 0x63, 0x6f, 0x6d, 0x65, 0x20, 0x3d, 0x20, 0x22, 0x48, 0x65,
7+
0x6c, 0x6c, 0x6f, 0x20, 0x53, 0x6d, 0x61, 0x6c, 0x6c, 0x42, 0x41, 0x53,
8+
0x49, 0x43, 0x21, 0x21, 0x22, 0x0a, 0x64, 0x69, 0x73, 0x70, 0x6c, 0x61,
69
0x79, 0x2e, 0x69, 0x6e, 0x69, 0x74, 0x28, 0x29, 0x0a, 0x64, 0x69, 0x73,
710
0x70, 0x6c, 0x61, 0x79, 0x2e, 0x64, 0x69, 0x6d, 0x28, 0x31, 0x29, 0x0a,
811
0x64, 0x69, 0x73, 0x70, 0x6c, 0x61, 0x79, 0x2e, 0x70, 0x72, 0x69, 0x6e,
9-
0x74, 0x28, 0x22, 0x48, 0x65, 0x6c, 0x6c, 0x6f, 0x20, 0x53, 0x6d, 0x61,
10-
0x6c, 0x6c, 0x42, 0x41, 0x53, 0x49, 0x43, 0x21, 0x22, 0x29, 0x0a, 0x64,
11-
0x69, 0x73, 0x70, 0x6c, 0x61, 0x79, 0x2e, 0x66, 0x6c, 0x75, 0x73, 0x68,
12-
0x28, 0x29, 0x0a, 0x0a, 0x6f, 0x75, 0x74, 0x20, 0x3d, 0x20, 0x74, 0x65,
13-
0x65, 0x6e, 0x73, 0x79, 0x2e, 0x6f, 0x70, 0x65, 0x6e, 0x44, 0x69, 0x67,
14-
0x69, 0x74, 0x61, 0x6c, 0x4f, 0x75, 0x74, 0x70, 0x75, 0x74, 0x28, 0x31,
15-
0x33, 0x29, 0x0a, 0x70, 0x72, 0x69, 0x6e, 0x74, 0x20, 0x22, 0x68, 0x65,
16-
0x6c, 0x6c, 0x6f, 0x22, 0x0a, 0x0a, 0x77, 0x68, 0x69, 0x6c, 0x65, 0x20,
17-
0x31, 0x0a, 0x20, 0x20, 0x64, 0x69, 0x73, 0x70, 0x6c, 0x61, 0x79, 0x2e,
18-
0x70, 0x72, 0x69, 0x6e, 0x74, 0x28, 0x73, 0x62, 0x76, 0x65, 0x72, 0x29,
19-
0x0a, 0x20, 0x20, 0x64, 0x69, 0x73, 0x70, 0x6c, 0x61, 0x79, 0x2e, 0x66,
20-
0x6c, 0x75, 0x73, 0x68, 0x28, 0x29, 0x0a, 0x0a, 0x20, 0x20, 0x76, 0x61,
21-
0x6c, 0x75, 0x65, 0x20, 0x3d, 0x20, 0x66, 0x61, 0x6c, 0x73, 0x65, 0x0a,
22-
0x20, 0x20, 0x66, 0x6f, 0x72, 0x20, 0x69, 0x20, 0x3d, 0x20, 0x30, 0x20,
23-
0x74, 0x6f, 0x20, 0x35, 0x0a, 0x20, 0x20, 0x20, 0x20, 0x6f, 0x75, 0x74,
24-
0x2e, 0x77, 0x72, 0x69, 0x74, 0x65, 0x28, 0x76, 0x61, 0x6c, 0x75, 0x65,
25-
0x29, 0x0a, 0x20, 0x20, 0x20, 0x20, 0x76, 0x61, 0x6c, 0x75, 0x65, 0x20,
26-
0x3d, 0x20, 0x21, 0x76, 0x61, 0x6c, 0x75, 0x65, 0x0a, 0x20, 0x20, 0x20,
27-
0x20, 0x64, 0x65, 0x6c, 0x61, 0x79, 0x20, 0x31, 0x30, 0x30, 0x30, 0x0a,
28-
0x20, 0x20, 0x6e, 0x65, 0x78, 0x74, 0x0a, 0x0a, 0x20, 0x20, 0x66, 0x6f,
29-
0x72, 0x20, 0x69, 0x20, 0x3d, 0x20, 0x30, 0x20, 0x74, 0x6f, 0x20, 0x35,
30-
0x0a, 0x20, 0x20, 0x20, 0x20, 0x6f, 0x75, 0x74, 0x2e, 0x77, 0x72, 0x69,
31-
0x74, 0x65, 0x28, 0x76, 0x61, 0x6c, 0x75, 0x65, 0x29, 0x0a, 0x20, 0x20,
32-
0x20, 0x20, 0x76, 0x61, 0x6c, 0x75, 0x65, 0x20, 0x3d, 0x20, 0x21, 0x76,
33-
0x61, 0x6c, 0x75, 0x65, 0x0a, 0x20, 0x20, 0x20, 0x20, 0x64, 0x65, 0x6c,
34-
0x61, 0x79, 0x20, 0x35, 0x30, 0x0a, 0x20, 0x20, 0x6e, 0x65, 0x78, 0x74,
35-
0x0a, 0x0a, 0x77, 0x65, 0x6e, 0x64, 0x0a, 0x0a
12+
0x74, 0x28, 0x77, 0x65, 0x6c, 0x63, 0x6f, 0x6d, 0x65, 0x29, 0x0a, 0x0a,
13+
0x63, 0x6f, 0x6e, 0x73, 0x74, 0x20, 0x73, 0x7a, 0x20, 0x3d, 0x20, 0x64,
14+
0x69, 0x73, 0x70, 0x6c, 0x61, 0x79, 0x2e, 0x67, 0x65, 0x74, 0x54, 0x65,
15+
0x78, 0x74, 0x53, 0x69, 0x7a, 0x65, 0x28, 0x77, 0x65, 0x6c, 0x63, 0x6f,
16+
0x6d, 0x65, 0x29, 0x0a, 0x64, 0x69, 0x73, 0x70, 0x6c, 0x61, 0x79, 0x2e,
17+
0x73, 0x65, 0x74, 0x43, 0x75, 0x72, 0x73, 0x6f, 0x72, 0x28, 0x30, 0x2c,
18+
0x20, 0x73, 0x7a, 0x2e, 0x68, 0x65, 0x69, 0x67, 0x68, 0x74, 0x20, 0x2b,
19+
0x20, 0x32, 0x29, 0x0a, 0x64, 0x69, 0x73, 0x70, 0x6c, 0x61, 0x79, 0x2e,
20+
0x66, 0x6c, 0x75, 0x73, 0x68, 0x28, 0x29, 0x0a, 0x0a, 0x63, 0x6f, 0x6e,
21+
0x73, 0x74, 0x20, 0x6f, 0x75, 0x74, 0x20, 0x3d, 0x20, 0x74, 0x65, 0x65,
22+
0x6e, 0x73, 0x79, 0x2e, 0x6f, 0x70, 0x65, 0x6e, 0x44, 0x69, 0x67, 0x69,
23+
0x74, 0x61, 0x6c, 0x4f, 0x75, 0x74, 0x70, 0x75, 0x74, 0x28, 0x31, 0x33,
24+
0x29, 0x0a, 0x63, 0x6f, 0x6e, 0x73, 0x74, 0x20, 0x75, 0x73, 0x62, 0x20,
25+
0x3d, 0x20, 0x74, 0x65, 0x65, 0x6e, 0x73, 0x79, 0x2e, 0x6f, 0x70, 0x65,
26+
0x6e, 0x55, 0x73, 0x62, 0x53, 0x65, 0x72, 0x69, 0x61, 0x6c, 0x28, 0x29,
27+
0x0a, 0x0a, 0x73, 0x75, 0x62, 0x20, 0x73, 0x68, 0x6f, 0x77, 0x5f, 0x64,
28+
0x61, 0x74, 0x61, 0x28, 0x62, 0x79, 0x72, 0x65, 0x66, 0x20, 0x73, 0x29,
29+
0x0a, 0x20, 0x20, 0x64, 0x69, 0x73, 0x70, 0x6c, 0x61, 0x79, 0x2e, 0x63,
30+
0x6c, 0x65, 0x61, 0x72, 0x28, 0x29, 0x0a, 0x20, 0x20, 0x64, 0x69, 0x73,
31+
0x70, 0x6c, 0x61, 0x79, 0x2e, 0x73, 0x65, 0x74, 0x43, 0x75, 0x72, 0x73,
32+
0x6f, 0x72, 0x28, 0x30, 0x2c, 0x30, 0x29, 0x0a, 0x20, 0x20, 0x64, 0x69,
33+
0x73, 0x70, 0x6c, 0x61, 0x79, 0x2e, 0x70, 0x72, 0x69, 0x6e, 0x74, 0x28,
34+
0x22, 0x52, 0x65, 0x63, 0x65, 0x69, 0x76, 0x65, 0x64, 0x3a, 0x22, 0x29,
35+
0x0a, 0x20, 0x20, 0x64, 0x69, 0x73, 0x70, 0x6c, 0x61, 0x79, 0x2e, 0x73,
36+
0x65, 0x74, 0x43, 0x75, 0x72, 0x73, 0x6f, 0x72, 0x28, 0x30, 0x2c, 0x20,
37+
0x73, 0x7a, 0x2e, 0x68, 0x65, 0x69, 0x67, 0x68, 0x74, 0x20, 0x2b, 0x20,
38+
0x32, 0x29, 0x0a, 0x20, 0x20, 0x64, 0x69, 0x73, 0x70, 0x6c, 0x61, 0x79,
39+
0x2e, 0x70, 0x72, 0x69, 0x6e, 0x74, 0x28, 0x73, 0x29, 0x0a, 0x20, 0x20,
40+
0x64, 0x69, 0x73, 0x70, 0x6c, 0x61, 0x79, 0x2e, 0x66, 0x6c, 0x75, 0x73,
41+
0x68, 0x28, 0x29, 0x0a, 0x65, 0x6e, 0x64, 0x0a, 0x0a, 0x73, 0x75, 0x62,
42+
0x20, 0x62, 0x6c, 0x69, 0x6e, 0x6b, 0x0a, 0x20, 0x20, 0x6c, 0x6f, 0x63,
43+
0x61, 0x6c, 0x20, 0x69, 0x0a, 0x20, 0x20, 0x66, 0x6f, 0x72, 0x20, 0x69,
44+
0x20, 0x3d, 0x20, 0x30, 0x20, 0x74, 0x6f, 0x20, 0x35, 0x0a, 0x20, 0x20,
45+
0x20, 0x20, 0x6f, 0x75, 0x74, 0x2e, 0x77, 0x72, 0x69, 0x74, 0x65, 0x28,
46+
0x76, 0x61, 0x6c, 0x75, 0x65, 0x29, 0x0a, 0x20, 0x20, 0x20, 0x20, 0x76,
47+
0x61, 0x6c, 0x75, 0x65, 0x20, 0x3d, 0x20, 0x21, 0x76, 0x61, 0x6c, 0x75,
48+
0x65, 0x0a, 0x20, 0x20, 0x20, 0x20, 0x64, 0x65, 0x6c, 0x61, 0x79, 0x20,
49+
0x31, 0x30, 0x20, 0x2b, 0x20, 0x28, 0x69, 0x20, 0x2a, 0x20, 0x31, 0x30,
50+
0x29, 0x0a, 0x20, 0x20, 0x6e, 0x65, 0x78, 0x74, 0x0a, 0x20, 0x20, 0x6f,
51+
0x75, 0x74, 0x2e, 0x77, 0x72, 0x69, 0x74, 0x65, 0x28, 0x30, 0x29, 0x0a,
52+
0x65, 0x6e, 0x64, 0x0a, 0x0a, 0x77, 0x68, 0x69, 0x6c, 0x65, 0x20, 0x31,
53+
0x0a, 0x20, 0x20, 0x69, 0x66, 0x20, 0x75, 0x73, 0x62, 0x2e, 0x72, 0x65,
54+
0x61, 0x64, 0x79, 0x28, 0x29, 0x20, 0x74, 0x68, 0x65, 0x6e, 0x0a, 0x20,
55+
0x20, 0x20, 0x20, 0x73, 0x20, 0x3d, 0x20, 0x75, 0x73, 0x62, 0x2e, 0x72,
56+
0x65, 0x63, 0x65, 0x69, 0x76, 0x65, 0x28, 0x29, 0x0a, 0x20, 0x20, 0x20,
57+
0x20, 0x69, 0x66, 0x20, 0x28, 0x6c, 0x65, 0x6e, 0x28, 0x73, 0x29, 0x20,
58+
0x3e, 0x20, 0x30, 0x29, 0x20, 0x74, 0x68, 0x65, 0x6e, 0x0a, 0x20, 0x20,
59+
0x20, 0x20, 0x20, 0x20, 0x73, 0x68, 0x6f, 0x77, 0x5f, 0x64, 0x61, 0x74,
60+
0x61, 0x28, 0x73, 0x29, 0x0a, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x75,
61+
0x73, 0x62, 0x2e, 0x73, 0x65, 0x6e, 0x64, 0x28, 0x73, 0x62, 0x76, 0x65,
62+
0x72, 0x29, 0x0a, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x62, 0x6c, 0x69,
63+
0x6e, 0x6b, 0x0a, 0x20, 0x20, 0x20, 0x20, 0x65, 0x6e, 0x64, 0x69, 0x66,
64+
0x0a, 0x20, 0x20, 0x65, 0x6c, 0x73, 0x65, 0x0a, 0x20, 0x20, 0x20, 0x20,
65+
0x64, 0x65, 0x6c, 0x61, 0x79, 0x20, 0x31, 0x30, 0x0a, 0x20, 0x20, 0x65,
66+
0x6e, 0x64, 0x69, 0x66, 0x0a, 0x77, 0x65, 0x6e, 0x64, 0x0a
3667
};
37-
unsigned int main_bas_len = 404;
68+
unsigned int main_bas_len = 778;

0 commit comments

Comments
 (0)