14.03.2021, 15:44
Auch wieder ein schönes Bastelobjekt für Kinder, ein kleiner Tischmülleimer mit Attiny13a.
Die Schaltung reagiert auf einen Bewegungssensor vor der Schaufel und steuert den Servo an.
Das Ganze wird einfach auf eine Streifenrasterplatine gelötet. Diese wurde einfach mit Heißkleber eingeklebt.
hungry_platine.jpg (Größe: 52,08 KB / Downloads: 234)
Das ist der Rohling:
Jedes Kind kann sich das natürlich selbst gestalten.
Da es für kleinere Kinder ist, wurde der Code in Basic geschrieben. Der darf unentgeltlich beliebig oft kopiert und weiter gegeben werden.
Oder hier als fertige HEX-Datei:
HungryRobot.hex (Größe: 1,88 KB / Downloads: 4)
Die Dateien für den 3D-Drucker gibt es hier:
https://www.thingiverse.com/thing:2824451
Diese Idee ist nicht von mir. Das Original wurde mit einem Arduino Nano gebaut. Das habe ich vereinfacht für einen Attiny13a. Ich bin da vielleicht altmodisch, aber ich halte Basic für kleinere Kinder immer noch für eine gute Einsteigersprache. Darum habe ich dieses Projekt in Basic realisiert.
Einen schöneren Tischmülleimer kann man gar nicht haben.
Die Schaltung reagiert auf einen Bewegungssensor vor der Schaufel und steuert den Servo an.
Das Ganze wird einfach auf eine Streifenrasterplatine gelötet. Diese wurde einfach mit Heißkleber eingeklebt.
hungry_platine.jpg (Größe: 52,08 KB / Downloads: 234)
Das ist der Rohling:
Jedes Kind kann sich das natürlich selbst gestalten.
Da es für kleinere Kinder ist, wurde der Code in Basic geschrieben. Der darf unentgeltlich beliebig oft kopiert und weiter gegeben werden.
Code:
'***************************************************************************
'
' Pinout ATtiny13/ATtiny13V 8-PDIP/SOIC
'
' (PCINT5/RESET/ADC0/dW) PB5 VCC
' (PCINT3/CLKI/ADC3) PB3 PB2 (SCK/ADC1/T0/PCINT2)
' (PCINT4/ADC2) PB4 PB1 (MISO/AIN1/OC0B/INT0/PCINT1)
' GND PB0 (MOSI/AIN0/OC0A/PCINT0)
'
';***************************************************************************
$regfile = "ATtiny13.DAT"
$crystal = 960000
$hwstack = 8
$swstack = 8
$framesize = 4
led Alias Portb.2
serv Alias Portb.1
Dim I As Byte , J As Byte , Ain As Word
Ddrb = &B00010111
Portb = &B00100000 '
Acsr.acd = 0
Didr0 = &B00001000
Config Adc = Single , Prescaler = Auto , Reference = Avcc
Start Adc
led = 1
For I = 1 To 20
serv = 1
waitms 20
serv = 0
waitms 180
Next I
wait 10
led = 0
Do
Do
ain = 0
for i = 1 to 5
ain = ain+Getadc(3)
next i
Loop Until ain>2500
led=1
wait 10
For I = 1 To 20
serv = 1
waitms 11
serv=0
waitms 191
Next I
waitms 300
For I = 1 To 20
serv = 1
waitms 18
serv=0
waitms 182
Next I
waitms 300
For I = 1 To 2
serv = 1
waitms 18
serv=0
waitms 182
Next I
For J = 1 To 3
For I = 1 To 10
serv =1
waitms 18
serv=0
waitms 182
Next I
waitms 100
For I = 1 To 10
serv = 1
waitms 15
serv=0
waitms 185
Next I
waitms 100
Next J
led=0
For I = 1 To 3
serv = 1
waitms 20
serv=0
waitms 180
Next I
wait 10
Loop
End
Oder hier als fertige HEX-Datei:
HungryRobot.hex (Größe: 1,88 KB / Downloads: 4)
Die Dateien für den 3D-Drucker gibt es hier:
https://www.thingiverse.com/thing:2824451
Diese Idee ist nicht von mir. Das Original wurde mit einem Arduino Nano gebaut. Das habe ich vereinfacht für einen Attiny13a. Ich bin da vielleicht altmodisch, aber ich halte Basic für kleinere Kinder immer noch für eine gute Einsteigersprache. Darum habe ich dieses Projekt in Basic realisiert.
Einen schöneren Tischmülleimer kann man gar nicht haben.
Liebe Grüße,
der Jens wars gewesen...
--------------------------------------------------------------
Die Wege der Elektronen sind unergründlich.
der Jens wars gewesen...
--------------------------------------------------------------
Die Wege der Elektronen sind unergründlich.