舊文日常 – 熊的開發

XPLOVA E5 智慧型手機臂戴

小熊 — Mon, 10 Nov 2014 11:11:00 +0000

左邊兩個是在網路上買的

一個是手腕戴

一個是手臂戴

但因為之後想要用智慧型手機

搭配藍芽耳機聽音樂運動

所以需要智慧型手機臂戴

但同時掛XPLOVA E5的手腕戴

感覺手臂上太多東西

所以我就用釣魚線

將XPLOVA E5的底座架

縫在智慧型手機臂戴上

他就升級成 XPLOVA E5 智慧型手機臂戴

當然可能會有人疑惑

手機APP不是就有GPS訂位紀錄功能嗎?

幹嘛多帶XPLOVA E5

1.專業的GPS定位紀錄器會記錄更詳細，紀錄間隔更短

2.比較不耗電，智慧型手機耗電量有多可怕，相信大家都知道

3.XPLOVA官方平台管理紀錄很好用

超便宜的3D世界，只能自己爽…

小熊 — Wed, 05 Nov 2014 06:18:00 +0000

在YOUTUBE看到GOOGLE Cardboard glass

https://www.youtube.com/watch?v=HFdaagINam0

於是就手癢了

超想體驗虛擬實境滴

馬上噴兩支放大鏡$60-

塑膠板$30-

拆鏡片

拿出傢伙，這工具專業切圓阿

我打算把放大鏡片夾在中間

阿愣?!

立可貸雙面膠，敲好用!!

把剩餘要丟掉的板子拿來貼在中間

其實我可以黏整塊說

哀~黏完才想到，傻

嚕一嚕

三明治放大眼鏡完成

製作3D眼鏡的小空間

要符合頭型

拿出，被放在工具箱底層的魔鬼氈

敲簡單~

手機剛好夾住

泡黏膠

固定手機不滑動

我家電影院開幕囉

NICE!!

手機在裡面控制不便

直接連電腦

用電腦控制

電影抓抓抓~~~

你也手癢了嗎?!

鎖被撬~乾~登登登!!開鎖計時器誕生了

小熊 — Wed, 29 Oct 2014 08:06:00 +0000

我家鋁門上面有兩道十字型的鎖

某天回家

開鎖時發現

下面那一道鎖無法轉動

發現鑰匙孔有被破壞的痕跡

好險有兩道鎖

拖延時間

不然晚點回家

就被闖入了

當下就想說這樣不行

人不在一樓

都不知道沒發生什麼事了

當下就決定做個開鎖計時器

就是開完第一道鎖

就會開始計時

要在設定的時間內開完第二道鎖

不然就會啟動警報器

本次開鎖計時器所需零件▲

12V變壓器和閃光警報器▲

8051開鎖計時器電路▲

零件圖▲

空中連接器電路▲

洗電路板過程就看之前的文章囉 > GP DIY Angry Bird 車尾燈▲

基本的8051零件電路焊接完成▲

不過之後還是有作一些小修改(正面)

電路板(背面)▲

看到背面有一顆綠色電容

就是因為RESER按鍵要外接到殼子上

所以將原本要焊接電容的位子給了針腳

而將電容移至背面

電路板(側面)▲

寫程式測試囉▲

程式碼在文章尾巴

PORT設定

P1.0橘燈

P1.1紅燈

P1.2閃光警報器

P2.0第一道鎖

P2.1第二道鎖

左邊兩個黑黑的東西是微動開關

它桿子很長

可以摺成需要的樣子

還不錯

使用微動開關的常開腳位(NO)

殼子上挖洞▲

將按鈕、指示燈和電源座焊上線材並裝好▲

將完成的8051電路裝進殼子內

底部有用六腳銅柱固定

六腳銅柱直接用快乾黏在殼子內(超省事)

我家左邊鋁門每天都會常常開關▲

如果門上有線材

開開關關線材容易斷裂

所以做一個空中連接器

右邊的空中連接器電路板▲

上面裝了兩根探針

探針本身有彈簧會伸縮

又可導電

左邊的空中連接器▲

摺好形狀的微動開關▲

這時都差不多了▲

但還差一樣東西

12V轉5V的變壓器

我超懶得想▲

就想到USB車充(超省事)

因為閃光警報器是吃12V的電

而8051吃5V的電

所以需要轉壓

外殼拆掉▲

接上線材

就完成囉

裝在門上面▲

超懶得鑽洞

直接用3M黏的

線材我想之後要加壓條

不然不太美觀~~

未開鎖▲

開鎖後▲

剛好把微動開關推開

亮燈囉▲

空中連接器▲

如果右邊鋁門要開也可以

拔掉此空中接頭就可以囉

使用說明:

紅色按鈕為開關

第一道鎖打開後，計時5秒確定有開鎖，開啟橘燈，計時60秒，在60秒內開啟第二道鎖，計時3秒確定有開鎖，狀態解除，關閉橘燈。

超過60秒未開啟第二道鎖，開啟紅燈，啟動警報，啟動閃光警報器，響60秒，關閉30秒，共開關3次之後停止，橘燈紅燈腳替0.5秒閃爍，紀錄開鎖失敗，需要按下綠按鈕重新啟動。

程式碼:

#include 
#define warning_led P1_0
#define alarm_led P1_1
#define alarm_sound P1_2
#define up_lock P2_0
#define down_lock P2_1

void delayms(unsigned int time);
void init();
void first_scan();
void up_first();
void down_first();
void alarm();
void lock();

int time_0_5s=500;
int time_3s=3000;
int time_5s=5000;
int time_10s=10000;
int time_30s=30000;
int time_1m=60000;
int time=0;
int other_luck_n=120;

main()
{
P2=0;
init();
first_scan();

}

void first_scan()
{
while(1)
{
if(up_lock==0)
{
time=time_5s;
delayms(time);
if(up_lock==0)
{
warning_led=0;
up_first();
}
}

else if(down_lock==0)
{
time=time_5s;
delayms(time);
if(down_lock==0)
{
warning_led=0;
down_first();
}
}
}
}

void up_first()
{
int n=other_luck_n;
while(n>0)
{
if(down_lock==0 && up_lock==0)
{
time=time_3s;
delayms(time);
if(down_lock==0 && up_lock==0)
{
time=time_10s;
delayms(time);
main();
}
}
else if(down_lock==1 && up_lock==1)
{
time=time_3s;
delayms(time);
if(down_lock==1 && up_lock==1)
{
time=time_10s;
delayms(time);
main();
}
}
time=time_0_5s;
delayms(time);
n--;
}
alarm();
}

void down_first()
{
int n=other_luck_n;
while(n>0)
{
if(down_lock==0 && up_lock==0)
{
time=time_3s;
delayms(time);
if(down_lock==0 && up_lock==0)
{
time=time_10s;
delayms(time);
main();
}
}
else if(down_lock==1 && up_lock==1)
{
time=time_3s;
delayms(time);
if(down_lock==1 && up_lock==1)
{
time=time_10s;
delayms(time);
main();
}
}
time=time_0_5s;
delayms(time);
n--;
}
alarm();
}

void alarm()
{
int n=3;
alarm_led=0;
while(n>0)
{
alarm_sound=1;
time=time_1m;
delayms(time);
alarm_sound=0;
time=time_30s;
delayms(time);
n--;
}
lock();
}

void lock()
{
while(1)
{
int time=time_0_5s;
delayms(time);
if(P1_7==0)
{
P1_7=1;
warning_led=0;
alarm_led=1;
}
else
{
P1_7=0;
warning_led=1;
alarm_led=0;
}
}
}

void init()
{
warning_led=1;
alarm_led=1;
alarm_sound=0;
}

void delayms(unsigned int time)
{
unsigned int n;
while(time>0)
{
n=120;
while(n>0)
{
n--;
}
time--;
}

}

製作超便宜藍芽安全帽搭配語音控制軟體敲好用

小熊 — Fri, 10 Oct 2014 10:38:00 +0000

因為耳機升級

我的有線無線耳罩耳機

已經升級到羅技 UE9000了

但是戴耳罩耳機慢跑

還是有點沉重

剛開始還是有線的

線晃呀晃

感覺不舒服

後來搭配藍芽發射器+藍芽耳罩耳機

但一陣子之後藍芽發射器感覺有點怪怪的

放在口袋

有時還是會斷訊

可以能因為東西太老了

大概是7~8年前買的

而IPOD容量也不大

新一代IPOD感覺CP值又不高

後來又改用手機放音樂囉

MAiNNav MG-600 GPS 運動軌跡記錄器官方軟體

小熊 — Tue, 12 Mar 2013 13:15:00 +0000

大四課業竟然是最重的時候

大家都在放假

我卻修到30學分

還要加考一張國家乙級證照

期末考那陣子

壓力大就想喝50嵐的波霸奶茶（多波霸，因為我喜歡波霸）

於是兩個禮拜的下課回家都買一杯

很好

30學分 ALL PASS

證照也到手了

但體重從68 UP TO 72

考完就開始運動

跑步和單車

看可不可以回到60KG

正在努力檔中

我想要記錄每次運動的資料

距離

高度

時間

所以我買了一台低階的GPS軌跡記錄器

網路買的商家還送我東西

好像是輪胎的充氣蓋*2

主機

就一些基本的配件

車架

USB充電器（感覺有點爛，我用我副場的IPOD充電器充電，他附的我就沒用了）

USB線

沒用的光碟（需要有KEY才能用，裡面的軟體屬於選購品）

保證書

手臂套（這間賣家送的，但我手臂比較粗，只能綁在手肘附近）

“掉漆1”

不知道邊邊

這樣會影響到防水效果

“掉漆2”

使用2次後

稍微晃動

發現他會自己關機

“掉漆3”

而且晃動機體會有東西碰撞的聲音

我心一橫

就把MG-600拆了（四顆螺絲而以，簡單）

用電表量電池電源線的插頭

竟然量不到電壓

問題一定出在電池

把電池拆開一看

竟然是鋰電池與電源保護電路板脫焊

扯

我就自己用焊錫處理一下

晃動機體會有東西碰撞的聲音

就是電池的聲音

沒有固定好的關係

我就使用海綿壓住

腳架也是他們家的一項敗筆

因為表頭的固定架與車架只有用一顆螺絲固定

之前只有一顆螺絲

很容易MG-600就跳樓了

現在有螺絲與螺帽了

比較安全

我怕會又鬆掉

就補上螺絲膠

這樣應該比較妥當

裝好固定架後

卡上主機

發現主機會稍微晃動

也就是沒有卡緊

我就在使用海綿補強

這樣就不會晃動囉！！

在海綿底部貼一層膠帶

是怕之後撕海綿會脫膠

先貼膠帶

之後會比較好處理

爽~

“掉漆4”

官方網站上的傳輸軟體載點竟然失效

街上USB又不是像隨身碟一樣

可以直接拉檔案

一定要透過官方軟體傳輸

我找了一個晚上

好顯國外有人備份到網路空間

不然我就要退貨了

MainNav GPS Application Software 官方軟體：

1.檔案名稱 : mainnavsetup2.1.1.26.rar

大小 : 6.33 MB

載點 : Mediafire;Uploadingit;SkyDrive;4shared;Opendrive

搖擺鈴SHAKE WEIGHT DIY 改善因流手汗不好握的問題

小熊 — Tue, 12 Mar 2013 09:20:00 +0000

握把布真的很好用

會知道握把布好用的原因

是因為之前我在7-11買的普通三折傘壞了

真的超容易掛點

所以就跑到雨傘王買支比較堅固的傘

但心想價格高

要用比較久應該保護一下握把

不然很容易脫漆

就想到之前在運動用品店看到握把布這種東西

原本是包覆球桿握把的地方

止滑又美觀

然後就完成了

之前在大創（39元商店）

買的握力器（15KG）

應該是便宜貨的關係

在握的地方

是用紅色海綿包住

重點在那個海綿

超級臭的！！

我就當場用刀子劃開海綿

用握把布重新包

用起來蠻爽的…

重點來了

搖擺鈴

我的手指比較短

再加上容易留手汗

所以買次搖到一半

就感覺很滑

靈機一動

心想該包一下了

白色也不錯~

那我就繼續搖囉~

VB新手-十進位轉二進位含專案程式

小熊 — Wed, 13 Feb 2013 06:11:00 +0000

剛接觸不久

我在寫這程式學到一些東西

想說讓這程式完善一點

就在網路上找找

網路上臥虎藏龍阿

別人寫的十進位與二進位互轉

http://changsunche.pixnet.net/blog/post/25386951

1.除法無條件捨去，使用FIX與INT的差別

http://tlcheng.twbbs.org/myInfobox/zdisqvb6p4/post039646.htm

2.輸出文字格式format用法（自動補零）

http://www.programmer-club.com/ShowSameTitleN/vb/32111.html

3.預設文字輸入的文字方塊

http://www.programmer-club.com.tw/ShowSameTitleN/vbdotnet/421.html

4.預設鍵盤ENTER對應程式按鈕

http://gb.twbts.com/index.php?topic=9941.0

5.限制文字方塊只可輸入數字（ASCII）

http://tw.myblog.yahoo.com/star-888/article?mid=2765

6.限制文字方塊可輸入字元位數

http://tc.wangchao.net.cn/zhidao/detail_4416903.html

我是VB新手

以下是我打的程式碼

哪裡有問題還是我脫褲放屁都可以糾正我喔

感謝您

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim temp1 As Single
        Dim temp2 As String = “”
        Dim temp3 As String = “”
        temp1 = T1.Text
        T2.Text = T1.Text
        Do While temp1 > 0
            temp2 = (temp1 Mod 2) & temp2 ‘將除於二餘數由右向左放入
            temp1 /= 2 ‘將數字除於二
            temp1 = Fix(temp1) ‘無條件捨去小數點
        Loop
        temp2 = Format(Val(temp2), “00000000”) ‘沒滿八位數，會自動補零
        T1.Focus() ‘移游標至TextBox1
        L1.Text = temp2
        T1.Text = “”
    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Button1.Enabled = False ‘初始顯示按鍵無效，無法壓按
        Me.Text = “十進位轉二進位” ‘程式標題名稱
    End Sub

    Private Sub T1_TextChanged(sender As Object, e As EventArgs) Handles T1.TextChanged
        If (T1.Text = “”) Then ‘無輸入時，顯示成灰鍵，無法壓按
            Button1.Enabled = False
        Else
            Button1.Enabled = True
        End If

    End Sub

    Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles T1.KeyPress
        If Asc(e.KeyChar) >= 48 And Asc(e.KeyChar) <= 57 Or Asc(e.KeyChar) = 8 Then Exit Sub ‘限制鍵盤輸入，只允許0~9和倒退鍵
        e.Handled = True
        ‘在TextBox 輸入資料,按 Enter 後自動執行 Button1
        If Asc(e.KeyChar) = 13 Then ‘將ENTER按鍵對應Button1
            Me.Button1.Select()   ‘選擇 Button1
            SendKeys.Send(“{enter}”) ‘按下 Enter
        End If
    End Sub

End Class

1.專案名稱 : 2013-02-13-二進位.rar

大小 : 89 KB

二進位\二進位\bin\Debug 內有X64的EXE執行檔

載點 : Mediafire ; Uploadingit ; SkyDrive ; 4shared ; Opendrive

GP DIY 車尾燈夜燈煞車燈背光變色變形金剛樣式~不太像……

小熊 — Mon, 09 Jul 2012 13:09:00 +0000

繼上一代

使用塑鋼土年背光變色模組

鎖螺絲的方式

還是比用黏的穩固…

紅色 LED 共 105 顆

白色 LED 共 48 顆

RGB LED 共 15 顆

背光變色RGB LED

夜燈

煞車燈

夜燈

煞車燈

背光變色模組

夜燈

煞車燈

夜燈

煞車燈

變色控制器

可有多種變化方式

變色

漸變

純RGB變色

白色閃爍

以上都可以速度控制

單色顯示時

可調亮度

背光 : 紅

背光 : 黃

背光 : 綠

背光 : 藍

背光 : 紫

背光 : 白

登山模式^^(尚未開大燈)

數位溫控焊錫筆&熱風槍入手改裝利器

小熊 — Fri, 25 May 2012 15:13:00 +0000

親自去拿貨

2.6K

算是很便宜

很興奮的說~齁齁齁

還有保證書

這是另外送的吹嘴

另外送的錫頭

IC撬起器

搭配熱風槍使用的

主機!!

這台是變壓器比較好(60W)的主機

採分離式配件

日後更換容易

熱風槍與焊錫筆

焊錫筆

熱風槍

熱風槍口

組合

TURN ON !!!!

加熱速度比一般的焊槍快很多

BOSCH 博世 3.6V 簡便型電動螺絲起

小熊 — Fri, 25 May 2012 15:13:00 +0000

今天回到家

正準備上樓時

被我爸叫住

爸:你有用到電動螺絲起子嗎?

我:有阿，怎麼了?

爸:這給你，轉速與扭力都不太夠我用。

我:謝啦

鐵殼包裝還蠻精緻的(不過不好收納就是了)

背面

電動螺絲刀

打開囉

恩不錯

一些輕工業應該還可以應付

前進燈(順時針轉)

不過好像不是全部螺絲都這樣設計齁…

後退燈(逆時針轉)

前方有黃?橘?光..

這顏色的光有點怪

改天自己改白光

充電接點與充電座

內附一支鑽尾

轉數真有點低…

舊文日常 – 熊的開發

XPLOVA E5 智慧型手機臂戴

超便宜的3D世界，只能自己爽…

鎖被撬~乾~登登登!!開鎖計時器誕生了

製作超便宜藍芽安全帽 搭配語音控制軟體 敲好用

MAiNNav MG-600 GPS 運動軌跡記錄器 官方軟體