Senior Member
Joined: 04/05/2024
Location: GermanyPosts: 152
| Posted: 09:28pm 06 Aug 2026 |
Hi Peter!
The motion detector is working now with these changes. It’s not JPEG quality—just BMP—but it serves its purpose.
Do
Camera change imag%(),ch' initialise the change image
Do
Camera change imag%(),ch,1
Loop Until ch>10
s$="Movement"
Inc s$, LEFT$(Date$,2)+Mid$(Date$,4,2)+RIGHT$(Date$,2)
Inc s$," "+LEFT$(Time$,2)+Mid$(Time$,4,2)+RIGHT$(Time$,2)+".bmp"
Camera capture
save image s$
Load bmp s$
Pause 2000
Loop
Camera change imag%(),ch' initialise the change image
Do
Camera change imag%(),ch,1
Loop Until ch>10
s$="Movement"
Inc s$, LEFT$(Date$,2)+Mid$(Date$,4,2)+RIGHT$(Date$,2)
Inc s$," "+LEFT$(Time$,2)+Mid$(Time$,4,2)+RIGHT$(Time$,2)+".bmp"
Camera capture
save image s$
Load bmp s$
Pause 2000
Loop