Themabewertung:
  • 1 Bewertung(en) - 5 im Durchschnitt
  • 1
  • 2
  • 3
  • 4
  • 5
HungryRobot als Tischmülleimer
#1
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.


.jpg   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:

.hex   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.
Zitieren
#2
Hi Jens,

das ist sehr cool.

Wie viel Kids haben das schon nachgebaut ?

Gruß
Oliver
Nette Grüße aus dem Ruhrgebiet
(ollisTubes)
Zitieren
#3
(14.03.2021, 17:21)olli0371 schrieb: Hi Jens,

das ist sehr cool.

Wie viel Kids haben das schon nachgebaut ?

Gruß
Oliver

Mindestens 30, könnten auch schon 40 sein. Ich zähle da nicht mit.
Liebe Grüße,
der Jens wars gewesen...

--------------------------------------------------------------
Die Wege der Elektronen sind unergründlich.
Zitieren
#4
ein Krümelmonster :-)
so einen Lehrer hätte ich auch damals gerne gehabt!
Gruß,
Jupp
-----------------------------

was du baust ist immer mit dir verbunden
(Lego)

Einsamkeit ist nur ein Mangel an Technologie
(@beetlebum)
Zitieren


Gehe zu: