ルデコのブログ -4ページ目

ブログ画像一覧を見る

このブログをフォローする

<< 前のページへ最新 | 2 | 3 | 4 | 5 | 6 | 最初次のページへ >>

アルﾃﾞｨーノUNO/NANO　スケッチ公開

ELEGOO Arduino用 Nanoボード V3.0 CH340/ATmega328P、Nano V3.0互換 (3)

Amazon（アマゾン）

1,450円

ELEGOO Arduino用UNO R3コントロールボード ATmega328P ATMEGA16U2 +USBケーブル

Amazon（アマゾン）

1,299円

手首ロボットの両手を動かしました。

アルﾃﾞｨーノUNO/NANO　スケッチ公開。

//LEDECO.com
//2020.06.16
#include <Servo.h>

Servo myservo1;
Servo myservo2;
Servo myservo3;
Servo myservo4;
Servo myservo5;
void setup() {
Serial.begin(9600);
myservo1.attach(5);
myservo2.attach(6);
myservo3.attach(7);
myservo4.attach(8);
myservo5.attach(9);
}

void loop() {
myservo1.write(75);
myservo2.write(75);
myservo3.write(75);
myservo4.write(0);
myservo5.write(0);
delay(1000);
myservo1.write(0);
myservo2.write(0);
myservo3.write(0);
myservo4.write(75);
myservo5.write(75);
delay(1000);
myservo1.write(75);
delay(1000);
myservo2.write(75);
delay(1000);
myservo3.write(75);
delay(1000);
myservo4.write(0);
delay(1000);
myservo5.write(0);
delay(1000);
myservo5.write(75);
delay(1000);
myservo4.write(75);
delay(1000);
myservo3.write(0);
delay(1000);
myservo2.write(0);
delay(1000);
myservo1.write(0);
delay(1000);
myservo1.write(75);
delay(1000);
myservo2.write(75);
delay(1000);
myservo3.write(75);
delay(1000);
myservo4.write(0);
delay(1000);
myservo5.write(0);
delay(1000);
myservo5.write(75);
delay(1000);
myservo4.write(75);
delay(1000);
myservo3.write(0);
delay(1000);
myservo2.write(0);
delay(1000);
myservo1.write(0);
delay(1000);
myservo3.write(75);
myservo2.write(75);
delay(1000);
myservo3.write(0);
myservo2.write(0);
delay(1000);
}

手首ロボットを作ってます。

手首ロボットを製作してます。左手が動く様になりました、

サインスマート（SainSmart）バイオニックロボット5本指ハンドロボットパームグリップリンケージサーボ制御左右手（5DOF Humanoid Five Fingers Metal Manipulator Arm Left Hand with Servos for Robot DIY）

Amazon（アマゾン）

12,999円

復活しました。

7年ぶりにアメブロ復活しました。コロナショックでパソコンの前に向かう事が多くなり再び電子工作をする様に

なりました。

7年前パソコンのハードディスクのクラッシュでデーターがで飛んでから興味が無くなり放置状態でした。コメント

くれた皆さまに返事出来なくてすみませんでした。

8X8X8LEDキューブの製作②

設計回路図　実際は立体配線するので表現し難い。解り難いよね。

8X8X8LEDキューブをコントロールするマイコンは、アトメルの　ＡＶＲマイコン　ＡＴＭＥＧＡ６４４Ｐ－２０ＰＵを初めて使ってみた。1個￥450(税込) 只今品切れらしい。

開発環境はKandaＳＴＫ200 を使ってプログラムをビルド。言語はＢＡＳＣＯＭ－ＡＶＲ　ＢＡＳＩＣコンパイラでプログラムしました。

ソースドライバーに８ｃｈトランジスタＴＤ６２７８３　
ＰＮＰダーリントン接続みたいだから電圧降下が大きそう。赤色ＬＥＤでＶｆが低いからいいけど青や白などならＰｃｈＦＥＴに変えなければ明るく光らないな。

シンクドライバーに８ｃｈラッチの７４Ｆ３７３を８個、使ってます。

だれもやって無い様なＬＥＤキューブの必殺技　ロジックＩＣ　７４Ｆ３７３を８段重ね。

親カメの上に子カメを乗せて子カメの上に孫カメを乗せて、、

配線は出来るだけ短く確実に半田付け。

配線は下の層から順番に。

ＬＥＤの保護抵抗は、最初は高い抵抗で電流計測をしてから１００Ωから３０Ωに変更。

ＡＴＭＥＧＡ６４４Ｐ－２０ＰＵの設定、ＢＡＳＣＯＭ－ＡＶＲ　ＢＡＳＩＣコンパイラのプログラムは次回。

8X8X8LEDキューブの製作①

キューブの製作の設計回路図が間違いが多くて、訂正する時間が無く先にYouTube動画の投稿が先になってました。

フルカラーＬＥＤや青ＬＥＤで製作してみたいけどとりあえず安価な赤ＬＥＤでデーター蓄積。
使用部品の選択

秋月で一番安い赤ＬＥＤを仕入れ。２袋１０００個

赤色ＬＥＤ　５ｍｍ　ＯＳＤＲ５１１３Ａ　（５００個入）1袋￥1,800（税込）
オプトサプライの５ｍｍＬＥＤです。
◆本体：着色されています（透明）。
◆外形５ｍｍ
◆発光色：赤色
◆順方向電圧（ＶＦ）：２．０Ｖ（標準）（＠６０ｍＡ）
◆輝度：１２００ｍｃｄ（標準）（＠２０ｍＡ）
◆ドミナント波長：６４０ｎｍ（標準）（＠２０ｍＡ）
◆逆耐圧：５．０Ｖ
◆半減角：１５°（狭角）
※１個あたり３．９円の激安ＬＥＤです。明るさよりも単価でお探しの方におすすめ。
とりあえず一番安ものです。

LEDキューブ組立方
加工前ＬＥＤの標準姿　足の長い方が＋（アノード）ペンチで折り曲げ加工

中国の女工さんになったつもりで５１２個を出来るだけ同じように　ペンチで折り曲げ加工したら半田付け。

両面テープでＬＥＤを仮固定して、方向性を決めて半田付け。

ベース基板はＡ４サイズの２ｍｍのアクリル板。１００均で２００円

一気に作った方が曲が整う。

４個単位で半田付け

縦の－側（カソード）を半田付け

出来るだけ揃えて平面になる様に半田付け修正

これを８面製作。

８面完成したら建築。

アクリル板に６４個の穴をあけて点灯試験をしてから１面づつ差し込む

0.6ｍｍのすずメッキ線で面渡しを寸法調整して半田付け。

8X8X8LEDキューブの製作

8X8X8LEDキューブの製作しました。

赤外線リモコンカーの製作①

去年９８０円で買った中華製トイラジコン「ショベルカー」を赤外線リモコンカーに改造してみます。

とりあえず、そのまま遊んでみた。

１０分ほどでもう飽きた。電波は５ｍくらいしか届かない。動きは鈍くショベルはただ動くだけ
物は掬えない。

作りの悪い不要な飾り部品を取去って作り直してみる。130型モーター２個でデフの様な減速器
が付いて４輪駆動。

ＩＣが１個で40ＭＨｚの電波を使ってる。電池はニッカド1.2Ｖｘ5　ＤＣ６Ｖにしてみた。
動きは素早くなった。

何もしてないのに、ショベルがゆっくりと動いてる。電池はニッカド1.2Ｖｘ5　ＤＣ６Ｖに変えたのが原因か？注意書き通りに使わないとアカンのか？安もんはあかんな。価格相応です。

そのまま遊んでいると今度は左に旋回出来なくなった。
ＬＥＤで電飾する以前に潰れてしまった。
中華製トランジスタが飛んでいるんだろけど、そのまま修理するよりも、この前に開発した赤外線送信機でコントロールできる様に改造してみる。電子回路は全面取替。電波機器の玩具は改造してはダメな事が多いらしい。アホな法律があるのでそのまま放置。

モーターコントロール設計回路図

フルブリッジドライバー　ＴＡ８４２８Ｋ　ＤＣモーターコントローラーを使ってみた。
フルブリッジドライバーＴＡ８４２８Ｋ（２個入）1パック￥300（税込）秋月
ブラシ式ＤＣモータ用フルブリッジ（Ｈブリッジ）ドライバ　ＴＡ８４２８Ｋ（Ｓ）
●ＤＣモータ用ブリッジドライバです。
●高出力電流：３．０Ａ（ＰＥＡＫ、１００ｍＳ）１．５Ａ（ＡＶＥ.）
●ブレーキ、ストップモードあり
●モータ用電源電圧Ｖｃｃ＝最大３０Ｖ
●ロジックＨインプット電圧：２．０Ｖ～Ｖｃｃ
●フリーホイールダイオード内蔵
●サーマルシャットダウン、短絡保護回路内蔵

ニッケル水素単３電池４本　ＤＣ４．８Ｖで駆動してみた。ＤＣ７Ｖ以下では動作しないとか
書いてあったのでそんな事無いやろと実験してみた。

いずれ XBee を付けて無線ラジコンにするつもりなのでマイコン側の　AVRマイコンATtiny2313の操作電圧はＤＣ3.3Ｖ　に落とすつもり。

ＴＡ８４２８Ｋは効率が悪いとか書いてあったけどテープレコーダー駆動用のＴＡ７２９１Ｐ
やＴＡ７２８８Ｐよりは良いでしょう。

赤外線リモコン送信機はラジコンの電池ケースと押しボタンの接点を取りだしたものです。
ディップＳＷの設定は照明リモコンとダブらない番号に設定。Ads = 3に仮設定

取りあえず赤外線リモコンカーの完成。XBee　のアンテナ付きを発注中なのでそれまでに
コントロールプログラムを作成。

赤外線リモコンの方が元のラジコンより確実に操作できるな。XBeeラジコンに改造するのはこれから。

フルカラーＬＥＤタワー②

YouTubeにフルカラーＬＥＤタワー動画アップしました。

組立点灯てすと

ピサの斜塔を修正。

一度間違った位置に半田付けしてしまうと修正が大変。

適当な所で妥協してマイコンのプログラムを作成。

' **************************************************
' * ledpikapikaプログラム *
' * AVR is using ATtiny2313 S.Tsuda *
' * Basic Compiler is BASCOM-AVR *
' * Copyright By LEDeco 2013. 01.15 *
' **************************************************

$Regfile = "attiny2313.dat" 'AVRデバイスを"ATtiny2313"に設定
$crystal = 1000000 'クロック周波数を4MHzに設定。
$hwstack = 32 'ハードウェア・スタックの容量を設定。
$swstack = 8 'ソフトウェア・スタックの容量を設定。
$framesize = 24 'フレーム領域の容量を設定。

Config Porta = Output 'Portaの接続ポートを出力に設定する。
Config Portb = Output 'Portbの接続ポートを出力に設定する。
Config Portd.0 = Output 'Portd.0の接続ポートを出力に設定する。
Config Portd.1 = Output 'Portd.1の接続ポートを出力に設定する。
Config Portd.2 = Output 'Portd.2の接続ポートを出力に設定する。
Config Portd.3 = Output 'Portd.3の接続ポートを出力に設定する。
Config Portd.4 = Output 'Portd.4の接続ポートを出力に設定する。
Config Portd.5 = Output 'Portd.5の接続ポートを出力に設定する。

Config Rc5 = Pind.6 , Wait = 2000 '赤外線受信モジュールの接続ポートを設定する。
Dim Ads As Byte 'リモコンRC5コードのアドレス。(0 ～ 31)
Dim Cmd As Byte 'リモコンRC5コードのコマンド。(0 ～ 63)

Enable Interrupts

Dim R As Byte
Dim N As Byte
Dim M As Byte
Dim T As word
Dim s As word

Do
R = 0
T = 30
N = 1
s = 300

Porta = &B00000011
Portb = &B00000000
Portd = &B00111111
Wait 7

Portb = &B00000001
Waitms T
Portb = &B00000000
Waitms s
Portb = &B00000010
Waitms T
Portb = &B00000000
Waitms s
Portb = &B00000100
Waitms T
Portb = &B00000000
Waitms s
Portb = &B00001000
Waitms T
Portb = &B00000000
Waitms s
Portb = &B00010000
Waitms T
Portb = &B00000000
Waitms s
Portb = &B00100000
Waitms T
Portb = &B00000000
Waitms s
Portb = &B01000000
Waitms T
Portb = &B00000000
Waitms s
Portb = &B10000000
Waitms T
Portb = &B00000000
Wait 7
Do
Do
Do
Getrc5(ads , Cmd)
If Ads < 32 Then
Exit Do
End If
Loop
If Ads = 0 Then
If Cmd = 0 Then
Portb = &B11111111
Exit Do
End If
If Cmd = 1 Then
PORTb = &B01010101
Exit Do
End If
If Cmd = 2 Then
PORTb = &B10101010
Exit Do
End If
If Cmd = 3 Then
PORTb = &B11001100
Exit Do
End If
If Cmd = 4 Then
PORTb = &B00110011
Exit Do
End If
If Cmd = 5 Then
PORTb = &B11110000
Exit Do
End If
If Cmd = 6 Then
PORTb = &B00001111
Exit Do
End If
If Cmd = 7 Then
Portb = &B00000000
Exit Do
End If
If Cmd = 8 Then
Portb = &B00000000
Exit Do
End If
If Cmd > 8 Then
Portb = &B00000000
Exit Do
End If

End If
If Ads = 1 Then
If Cmd = 0 Then
Portb = &B11111111
Exit Do
End If
If Cmd = 1 Then
Portb = &B11111110
Exit Do
End If
If Cmd = 2 Then
Portb = &B11111101
Exit Do
End If
If Cmd = 3 Then
Portb = &B11111011
Exit Do
End If
If Cmd = 4 Then
Portb = &B11110111
Exit Do
End If
If Cmd = 5 Then
Portb = &B11101111
Exit Do
End If
If Cmd = 6 Then
Portb = &B11011111
Exit Do
End If
If Cmd = 7 Then
Portb = &B10111111
Exit Do
End If
If Cmd = 8 Then
Portb = &B01111111
Exit Do
End If
If Cmd > 8 Then
Portb = &B00000000
Exit Do
End If
End If
If Ads = 2 Then
If Cmd = 0 Then
Portb = &B11111111
Exit Do
End If
If Cmd = 1 Then
PORTb = &B00000001
Exit Do
End If
If Cmd = 2 Then
PORTb = &B00000010
Exit Do
End If
If Cmd = 3 Then
PORTb = &B00000100
Exit Do
End If
If Cmd = 4 Then
PORTb = &B00001000
Exit Do
End If
If Cmd = 5 Then
PORTb = &B00010000
Exit Do
End If
If Cmd = 6 Then
PORTb = &B00100000
Exit Do
End If
If Cmd = 7 Then
Portb = &B01000000
Exit Do
End If
If Cmd = 8 Then
Portb = &B10000000
Exit Do
End If
If Cmd > 8 Then
Portb = &B00000000
Exit Do
End If
End If
Waitms s

Loop
Loop
Loop
End

フルカラーＬＥＤタワー

クリスマスツリーに飾り付け配線まで出来ずにブレッドボードのままの
赤外線リモコン・プログラマブルイルミネーションＬＥＤでタワーを組んでみました。

組立回路図

クリスマス用プログラマブルイルミネーションＬＥＤに赤外線受光器をつけたものです。

組み立て方

組み立てる基板を半田付けの冶具にして半田付け
片面ガラス・ユニバーサル基板　Ｂタイプ　めっき仕上げ　（９５ｘ７２ｍｍ）1枚￥120（税込）秋月

ＬＥＤ８個を円形に半田付け。極性注意+側アノードコモンです。
5mmRGB７色自動変化ゆっくりタイプIC内蔵で自動的にゆっくり７色に変化します。
動作電圧　3.5-5.0V点灯周期　34秒/１サイクル(Vdd4.5V時)
RED　　800mcd 620-635nm
GREEN 1500mcd　515-530nm
BLUE 1000mcd 460-475nm