keypad driver progress
parent
603d04992c
commit
2b034ffa10
@ -0,0 +1,67 @@
|
||||
# graph area
|
||||
plotx = 50
|
||||
ploty = 50
|
||||
plotw = 380
|
||||
ploth = 220
|
||||
cx = plotx + plotw / 2
|
||||
cy = ploty + ploth / 2
|
||||
|
||||
# graph range
|
||||
xmin = 0 - 10
|
||||
xmax = 10
|
||||
ymin = 0 - 10
|
||||
ymax = 10
|
||||
|
||||
xinc = plotw / (xmax - xmin)
|
||||
yinc = ploth / (ymax - ymin)
|
||||
|
||||
mlines = color(3, 3, 3)
|
||||
|
||||
func(makegrid) {
|
||||
rect(plotx, ploty, plotw, ploth, 0)
|
||||
|
||||
x = plotx
|
||||
while (x <= plotx + plotw) {
|
||||
line(x, ploty, x, ploty + ploth, mlines)
|
||||
x = x + xinc
|
||||
}
|
||||
|
||||
y = ploty
|
||||
while (y <= ploty + ploth) {
|
||||
line(plotx, y, plotx + plotw, y, mlines)
|
||||
y = y + yinc
|
||||
}
|
||||
|
||||
line(cx, ploty, cx, ploty + ploth, 32767)
|
||||
line(plotx, cy, plotx + plotw, cy, 32767)
|
||||
}
|
||||
|
||||
#
|
||||
# BIG LOOP - ask for equ, graph it
|
||||
#
|
||||
|
||||
makegrid
|
||||
clearcmd = "clear"
|
||||
while (1) {
|
||||
rect(0, 0, 480, 40, 0)
|
||||
print("f(x) = ")
|
||||
Fx = gets()
|
||||
|
||||
if (Fx == clearcmd) {
|
||||
makegrid
|
||||
} else {
|
||||
# do function
|
||||
x = xmin
|
||||
while (x < xmax) {
|
||||
y = solve(Fx)
|
||||
y = 0 - y
|
||||
if ((y >= ymin) & (y <= ymax)) {
|
||||
pixel(cx + x * xinc, cy + y * yinc, 511)
|
||||
}
|
||||
x = x + 1 / xinc
|
||||
}
|
||||
}
|
||||
|
||||
ppos(0, 0)
|
||||
}
|
||||
|
Binary file not shown.
Loading…
Reference in New Issue