kowala's home

BCB6 - 2D實驗室移動畫素

2016-06-06T03:23:00.001+08:00

上一篇 2D實驗室，簡單介紹了畫素產生，我們使用了圖紙物件 TBitmap 來存放畫素。本篇接著介紹簡單地處理畫素移動，電腦螢幕的座標系統，是以左上為原點(0,0)，向右x遞增，向下y遞增，如下圖左上角所示。

若我們想要圖形由右下朝左上移動，如上圖，水平x減少80個畫素，垂直y減少80個畫素，這樣就可以做到由右下朝左上移動。

好了，知道原理後該如何做？我希望在我們的實驗室中，按下move按鈕，圖形會朝左上移動，按下back按鈕，圖形會跑回來，如下圖。

那我們必須在move按鈕的按下事件中，寫右下朝左上移動，然後在back按鈕的按下事件中，寫左上朝右下移動。
觀察上圖，我們要移動綠色框所圈起來的畫素，那我們要知道綠色框的左上角點與圖紙的原點(左上角) 偏移多少畫素，綠色框的寬與高是多少畫素，然後每個畫素x-80，y-80，把它寫回圖紙物件 myLab (TBitmap物件)，再把 myLab 指給Image1物件，這樣就會顯示移動的樣子了。

上述說明可以知道，為了移動這些像素，我們要知道好多參數，
綠色框偏移值
綠色框的寬與高
要移動多少畫素
...

    int ori_w;    //原圖寬
    int ori_h;    //原圖高
    int off_x;    //矩形對原點偏移x(左上點)
    int off_y;    //矩形對原點偏移y
    int box_w;    //框寬度限制
    int box_h;    //框高度限制
    int mov_x;    //tar x 矩形移動到(左上點)
    int mov_y;     //tar y

我不想直接在按鈕的事件中撰寫代碼，這會使程式看起來凌亂，我想要在事件中只寫參數，然後把參數傳遞給我們的LIB去處理，我們可以使用結構體來簡化參數的傳遞，也就是我只需傳遞結構體的指標就可以了。做法如下，

1.在 mylib.h中宣告結構體
struct coordinate{ //參數結構體宣告
    int ori_w;    //原圖寬
    int ori_h;    //原圖高
    int off_x;    //矩形對原點偏移x(左上點)
    int off_y;    //矩形對原點偏移y
    int box_w;    //框寬度限制
    int box_h;    //框高度限制
    int mov_x;    //tar x 矩形移動到(左上點)
    int mov_y;     //tar y
};

2.順便宣告結構體指標
coordinate *coor;

3.在mainfrm.cpp中，新增一個結構體變數
//new一個結構體參數
coor = new coordinate;

4.在按鈕的事件中給予座標值，呼叫函式moveTo()，把結構體指標 coor 及圖紙物件指標 myLab 傳進去，移動處理後，再把 myLab 指給Image1物件。

//move 按鈕的事件 右下朝左上
void __fastcall TForm1::Button2Click(TObject *Sender)
{
    coor->ori_w=640;
    coor->ori_h=480;
    coor->off_x=240;    //矩形對原點偏移x(左上點)
    coor->off_y=180;    //矩形對原點偏移y
    coor->box_w=160;
    coor->box_h=120;
    coor->mov_x=160;    //tar x = off_x-80
    coor->mov_y=100;     //tar y = off_y-80
    moveTo(myLab,coor);
    Image1->Picture->Bitmap=myLab;
}

//back 按鈕的事件 左上朝右下
void __fastcall TForm1::Button3Click(TObject *Sender)
{
    coor->ori_w=640;
    coor->ori_h=480;
    coor->off_x=160;    //矩形對原點偏移x(左上點)
    coor->off_y=100;    //矩形對原點偏移y
    coor->box_w=160;
    coor->box_h=120;
    coor->mov_x=240;    //tar x = off_x+80
    coor->mov_y=180;     //tar y = off_y+80
    moveTo(myLab,coor);
    Image1->Picture->Bitmap=myLab;
}

在 mylib.h中，移動處理函式moveTo()代碼。
//move to
void moveTo(Graphics::TBitmap *scr,coordinate *co){
    Graphics::TBitmap *tmp;//開一塊 mem
    tmp = new Graphics::TBitmap();
    tmp->PixelFormat = pf24bit; //bmp
    tmp->Height = co->ori_h;//圖紙 h
    tmp->Width = co->ori_w;//圖紙 w
    int i,j;
    int len=co->ori_w*3;//line = (byte*) {B,G,R},{B,G,R}...
    //設定底色
    for(j=0;j<co->ori_h;j++){//initial value
        memset(tmp->ScanLine[j],clBlack,len);//clBlack=0=0x00,clWhite=255=0xff
    }
    //開始複製 moveto tmp
    for(i=0;i<co->box_w;i++){
        for(j=0;j<co->box_h;j++){
            tmp->Canvas->Pixels[i+co->mov_x][j+co->mov_y] =
            scr->Canvas->Pixels[i+co->off_x][j+co->off_y];
        }
    }
    //覆蓋回去 scr
    for(j=0;j<co->ori_h;j++){
        memcpy(scr->ScanLine[j],tmp->ScanLine[j],len);
    }
    delete tmp;
}

這樣就完成了

範例程式 IMGLab.rar

BCB6 - 2D實驗室

2016-04-05T17:10:00.002+08:00

本篇就是開一塊記憶體，隨便塗鴉，然後顯示出來，主要是做個環境來測試一些繪圖演算法，當然，你要當作秀圖機，開圖檔也可以的。

首先用 BCB 開一個 vcl 專案，詳細請參考前面文章
BCB6 視窗程式入門
http://kowala21.blogspot.tw/2013/01/bcb6.html

接著新增兩個按鈕，及一個 TImage 物件

把 TImage 物件屬性改成
Height 480
Width 640

這就是我們的工作區，但它現在是空的，我們還要新增TBitmap 物件，並指給它。
我們先新增個 mylib.h ，這樣會使程式看起來較簡潔。

在專案右鍵，然後新增個 h檔，再改檔名為 mylib.h

把它引入， #include "mylib.h"

我們可以新增個圖紙物件 TBitmap，並指給TImage 物件，並為它設定屬性，指定底色。

看起來就像這樣。
這樣看起來很單調，為它加一些其他東西，我希望能在 mylib.h 中完成，所以必須寫個函式，把 TBitmap 物件傳進去。

然後我們可以在 mylib.h 中為所欲為，我為它加了框，畫了X，順便寫幾個字。

mylib.h

code如下

void initSCR(Graphics::TBitmap *buf){
    int w,h,cx,cy,left, top, right, bottom;
    //先在中間畫個框 160*120 TRect(left, top, right, bottom)
    buf->Canvas->Pen->Color = clGreen;//綠色
    buf->Canvas->Brush->Style = bsClear;//框中間透明 Rectangle
    h=buf->Height;//480 工作區寬度
    w=buf->Width;//640 工作區高度
    cx=w/2;    cy=h/2;    //320*240 中心點
    left=cx-(160/2);//240
    top=cy-(120/2);//180
    right=cx+(160/2);//400
    bottom=cy+(120/2);//300
    buf->Canvas->Rectangle(TRect(left,top,right,bottom));//開始畫
    //中間畫 X，用描點的畫
    buf->Canvas->Pixels[cx-3][cy-3] = clWhite;
    buf->Canvas->Pixels[cx-2][cy-2] = clWhite;
    buf->Canvas->Pixels[cx-1][cy-1] = clWhite;
    buf->Canvas->Pixels[cx][cy] = clWhite;//center point (320,240)
    buf->Canvas->Pixels[cx+1][cy+1] = clWhite;
    buf->Canvas->Pixels[cx+2][cy+2] = clWhite;
    buf->Canvas->Pixels[cx+3][cy+3] = clWhite;

    buf->Canvas->Pixels[cx-3][cy+3] = clWhite;
    buf->Canvas->Pixels[cx-2][cy+2] = clWhite;
    buf->Canvas->Pixels[cx-1][cy+1] = clWhite;
    buf->Canvas->Pixels[cx][cy] = clWhite;
    buf->Canvas->Pixels[cx+1][cy-1] = clWhite;
    buf->Canvas->Pixels[cx+2][cy-2] = clWhite;
    buf->Canvas->Pixels[cx+3][cy-3] = clWhite;
    //再加個字
    buf->Canvas->Brush->Color = clGreen;//background color
    buf->Canvas->Font->Color = clWhite;//font color
    buf->Canvas->Font->Size=10;
    buf->Canvas->TextOutA(left+30,top+20,"再加個字");
    buf->Canvas->Brush->Color = clBlack;//background color
    buf->Canvas->Font->Color = clYellow;//font color
    buf->Canvas->TextOutA(left+50,top+80,"不要底色");
}

mainfrm.cpp
code 如下

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "mainfrm.h"
#include "mylib.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
Graphics::TBitmap *myLab;//宣告圖紙，當工作區
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    myLab = new Graphics::TBitmap();//開一塊圖紙，當工作區
    myLab->PixelFormat = pf24bit; //bmp
    myLab->Height = 480;//圖紙 h
    myLab->Width = 640;//圖紙 w
    //設定底色
    myLab->Canvas->Brush->Color = clBlack;//background = clBlack
    myLab->Canvas->FloodFill(0,0,clBlack,fsBorder);//fsSurface,fsBorder

    //把物件傳進去
    initSCR(myLab);

    //指給Image1物件
    Form1->Image1->Picture->Bitmap=myLab;

}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    this->Close();
}
//---------------------------------------------------------------------------

這樣就是一個簡單實驗室了

BCB6 - 在 Windows8.1 安裝 mscomm32.ocx

2016-03-07T11:44:00.003+08:00

很多時候，我們會需要與 RS232 通訊，這時我們就需要 com 通訊元件。
通訊元件有很多第三方元件及微軟的 mscomm32，
本例是在Wwindows8.1下取得 mscomm32 與手動安裝元件。

下載 mscomm32.ocx
http://originaldll.com/file/mscomm32.ocx/7698.html

上圖右下角按鈕，兩個都可以，按下後輸入隨機碼下載。

解壓縮可得到一個元件，只有一個。

mscomm32.ocx

接著是安裝 mscomm32 元件到 Windows8.1

1.複製 mscomm32.ocx
開檔案總管，複製 mscomm32.ocx 到 C:\Windows\SysWOW64

2.安裝 mscomm32.ocx
在視窗中，開啟目錄 C:\Windows\SysWOW64
找到 cmd.exe ，右鍵，以管理員身分執行，
一定要用管理員身分，否則權限不夠，會失敗。

執行下列命令
cd C:\Windows\SysWOW64

先移除註冊
regsvr32 /u MSCOMM32.OCX

再註冊
regsvr32 MSCOMM32.OCX

完成，試一下，OK

Dropbox 下載 mscomm32.ocx

BCB6 EditorLineEnds.ttr issue

2016-02-13T05:46:00.001+08:00

今天看到一個不錯的小程式範例 ColorFormat，可以查顏色代碼，很方便，哪裡知道，windows8.1很不給力，BCB一直出問題，最後，終於解決了，雖不滿意，尚可接受。

可愛的小程式 ColorFormat (click to see source code)

下載 ColorFormat.rar

上面附上已完成的 ColorFormat，調好顏色，按下按鈕，就會把顏色代碼複製到剪貼簿，然後按 Ctrl + v就可以叫出來貼上，也可以右邊 Numeric 數值輸入，0-255，真的很方便。

My Question
好了，推完這支程式之後，來說說我遭遇到甚麼困難，搞了一整天。
我先安裝 BCB 在 Win8.1，完成之後，開個專案，關掉 BCB，要再開啟時，悲劇了，一直錯誤，無法開啟，跳出如下對話。

重新開機又可執行一次 BCB，經過 Google 查詢，發現很多人都有這問題，指向微軟更新包的錯誤，而且到現在還沒改善。

BCB執行時會建立一個檔 EditorLineEnds.ttr，在 windows temp 目錄中，奇怪的是，它會被 System 開啟，然後就不放手，以至於 BCB 要再次執行時，無法再建立該檔，就一直產生錯誤，刪也刪不掉，因為 INUSE。

這很可惡，總不能執行一次就重開機一次吧，後來繼續找解決方案，發現大家的解法就是改檔名，但仍然刪不掉，不過卻可以執行 BCB 而不用重開機了。

國外有人是寫成批次檔來改檔名，也有寫成執行檔供人下載，但我試過，改檔名部分有一些日期會產生非法字元" / "會失敗，所以繼續研究一下，在批次檔中如何改檔名可以不重複，還是要取日期+時間，到分鐘就好，改寫如下，它主要就是把那個作怪的檔

C:\Users\myCon\AppData\Local\Temp\EditorLineEnds.ttr

改檔名

EditorLineEnds2016-2-13.4.33.ttr

然後做一個目錄，全部集中丟裏頭，這樣 BCB 就可以重複執行了，就是執行前，先執行這個批次檔，處理掉這個作怪的檔，然後再執行 BCB。

批次檔 bcb.bat 請自行存成 bcb.bat，並用最高權限執行

SET /A yy=%date:~0,4%
SET /A mm=%date:~5,2%
SET /A dd=%date:~8,2%
SET dt=%yy%-%mm%-%dd%
@echo %date% = %dt%

SET /A Hou=%time:~0,2%
SET /A Min=%time:~3,2%
SET /A Sec=%time:~6,2%
SET /A Ms=%time:~9,2%*10
SET tt=%Hou%.%Min%
@echo 時間 %time% = %tt%

SET dttt=%dt%.%tt%
@echo 日期+時間 %dttt%

C:
cd %Temp%

if exist "EditorLineEnds.ttr" (
   ren EditorLineEnds.ttr EditorLineEnds%dttt%.ttr
) else (
   goto runbcb
)
if exist "dzEditorLineEndsFix" (
   MOVE "EditorLineEnds%dttt%.ttr" "dzEditorLineEndsFix"
) else (
   md "dzEditorLineEndsFix"
   MOVE "EditorLineEnds%dttt%.ttr" "dzEditorLineEndsFix"
)
:runbcb
mshta "javascript:alert('SUCCESS MOVE EditorLineEnds.ttr that you can run BCB fine.');close()"

下載 bcb.bat

這是在 Win8.1環境下測試，其他板沒測過。

說明：

SET /A yy=%date:~0,4%
SET /A mm=%date:~5,2%
SET /A dd=%date:~8,2%
SET dt=%yy%-%mm%-%dd%
@echo %date% = %dt%

這是取系統日期，然後改成合法字元組合
/A 表示數值，這樣可以解決空白問題

date = 2016/02/13 週六

經過重新組合後，會變成

2016-2-13

接著是時間

SET /A Hou=%time:~0,2%
SET /A Min=%time:~3,2%
SET /A Sec=%time:~6,2%
SET /A Ms=%time:~9,2%*10
SET tt=%Hou%.%Min%
@echo 時間 %time% = %tt%

time = 5:40:29.85

經過重新組合後，會變成

5.40

再把這兩個合起來

SET dttt=%dt%.%tt%

2016-2-13.5.40

然後改檔名

EditorLineEnds.ttr

EditorLineEnds2016-2-13.5.40.ttr

接著檢查存放目錄是否存在？不存在就做一個
然後搬移進去，這樣就完成了。

不過，還是刪不掉，不曉得要怎麼把 inuse 解除，如果你知道的話，請留言告訴我怎麼做，謝謝！

小三通筆記

2016-02-03T00:15:00.002+08:00

小三通就是台灣到金門到大陸，去大陸走小三通，金門跟廈門真的很近，都是渡輪運輸，便宜快速，我是到廈門五通碼頭，所以本筆記介紹都以此為終點。

路線圖

台灣到金門只有航空，自己訂票比較省、有彈性，如果怕麻煩的話，可以買套票，就是機票--機場接送--船票一起包，我是自己訂票，所以做個筆記。

一、訂機票金門尚義機場
可以上易遊網國內線訂票，要先加入會員，然後選票，下訂單，當天完成付款。這時你會得到一組電子機票號碼，到時去機場該航空公司櫃檯，給她身分證，它就會給你登機證了。
錯開假日，比較容易訂票，也可以訂到優惠票，一般越早越好，較多選擇，遇到優惠票機率比較高。
易遊網 http://www.eztravel.com.tw/?in=tb0

二、機場到碼頭
機場外面就有排班計程車，行情是300元，跳表是305元，大約15-20分鐘車程，有認識的可以另外叫車，可以事先請她幫忙去街上買東西，比較便宜，告訴她飛機到達時間，要買甚麼，(砲彈菜刀，貢糖，一條根，陳高...)，請她報價，然後錢匯過去，就行了，真的很方便，如果東西太多，那就請她幫你用寄的。

三、買船票
到水頭碼頭後，拿護照去櫃台買船票，假日的話，最好是網上預訂，順便買保險。因為廈門很近，航程約30分鐘左右，船內很寬敞，並排座位有14個，船航行很穩，天氣好的話，幾乎感覺不到海浪的存在。

四、廈門五通碼頭
到碼頭後，出關要驗台胞證，新版ID卡台胞證可以快速通關，但要先申請填表後才行，我只好排隊人工驗通關，通關後，大廳可以換 RMB，要買船票，這有張名片，可以先諮詢與訂票，外面打的(搭 TAXI)有叫車跟排班的，叫車的是沒牌的，會出事的都是這種，要搭排班的那種，有牌的。

BCB6 畢氏定理計算機

2014-11-08T14:34:00.001+08:00

最近小孩正在學畢氏定理，說簡單還算簡單，但是要用計算機按半天，還要再開根號，蠻麻煩的，就寫了這個小程式，下面有部分程式碼，為何是部分？因為視窗程式很大部分是視窗元件，是BCB自動產生的，我們多半不需管它，只需專注於核心功能寫作就行了。

下載
https://www.dropbox.com/s/5qx8xpz8zmhm69h/BisTheory1.rar?dl=0

程式說明
這隻程式主要有兩個部分，一是三角形輸入幾個邊，要求哪個邊判定，第二是浮點數計算問題，程式碼如下

一、狀態判定,填入幾個邊了
int chkState(){
    UnicodeString s1,s2,s3;
    s1=edit1->Text;//1
    s2=edit2->Text;//3
    s3=edit3->Text;//5
    if(s1.Length()>0)mystate[1]=1;else mystate[1]=0;
    if(s2.Length()>0)mystate[2]=3;else mystate[2]=0;
    if(s3.Length()>0)mystate[3]=5;else mystate[3]=0;
    mystate[0]=mystate[1]+mystate[2]+mystate[3];
    return mystate[0];
}

這裡只要文字框產生 change()事件啟動，會檢查三個邊，字串長度>0，並分別給定其代表值，最後加總該值傳回，
a=1
b=3
c=5
如果傳回 8 ，代表b+c=8，那就知道要求的是 a 了。

二、浮點數計算
浮點數計算比較麻煩，因為有精度問題，動不動就會溢位，這裡沒專門處理這問題，只是簡單的提供精度設定，溢位就會變成負值，你就手動把精度調低些就好了。
精度就是靠四捨五入函式來完成，計算就是依據狀態判定來求相應的值。

四捨五入,使用整數法
double round(double src,int n){
    double res;
    int i,k=1;
    for(i=0;i<n;i++)k*=10;
    res=int(src*k+0.5);
    res/=k;
    return res;
}

計算
這裡沒用sqrt()函數，因為溢位時，會跳出一個對話 sqrt DOMAIN error，有點煩，所以改用求1/2平方來代替，溢位就是負值。

double calculate(){
    a=uStrToDouble(edit1->Text);
    b=uStrToDouble(edit2->Text);
    c=uStrToDouble(edit3->Text);
    switch (mystate[0]){
        case 8://a=sqrt(c^2-b^2);
            b2=pow(b,2);c2=pow(c,2);
            a2=c2-b2;
            //result=sqrt(round(a2,8));
            result=pow(a2,0.5);
            break;
        case 6://b=sqrt(c^2-a^2);
            a2=pow(a,2);c2=pow(c,2);
            b2=c2-a2;
            //result=sqrt(round(b2,8));
            result=pow(b2,0.5);
            break;
        case 4://c=sqrt(a^2+b^2);
            a2=pow(a,2);b2=pow(b,2);
            c2=a2+b2;
            //result=sqrt(round(c2,8));
            result=pow(c2,0.5);
            break;
    }
    return result;
}

萬有引力從何而來？

2014-07-21T00:31:00.003+08:00

萬有引力從何而來？這是現在最大的謎，解開了話，UFO動力問題也解開了。

簡單的說，目前磁力可以被製造，馬達就是了，但萬有引力沒辦法被製造，只能觀察，
例如你在地球上70KG，上月球就變成42KG了

如果：
我是說如果，我們已經發現萬有引力的機制，那我們可以任意產生個引力，

假如我就產生個>70KG的引力，方向與地球相反

那我就飛起來了，不用噴氣，不用磁場(也許要，也許磁場跟引力有關)，不用螺旋槳。

那我就是UFO了，而且好處不只這些，我根本不用考慮慣性問題，不必管那幾個G。

因為我的重力參考原點是我自己，不是地球，所以我的G是我自己控制，根本不用管地球的G

那我就可以任意大於90度轉向，而不會血管爆裂。

這樣說夠迷人吧，這就是解開重力之謎的好處。

Arduino GY-271 HMC5883L 三軸電子羅盤傳感器測試

2014-07-11T23:59:00.002+08:00

下面是 GY-271 廠商的描述
用途：測量地磁方向，測量物體靜止時候的方向，測量傳感器周圍磁力線的方向。註意，測量地磁時候容易受到周圍磁場影響，主芯片HMC5883三軸磁阻傳感器特點：

1，數字量輸出：I2C數字量輸出接口，設計使用非常方便。
2，尺寸小: 3x3x0.9mm LCC封裝，適合大規模量產使用。
3，精度高：1－2度，內置12位A/D,OFFSET, SET/RESET 電路，不會出現磁飽和現象，不會有累加誤差。
4，支持自動校準程序，簡化使用步驟，終端產品使用非常方便。
5，內置自測試電路，方便量產測試，無需增加額外昂貴的測試設備。
6，功耗低：供電電壓1.8V, 功耗睡眠模式-2.5uA 測量模式-0.6mA

連接：
只要連接VCC，GND，SDA，SCL四條線。

Arduino GY-271
-------------------------
VCC         VCC
GND        GND
A4            SDA
A5            SCL

P.S.我這塊 GY-271 是可以輸入 5V DC，但有的只能輸入3.3V DC，這個要看廠家的說明。

請注意：
HMC5883L.cpp 中必須更改下列字句，不然編譯會出錯，這是新版Arduino IDE變動的關係。
WProgram.h -> Arduino.h
Wire.send() -> Wire.wirte()
Wire.receice() -> Wire.read()

程式碼：

/*
HMC5883L_Example.pde - Example sketch for integration with an HMC5883L triple axis magnetomerwe.
Copyright (C) 2011 Love Electronics (loveelectronics.co.uk)

This program is free software: you can redistribute it and/or modify
it under the terms of the version 3 GNU General Public License as
published by the Free Software Foundation.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>.

*/

// Reference the I2C Library
#include <Wire.h>
// Reference the HMC5883L Compass Library
#include "HMC5883L.h"

// Store our compass as a variable.
HMC5883L compass;
// Record any errors that may occur in the compass.
int error = 0;

// Out setup routine, here we will configure the microcontroller and compass.
void setup(){
// Initialize the serial port.
Serial.begin(9600);
Serial.println("Starting the I2C interface.");
Wire.begin(); // Start the I2C interface.
Serial.println("Constructing new HMC5883L");
compass = HMC5883L(); // Construct a new HMC5883 compass.
Serial.println("Setting scale to +/- 1.3 Ga");
error = compass.SetScale(1.3); // Set the scale of the compass.
// If there is an error, print it out.
if(error != 0) Serial.println(compass.GetErrorText(error));
// Set the measurement mode to Continuous
Serial.println("Setting measurement mode to continous.");
error = compass.SetMeasurementMode(Measurement_Continuous);
// If there is an error, print it out.
if(error != 0) Serial.println(compass.GetErrorText(error));
}

// Our main program loop.
void loop(){
// Retrive the raw values from the compass (not scaled).
MagnetometerRaw raw = compass.ReadRawAxis();
// Retrived the scaled values from the compass (scaled to the configured scale).
MagnetometerScaled scaled = compass.ReadScaledAxis();

// Values are accessed like so:
int MilliGauss_OnThe_XAxis = scaled.XAxis;// (or YAxis, or ZAxis)

// Calculate heading when the magnetometer is level, then correct for signs of axis.
float heading = atan2(scaled.YAxis, scaled.XAxis);

// Once you have your heading, you must then add your 'Declination Angle', which is the 'Error' of the magnetic field in your location.
// Find yours here: http://www.magnetic-declination.com/
// Mine is: 2� 37' W, which is 2.617 Degrees, or (which we need) 0.0456752665 radians, I will use 0.0457
// If you cannot find your Declination, comment out these two lines, your compass will be slightly off.
float declinationAngle = 0.0457;
heading += declinationAngle;

// Correct for when signs are reversed.
if(heading < 0)    heading += 2*PI;

// Check for wrap due to addition of declination.
if(heading > 2*PI)    heading -= 2*PI;

// Convert radians to degrees for readability.
float headingDegrees = heading * 180/M_PI;

// Output the data via the serial port.
Output(raw, scaled, heading, headingDegrees);

// Normally we would delay the application by 66ms to allow the loop
// to run at 15Hz (default bandwidth for the HMC5883L).
// However since we have a long serial out (104ms at 9600) we will let
// it run at its natural speed.
// delay(66);
}

// Output the data down the serial port.
void Output(MagnetometerRaw raw, MagnetometerScaled scaled, float heading, float headingDegrees){
   Serial.print("Raw:(x,y,z)=( ");
   Serial.print(raw.XAxis);
   Serial.print(", ");
   Serial.print(raw.YAxis);
   Serial.print(", ");
   Serial.print(raw.ZAxis);
   Serial.print(") Scaled:(x,y,z)=( ");
   Serial.print(scaled.XAxis);
   Serial.print(", ");
   Serial.print(scaled.YAxis);
   Serial.print(", ");
   Serial.print(scaled.ZAxis);
   Serial.print(") Heading: ");
   Serial.print(heading);
   Serial.print(" Radians: ");
   Serial.print(headingDegrees);
   Serial.println(" Degrees.");
   delay(500);
}

執行結果

它只負責讀出三軸方向磁場強度，而角度要自己去算。

下載 HMC5883L LIB
https://www.dropbox.com/s/h062nnde78zts1l/HMC5883L.zip

參考資料
Arduino連接HMC5883L三軸電子羅盤傳感器
http://www.geek-workshop.com/thread-105-1-1.html

使用 Arduino Pro Mini + 驅動板來驅動步進馬達 28BYJ-48 5VDC

2014-07-11T21:09:00.001+08:00

這個是參考別人的，只是測試資料，做個筆記
例中一次轉一圈，停5秒，再反轉一圈

影片

驅動板及步進馬達

程式碼

#include "myStepper.h"
#define STEPS 2048
Stepper stepper(STEPS,9,10,11,12);
void setup() {
stepper.SetSpeed(5);
}
void loop() {
stepper.Step(2048);
delay(5000);
stepper.Step(-2048);
delay(5000);
}

接線

Arduino   驅動板
--------------------------
D9             IN1
D10           IN2
D11           IN3
D12        IN4
VCC          +
GND          -

p.s.驅動板+-旁兩個JMP要CLOSE，驅動板最好獨立供電，避免 Arduino 燒毀，我只是測試會不會動，所以就直接接電用了XD

說明

原本應該是

#include <Stepper.h>

但我的 Arduino IDE v1.0.5 可能是內建了同名稱 LIB 導致 Link 會一直出現錯誤
所以就把它改個名子，放在同一個路徑下，這樣就可以正確編譯了

#include "myStepper.h"

下載
https://www.dropbox.com/s/e469pclk84fsbq3/myStepper.rar

參考資料
http://www.geek-workshop.com

Arduino 有關 PWM 的參考資料

2014-06-13T10:42:00.000+08:00

PWM 全名叫做脈衝寬度調變( Pulse Width Modulation,PWM)[1]，是將類比信號轉換為脈波的一種技術，一般轉換後脈波的週期固定，但脈波的占空比會依類比信號的大小而改變。
PWM 技術是一種對類比信號電位的數字編碼方法，通過使用高解析度計數器（調製頻率）調製方波的占空比，從而實現對一個類比信號的電位進行編碼。
它是一種數位控制訊號，抗干擾性較強，應用很廣，電壓和電流可直接用來進行控制對象，例如家用電器設備中的音量開關控制、採用鹵素燈泡燈具的亮度控制等等。

輸出電壓的控制
PWM透過對佔空比 DUTY_CYCLE 的波形產生，可以對輸出電壓達到控制目的。

圖一、DUTY_CYCLE

輸出電壓 Output_Voltage 就是佔空比乘以輸入電壓

Output_Voltage = Duty_Cycle * Input_Voltage

如圖一，輸入電壓是 0V-5V，佔空比是25%，輸出電壓就是

Output_Voltage = 0.25 * 5 = 1.25V

也就是高電位 5V 的加總平均值

如輸入電壓是 0V-5V，佔空比是80%，輸出電壓就是

Output_Voltage = 0.8 * 5 = 4V

所以我們只需控制輸出波形，就可以決定輸出電壓了。

以下討論對象是目前比較被廣泛採用的晶片 ATmega328，參考它的Datasheet [2]可知，它有三個時脈 Timer，分別是 Time0, Time1, Time2，我們可以通過對 Timer 的設定，來達到控制脈波輸出的特性。

以下是三個時脈的設定說明，節錄自 QEEWiki [3]，這是要對Timer設定的重要參考，它已經被整理成表格狀，還附有一個範例程式，非常方便使用。

圖二、Time0

圖三、Time1

圖四、Time2

註
[1].http://zh.wikipedia.org/wiki/脈衝寬度調變
[2].http://www.atmel.com/Images/doc8161.pdf
[3].https://sites.google.com/site/qeewiki/books/avr-guide/pwm-on-the-atmega328

巧治糖尿病

2014-05-29T04:00:00.001+08:00

剛剛看到 YouTube 上一支關於糖尿病的影片，就順手把它貼過來了，我的親人飽受此病之苦，相信也有不少人有同樣的問題，大家可以看看。
其實，肥胖還是糖尿病的主因，就是要多運動，只要瘦下去，自然可以不藥而癒，但老年人，或是工作忙碌之人，可能就很困難有運動習慣了，那另一種方法就是飲食控制，若克制不了欲望，最後只好做胃繞道手術，挨一刀，來減少養分的吸收了。

Arduino LCD12864 ST7920 parallel test...

2014-05-21T10:47:00.002+08:00

這是 LCD12864 ST7920 並行測試，從官網下載一個範例程式，然後修改了一小部分程式碼，來方便理解其運作，自己加上了一個 VR，修改顯示字串等等。

線路配置(並行)

RS = 17; Analog Pin3
RW = 16; Analog Pin2
EN = 18; Analog Pin4
D0 = 8;
D1 = 9;
D2 = 10;
D3 = 11;
D4 = 4;
D5 = 5;
D6 = 6;
D7 = 7;
PIN15 PSB = 5V;(並行)

VR (3k) 配置
+ 5v
Analog Pin1
GND

官方12864網頁
http://playground.arduino.cc/Code/LCD12864

使用 Lib
LCD12864
http://playground.arduino.cc/uploads/Code/LCD12864.zip

官方原始碼
http://playground.arduino.cc/uploads/Code/pongLCD.zip

參考原始碼

//http://playground.arduino.cc/Code/LCD12864
#include <LCD12864.h>
int score = 0;//分數
boolean lost = false;//遊戲結束
int relive = 0;//復活讀秒
int top=128,down=159,left=0,right=63;
int Xpos = 0;//球座標 x
int Ypos = 133;//球座標 y
int momentumX = 2;//x增量
int momentumY = 1;//y增量
boolean momr = true;//球向右(x)
boolean momd = true;//球向下(y)
int PaddlePos = 139;// 130<PaddlePos<148 (128<y<160)
void setup() {
    LCDA.Initialise(); // INIT SCREEN
    delay(500); // Some delay
    LCDA.Render(); // Start the Rendering process
    Title(); // 畫 ASCII 字元
    delay(500); // Some Delay
}
void loop(){
    int tmp;
    tmp = analogRead(1);// 讀取VR值 0-1023
    PaddlePos = map(tmp,0,1023,129,149);// 把 0-1023 值轉為 130-148
    run();
}
void AI(){// BALL MOVEMENT　球移動
    //left=0,right=63
    if (Xpos+momentumX < right && momr == true) {
        Xpos+=momentumX;//x->
    }else if (Xpos+momentumX >= right && momr == true) {
        Xpos-=momentumX;//x->反彈
        momr = false;//<-x
    }else if (Xpos-momentumX > left && momr == false){
        Xpos-=momentumX;//<-x
    }else if (Xpos-momentumX <= left && momr == false){//反彈<-x
        if (Ypos+1 >= PaddlePos && Ypos < PaddlePos+10) {//擊中
            Xpos+=momentumX;//反彈||<-x
            momr = true;//x->
            scored();//計分
            //　變化球,棒子兩端+-3
            if (Ypos < PaddlePos+3 || Ypos-1 > PaddlePos+7) {
                if (momentumY < 4) momentumY +=2;
            }else{
                if (momentumY > 1) momentumY -=1;
            }
        }else{//　沒擊中
            lost = true;
        }
    }
    //top=128,down=159
    if (Ypos+momentumY < down && momd == true) {//向下
        Ypos+=momentumY;
    }else if (Ypos+momentumY >= down && momd == true) {//向下反彈
        Ypos-=momentumY;
        momd = false;
    }else if (Ypos-momentumY > top && momd == false){//向上
        Ypos-=momentumY;
    }else if (Ypos-momentumY <= top && momd == false){//向上反彈
        Ypos+=momentumY;
        momd = true;
    }
}
void run() {//循環
    if (lost == false) {
        AI();
        LCDA.DumpScreenBuffer(0,0,8,32);//清空記憶體資料(X,Y,maxX,maxY)
        // Draw Room (x,y,w,h),畫框(0<=X<=63),(128<=Y<=159)
        //top=128,down=159,left=0,right=63
        LCDA.FillRectangle(left,top,right,1);
        LCDA.FillRectangle(right,top,1,32);//60,128
        LCDA.FillRectangle(left,down,right,1);//0,158
        // Draw Ball 畫球
        LCDA.FillRectangle(Xpos,Ypos,2,2);// 2*3　球
        // Draw Paddle 畫板子
        LCDA.FillRectangle(1,PaddlePos,2,10);// 2*10　板子
        LCDA.RenderScreenBuffer(0,0,8,32);//送出記憶體資料
    }else{
        relive++;
        if(relive>3000){//復活讀秒=3秒
            lost = false;
            relive=0;
            score=0;
        }
    }
}
// 秀數字
void numbertobinary(char num) { //RS=1,RW=0,寫資料到內部 RAM (RS,RW,D7,D6,D5,D4,D3,D2,D1,D0)
    if (num == 0)         LCDA.setPins(1,0,0,0,1,1,0,0,0,0); //30h=48=0
    else if (num == 1)    LCDA.setPins(1,0,0,0,1,1,0,0,0,1); //31h=49=1
    else if (num == 2)    LCDA.setPins(1,0,0,0,1,1,0,0,1,0); //32h=50=2
    else if (num == 3)    LCDA.setPins(1,0,0,0,1,1,0,0,1,1); //33h=51=3
    else if (num == 4)    LCDA.setPins(1,0,0,0,1,1,0,1,0,0); //34h=52=4
    else if (num == 5)    LCDA.setPins(1,0,0,0,1,1,0,1,0,1); //35h=53=5
    else if (num == 6)    LCDA.setPins(1,0,0,0,1,1,0,1,1,0); //36h=54=6
    else if (num == 7)    LCDA.setPins(1,0,0,0,1,1,0,1,1,1); //37h=55=7
    else if (num == 8)    LCDA.setPins(1,0,0,0,1,1,1,0,0,0); //38h=56=8
    else if (num == 9)    LCDA.setPins(1,0,0,0,1,1,1,0,0,1); //39h=57=9
}
void Title() { // 秀 ASCII 字元
    LCDA.Draw(false,25,0);//(sw,x,?)
    delay(1);
    byte title[] = {
        0,1,1,0,1,0,1,1,//0x6b=k
        0,1,1,0,1,1,1,1,//0x6f=o
        0,1,1,1,0,1,1,1,//0x77=w
        0,1,1,0,0,0,0,1,//0x61=a
        0,1,1,0,1,1,0,0,//0x6f=l
        0,1,1,0,0,0,0,1,//0x61=a
        0,0,1,0,0,1,1,1,//0x27='
        0,1,1,1,0,0,1,1,//0x73=s
        0,0,1,0,0,0,0,0,//0x20=
        0,1,1,0,1,0,0,0,//0x68=h
        0,1,1,0,1,1,1,1,//0x6f=o
        0,1,1,0,1,1,0,1,//0x6d=m
        0,1,1,0,0,1,0,1 //0x65=e
    };
    int count = 0;
    int counter = 0;
    while (count < sizeof(title)/sizeof(byte)) {
        for (int i = count; i < count+8; i++) {
            LCDA.temp[counter] = title[i];
            counter++;
        }
        LCDA.setPins(1,0,
            LCDA.temp[0],LCDA.temp[1],LCDA.temp[2],LCDA.temp[3],
            LCDA.temp[4],LCDA.temp[5],LCDA.temp[6],LCDA.temp[7]);
        count += 8;
        counter = 0;
    }
    LCDA.Draw(true,0,0);
}
void scored() { //　計分+1
    LCDA.Draw(false,12,20);
    delay(1);
    score++;
    momentumX = random(3, 6);
    if (score < 10) {
        numbertobinary('0');
        numbertobinary('0');
        numbertobinary(score);
    }else if (score < 100) {
        int res = score/10;
        int lef = score%10;
        numbertobinary('0');
        numbertobinary(res);
        numbertobinary(lef);
    }else if (score < 1000) {
        int res = score/100;
        int lef = score%100;
        int res2 = lef/10;
        int lef2 = lef%10;
        numbertobinary(res);
        numbertobinary(res2);
        numbertobinary(lef2);
    }
    LCDA.Draw(true,0,0);
}

補充說明

void Title() { // 秀 ASCII 字元
LCDA.Draw(false,25,0);//(sw,x,?)

在文字顯示中，X座標指定，是從左上角，由0開始，分成四行，一直到右下角為止，如下表所示。

ASCII 字碼輸入

LCDA.setPins(1,0,0,0,1,1,0,0,0,0); //30h=48=0

setPins() 的位元如下

(RS,RW,D7,D6,D5,D4,D3,D2,D1,D0)

RS=1,RW=0,時，為寫資料到內部 DRAM，D0-D7 為 ASCII Code，請參考下表

例如我們要在螢幕中央顯示 7，那 X 就是 12，然後先關掉繪圖，並指定 X

LCDA.Draw(false,12,0);

接著輸入 7 的 ASCII CODE，查上表為 0x37 ，二進位碼 00110111 ，可由計算機轉換

然後寫入，頭兩個位元必須是 RS=1,RW=0,後面就是二進位碼 00110111，如下

LCDA.setPins(1,0,0,0,1,1,0,1,1,1);

最後就是把繪圖打開，就會顯示了

LCDA.Draw(true,0,0);

AutoCad 物件任意角轉正

2014-04-21T04:32:00.002+08:00

有時，會用ROTATE把物件旋轉，但轉了之後，又想把圖轉正，卻轉不回來了，我想了好久，終於被我搞出來了，做個筆記。

筆記，物件轉正，及另一個對齊任意線。

實例

先做兩條輔助線，水平線跟機頭中心線對水平線的鏡射線，就是大約30度那條。

選機頭物件，使用ROTATE指令，以上述兩線交點為基準點，旋轉至大約30度那條端點。

清掉輔助線，完成。

快點通過服貿，貨貿，這比TPP重要太多了

2014-04-08T21:44:00.001+08:00

那些學生沒有正當性，玩不下去了，結束了一場鬧劇，不然每天新聞吵來吵去的，很煩的。

世界已經悄悄的改變，現在全世界都在搶大陸市場，大陸即將步入全球最大的消費市場，以前世界工廠使大陸累積財富，未來是13E人口的消費力量養活全世界，很多商業行為是要搶個先機，卡個位，別在起跑點就敗給韓國了，別因為為反對而反對的民進黨而把台灣葬送掉，請快點通過服貿，貨貿，這比TPP重要太多了。

台灣的物流業很不給力，台灣的產品要宅配到全世界，成本高的嚇人，反觀大陸的物流到全世界，快速又廉價，這關節沒搞好，台灣零售業、宅經濟出不去的，不利中小企業發展。

想說兩句對服貿的看法嗎？來這裡吧。

張忠謀給大家的一堂課「不簽服貿台灣玩完」到底誰在嚇唬誰！？1030407-02
https://www.youtube.com/watch?v=cea-Q-TIcrU

蘇X昌的陰謀，拉學生當打手。

2014-03-20T21:16:00.000+08:00

看看最近的新聞，亂七八糟，實在不得不說，看看那麼多群眾，去問問服貿是什麼？看有幾個答得出來，答出的有幾個正確。
那他們知道去幹麻？一切都是被利用，待我細細說來。

一、民進黨的困境
大家都知道，中國的進步，即將成為世界第一大經濟體，台灣的邊緣化，此消彼長，越發的獨立不可行，反而統一變成趨勢，台灣只是美國對付中國，牽制中國的一顆棋子，台獨黨綱的民進黨也知道趨勢所在，小英的敗選，謝X廷訪中，都是暗示著民進黨的轉型，放棄台獨黨綱，非左非右向中靠，唯有如此，才能吸引到反馬的中間選民，才能贏得執政，成為真正的反對黨。

二、馬英九的無能
馬英九的無能源自於它的個性，優柔寡斷，胸襟狹隘，不能用人，所以一些不錯的政策，到他手裡就變爛了，王金平事件，服貿協定...都是，王金平藍皮綠骨，八面玲瓏，是該拔，但不至於開除黨籍，服貿原本是中國的統戰，讓利台灣，目的是收攬台灣民心，結果都變樣了。
提醒大家，反馬跟服貿是兩回事，別被有心人給利用了，最後使台灣喪失競爭力，企業被逼的棄守台灣。

三、前進總統大位
這是蘇一直再做的春秋大夢，學生打手只是它的一石二鳥之計，首先就緊咬服貿，抹紅藍營，理由是"黑箱服貿"，切~這也是理由 = =
請問它是行政院長還是總統，有什麼政策難到還要請示它嗎？只要是福國利民的，有何不可？可笑的是，居然能鬧那麼久，還拖了一群學生去鬧，我建議調查局去查查誰背後唆使，扇動群眾。
再來是製造刻板印象，服貿=賣台=中共同路人，這樣可以鞏固一些無知的群眾，又可以打壓小英跟謝X廷，這些希望民進黨轉型、進步的推手，被抹紅，最後再趁勢拉幫結派，奪取黨主席之位，上看總統大選。

四、胡說八道的抱怨
我真的不知道，台灣的民眾那麼弱智，台灣的學生，那麼的無知，連這種理由"黑箱服貿"，都能把人耍得團團轉，真好笑。那個清大的什麼學生，丟臉死了，不知尊敬師長，"根本"都不懂的人，還在那裏泛政治，建議他回家研究一下小學而大遺，孰為小孰為大。

五、未來展望
還是一句老話，現在全世界都想跟中國做生意，中國的13E人口市場大餅，可以養活全世界，連敵對的日本也在擔憂，失去中國市場的經濟該如何走下去，還動腦筋到台灣身上，在台設立公司，以台名義進軍中國，而今日中國為了統一，讓利台灣，服貿就是想要把台灣視為同一國，消除一切障礙，這比任何優惠還優惠，卻被這群豬搞成這樣。
說句難聽的，你台灣不要，人家韓國搶著要呢，還有東盟呢，等被別人卡位完，再怨嘆進入中國市場太慢，人家中國可是把最好的位子留給你了，自己給臉不要臉。

Arduino I2C Test

2014-03-19T01:38:00.001+08:00

最近迷上了這個小東西，覺得還蠻有趣，以後可能會 POST 一些相關的測試上來。

先貼個 I2C 主從架構的連接通訊

主機是 UNO，從機是 Pro Mini

Pin 腳是固定的，接線(固定這樣接)

UNO --- Pro Mini
-------------------
A4 ------ A4 (SDA)
A5 ------ A5 (SCL)
5V ------ VCC
GND ------ GND

主機程式 (Master)

#include <Wire.h>
void setup(){
Wire.begin();
Serial.begin(9600);
Serial.println("Ready Master");
}
void loop(){
int val;
if(Serial.available()>0){
    val=Serial.read();
    if(val==49){//49='1'
      Wire.beginTransmission(4);//connect to slave 4
      Wire.write(1);
      Wire.endTransmission();
      Serial.println("49 TURN ON LED");
      delay(10);
    }else if(val==50){//2
      Wire.beginTransmission(4);//connect to slave 4
      Wire.write(0);
      Wire.endTransmission();
      Serial.println("50 TURN OFF LED");
      delay(10);
    }else{
      Wire.beginTransmission(4);//connect to slave 4
      Wire.write(val-48);
      Wire.endTransmission();
      Serial.print(val-48);
      Serial.println(" <-- Undefine command.");    }
}
}

從機程式 (Slave)

#include <Wire.h>
int pinLed = 13;
void setup(){
Wire.begin(4);
Wire.onReceive(rxEvent);
pinMode(pinLed,OUTPUT);
}
void loop(){
delay(100);
}
void rxEvent(int count){
int c = Wire.read();
if(c==1){
    digitalWrite(pinLed,HIGH);
}else if(c==0){
    digitalWrite(pinLed,LOW);
}else{
    for(int i=0;i<c;i++){
      digitalWrite(pinLed,HIGH);delay(300);
      digitalWrite(pinLed,LOW);delay(300);
    }
}
}

連線後，從主機打開串口視窗，從這發出命令，

輸入1，從機 LED 點亮
輸入2，從機 LED 熄滅
輸入其他，就一直走迴圈，亮到該鍵的數值走完為止。

大家應該來反民進黨

2014-03-14T03:29:00.002+08:00

只要國民黨有什麼政策，那些民進黨的就哇哇叫，真是台灣的亂源，阻礙進步的黨，一堆政客利用善良百姓來取得政治資源的組合體，大家應該唾棄民進黨。

說什麼反服貿，甚麼黑箱作業，說白了就是要面子嘛，真搞不清楚現在是哪個黨在執政，有什麼政策難道民進黨說了算？真是笑話，等拿到執政權再來搞抗爭杯葛阿。

服貿是什麼？只會一昧的反，現在全世界都想跟中國做生意，而大陸釋出善意，讓利台灣，再不簽，機會就被韓國搶去了，一群白癡，等到沒生意做再來叫罵馬英九無能是吧！
真是一群奸詐狡猾之徒，只會騙選票，騙鄉下老農。

想戒菸嗎？只要你想，我提供方法。

2014-02-26T10:13:00.000+08:00

想戒菸嗎？只要你想，我提供方法。

以下是本人經驗，我是20多年的老菸槍，從國中開始抽到結婚後，大概每天1-2包長壽菸，我用的方法很簡單，而且一次就戒掉，沒再抽了，到現在已經快10年了。

不多說，開始介紹這方法，這方法是很有效的。
簡單的說，戒菸很難，難在於把你心愛的東西拿走，捨不得，放不下，這是一定戒不掉的。

那該怎麼戒呢？
那就不要戒阿~

難戒就不要戒，這就是我的方法。

每當我想要抽的時候，我就想 " 等一下再抽 "，然後等一下再等一下，一等就幾十年了。。。

很簡單吧，細細想來，這跟心理學是有關的，要搶走你心愛的玩具，一定很不捨，既然不捨，那就不要捨，就等一下再玩，這樣就沒有失落感了。

這是後話了，沒抽菸之後，身體就開始自然排毒，身上臉上就會長一些像青春痘，一擠就都是菸油，都是尼古丁的味道，大概持續半年左右，身上就不會一身臭菸味了，如果再配合不吃肉，那排毒效果更明顯。

因為現在的肉都不能吃阿，你想，養一隻雞要半年，如果把它縮短到一個月，那節省下來的飼料錢多少？還沒賣出就先賺了飼料錢，還有人事管理費。於是就開始用生長激素賀爾蒙來縮短生長期，雞隻會生病，增加損耗率，就用抗生素來餵食，這就是大家在夜市吃的鹽水雞，滷味，Mxx，肯xx炸G等等，這些就是造成小學生1-2年級，月經就來的主要因素，1-2年級來月經會怎樣？就成熟了阿，就不會再長高了，矮冬瓜的，您不會希望自己的女兒是這樣子吧。

換說牛肉，台灣牛肉主要是來自美國，大家都知道，要賣相好一點，就是肥少瘦多，這就是瘦肉精添加的問題，瘦肉精對人體會怎樣，我不知道。不過我想，大家永遠都不會知道，就算有研究報告出來也會很快不見，因為這是美國的利益，我只知道，上禮拜新聞，有位20幾歲女子，每天吃一碗牛肉麵，竟然罹癌，大家可以去看看新聞，不是我亂說。

那豬肉呢？總該沒事吧！豬肉來源主要都是本地養的，我高中時候聽養豬的同學說，他告誡我別吃香腸，肉乾，肉鬆之類東西，他說他們死掉的豬，都有專門的人在收，那是好朋友才說的。。。
那活著的豬呢？該有的藥一樣不少，抗生素，生長激素，瘦肉精之類，因為本地產的不像檢疫那麼嚴格，瘦肉精都被驗出毒性最強，最高級的那種，只能在宰殺前一周停藥，有的甚至3天，因為停太早豬隻會生病會掛，這道理大家該懂的。

那剩下蔬菜類了，這人類生存的最後一道防線，這總能吃了吧~~~
沒錯，這是能吃，沒放藥的蔬菜一定有蟲咬，葉子一定很醜，坑坑洞洞的，請問你買的菜是這樣的嗎？嗯，不用回答我，我不想知道，因為我也不會買那種菜啦~
接著是重點，任何農藥都有藥效殘留問題，譬如1周的話，那採收前一周停藥，那賣到市場上藥量殘留是可被接受的，回家用水浸泡後沖洗，再切，這樣OK的。
問題是農民似乎沒在管這個，或者不知道，他們對農藥的知識是很抱歉的，都是農藥店說：這支牌子好，哪步行再加另一支，比例2000，農民回家後就想，我ㄟ田蟲卡賊，某用1000對好。。。
就是這樣子啦~

本世紀上演的就是，能源，食物之戰。

我好像扯遠了，見人就是矯情！

STC-ISP v4.80-繁體免安裝版

2014-01-27T03:50:00.001+08:00

終於找到繁體版，做做小東西很方便，存檔備用。

簡介
STC-ISP 是一款單片機下載編程燒錄軟件，是針對STC系列單片機而設計的，可下載STC89系列、12C2052 系列和12C5410等系列的STC單片機，使用簡便，現已被廣泛使用。

http://baike.baidu.com/link?url=IcVy9Nxd21ZtlcTiT2c6XIyTWOSpX3xlncKXYY_I-k-1ny4IToKY4CGL7ioC8xuhR5aTVojT3aHtynZxwG_sW_

繁體下載
stc-isp-v4.80-繁體免安裝.rar

UFO 原理被發現了?

2013-12-30T04:30:00.000+08:00

這是一篇我也不確定的文章，我無法確定 Keshe 所言的真實性，我選擇"寧可信其有"，以免錯失了這偉大的發現，以下影片要各位自己去判斷了。

先來看段影片，如果真的發現飛碟原理，那真讓我太驚訝了。

以下是原理教學，說真的，我看不懂他在說什麼，我物理只有高中程度而已，希望有高手能證明他所言。

Keshe教學( 1 )：介紹和重力

Keshe教學 ( 4 )：融合

如果看完了上述影片後，還有興趣於 Keshe ，那可以繼續看下面這段訪談。

更多資料，請搜尋 "Keshe 基金會"，如果是真的，我們很快就有飛碟可以坐了。。。

-------------------------------
2014-01-04

這幾天逛了相關網站，看了一堆留言，傾向他是一場騙局，同時，我也沒看到 Keshe 有提出什麼較具說服力的實驗或是成品等，倒是不斷的賣書，以及一堆人在實驗。

再觀察幾天看看，如果沒發現新的說服力證據，將移除本篇文章。

如何在 Win7 下安裝 AutoCAD 2012

2013-10-25T00:53:00.001+08:00

今天被它折騰了幾個小時，故來 PO 文，讓以後的人省點時間。

如果你有看到副檔名是 dxf 的檔，那就是 AutoCAD 的檔，就來看看這篇，可以省下您的時間。先來下載 AutoCAD，我找到了種子，可以用網路快車或是迅雷都很好下載。

Autodesk_AutoCAD_2012_TW_Win_64bit_32bit.iso

它是個光碟映像檔，可能要燒錄成光碟後再安裝。或者裝個虛擬光碟軟體，就不用燒錄，直接模擬DVD來安裝。

虛擬光碟軟體 DTLite4402-0131

進到光碟中，找到 setup.exe 執行安裝

然後就會看到錯誤跑出來了

點安裝記錄檔看看，會看到這樣

.... Install .NET Framework Runtime 4.0 Language Pack Failed

顯然是微軟的錯！去抓 .NET Framework 一個回來安裝。

http://www.microsoft.com/zh-tw/download/details.aspx?id=17718

Microsoft .NET Framework 4 (獨立安裝程式)

http://download.microsoft.com/download/9/5/A/95A9616B-7A37-4AF6-BC36-D6EA96C8DAAE/dotNetFx40_Full_x86_x64.exe

執行 dotNetFx40_Full_x86_x64.exe

裝好後再次執行 setup.exe 安裝，我是選試用，這樣就不會叫你輸入一些有的沒的...

放到 D: 這樣等下好移除

一直下一步，就會完成了。

重開 AutoCAD 看看，除了這個畫面外，並不會一直騷擾你...

隨便開一張圖看看，可以正常，正上方會有一行字 "未註冊版" ，但不會影響使用。

最後，各位可能要失望了，這裡沒有教大家如何 crack，因為我也不會 XD

也許 DVD 裡頭有也說不定，但我不會用就是了。

Android root 的原理

2013-08-31T04:40:00.000+08:00

又是月底，發一篇文章，這個月都沒發...

Android 手機 root 的原理，就是使用 linux 中的 su 指令來提權，
這在 android 系統中通常是被封掉的功能，
通常是透過一些方法把 su 指令"放進" android 系統中，
通常是放在 system/bin
然後再把 su 的權限打開，
成功的話,任意 user 都可以執行 su 來提權，
就是俗稱的已 root 手機。

經濟的千鈞一髮-匯率

2013-07-23T09:00:00.001+08:00

大家都知道，匯率除了是貨幣互換計價基礎外，還有一個重要的功能，就是國力的展現，對等的名詞就是"強勢貨幣"，這也是世界各國對你的貨幣評價。

光速崩潰

當國力強盛，世界各國會樂於持有你的貨幣，不會擔心有朝一日變成壁紙，當一個國家陷於戰爭，天災，或其他因素重創該國，則其幣值迅速下墬，速度之快，超乎你想像，買股票還要經過交割，而匯率的標的物就是"錢"，它更可能以超過股市崩盤的速度下跌，加上科技發達，電腦交易是立即的，崩潰的速度更是接近電子的速度，光速崩潰，這也許是美國不敢再玩下去"QE政策"的原因吧，近來美元有貶值的趨勢，它就趕緊踩煞車，因為越來越多國家相信，這印鈔票贖回公債，是不勞而獲，而不願幫他買單了。

升值不是能控制的

要想升值還不能，但貶值卻是立即的，為什麼呢？升值不是央行能控制的，而是世界各國對該國幣值的評價，你央行能抵得過萬萬千千的索羅斯嗎？那些國際套利者，只要匯率差大過手續費，程式下單就立刻湧入，當年東南亞金融風暴就是如此，台灣不是金融很健康而躲過一劫，更不是政府所言的強勢貨幣，而主要原因恰恰相反，就是當時金融是很封閉的，沒有工具可供其套利，所以安然度過一劫，但現在不同，各式期貨充斥，期指，新台幣交換，流動性大增，進出容易，風險降低，國際套利者能操作的工具很多，如果再一次，必被打趴在地啦。

幹麻要貶

匯率貶值一半，外匯存底立刻腰斬，國人多年努力就憑空消失，災害不只如此，你向外國購入的原物料全部貴一倍，你賣出的東西也賤了，當然，賤價自然有吸引力，會吸引他國購買，但是要算一下總體國家是入超多還是出超多，以及加上外匯存底立即抵銷的效果，這樣才客觀。
才不會像國內某些做半導體的人，張*謀等人所言，危言央行要貶值，結果欲自己得利，全民要負擔進口成本增加的苦果，加上外匯抵銷苦果，它自己的原料也是要進口，抵銷後也未必賺很多，卻賠上全國，這是損人小利己，央行要三思阿，也不要再為美元買單了阿。。。

那就交由市場決定吧

沒錯，這真是好主意，要控制匯率，無異就是與全世界的索羅斯對做，做得越兇，越是吸引那些量子基金投入，築的越高，吸引的就不只是量子了，恐怕由量子變原子，由原子變石頭，最後狠狠砸向央行總裁，做出錯誤的決策，浪費銀彈，整垮國家。

那要央行做什

央行可以喝喝咖啡，看看盤，看哪些投機份子炒太兇，就小干預一下，小可以，大可不行，剛說過，不能築太高，沒有一個國家能抵抗全世界的。然後好整以暇，擇個黃道吉日再脫手就好了，這樣就堪稱"逍遙"，千萬別跟自己過不去，不做為才是大有為。

Android 檔案權限

2013-06-17T19:23:00.002+08:00

有時，我們想要修改手機的開機畫面，開機音樂，或是字型，都需要用到檔案，這時就有必要去了解一下它的結構了。本文就是間單的來說明一下 Android 檔案權限。

Android 是架構在 Linux 之上，使用 java 去實作的系統，所以它的檔案系統就是 linux 的檔案系統，要更動就必須要有最高權限 root，所以彷間才會有很多破解 root 的手機，這些原因都是根源於此，如果我們想要修改我們的手機，把廠商植入的一些莫明其妙的服務拿掉，就需要來了解一下 Android 的檔案權限。

先來看看系統 apk 都在哪

# cd system/app
cd system/app
# ls -l
ls -l
-rw-r--r-- root     root       120554 2012-12-20 10:28 CalendarProvider.apk
-rw-r--r-- root     root       761891 2012-12-20 10:24 Email.apk
-rw-r--r-- root     root        52291 2012-12-20 10:24 MediaProvider.apk
-rw-r--r-- root     root        20544 2012-12-20 10:28 StorageMgr.apk
-rw-r--r-- root     root        70488 2012-12-20 10:25 Calculator.apk
-rw-r--r-- root     root         5475 2012-12-20 10:24 ScrCapService.apk
-rw-r--r-- root     root        34586 2012-12-20 10:24 HomeLocation.apk
-rw-r--r-- root     root       115089 2012-12-20 10:29 SystemUpdate.apk
...

就放在 /system/app 之中，各位可以看到，擁有者是 root，如果您想刪掉某個廠商植入的東東，那就進到這裡後，下個移除指令即可。

# rm DeviceRegister.apk
rm DeviceRegister.apk

當然，您必須先取得 root 權限。

開始我們的主題，檔案權限

我們可以看到，每個檔案前面都有 -rw-r--r-- root     root ....
-rw-r--r-- 是檔案型態(File Type)+3組權限(rwx)組合，擁有人、群組、其他
第一個位元是 File Type，- 代表是檔案
d 是目錄；
- 是檔案；
l 為連結檔 (link file)；
b 表示為裝置檔裡面的可供儲存的周邊設備，例如硬碟；
c 表示為裝置檔裡面的序列埠設備，例如鍵盤、滑鼠。

接著是3組權限(rwx)組合

r 代表可讀
w 代表可寫
x 代表可執行
- 代表無權限

上例中
第一組是 rw- ，代表擁有人權限是讀+寫+不可執行
第二組是 r-- ，代表群組權限是讀+不可寫+不可執行
第三組是 r-- ，代表其他權限是讀+不可寫+不可執行

rw-r--r-- 對應數值為 644，如下表所示
r w x
-----------
0 0 0 = 0
0 0 1 = 1
0 1 0 = 2
0 1 1 = 3
1 0 0 = 4
1 0 1 = 5
1 1 0 = 6
1 1 1 = 7

由右向左，第一個x是2^0，第二個w是2^1，第三個r是2^2
所以，對應值就是 r=4,w=2,x=1
然後看有什麼權限，就把它加起來就是權限值了。

如 755 = 111 101 101 = rwx r-x r-x

同理 sdcard 的權限是 rwxrwxrwx = 111 111 111 = 777
/system 的權限是 rwxr-xr-x = 111 101 101 = 755
/system/media 的權限是 rwxr-xr-x = 111 101 101 = 755
開機畫面 bootanimation.zip 的權限是 rw-r--r-- = 110 100 100 = 644

# ls -l /system/media
ls -l /system/media
-rw-r--r-- root     root       843308 2012-12-17 12:35 boot.wav < 開機音樂
-rw-r--r-- root     root       543788 2012-12-17 12:35 shutdown.wav < 關機音樂
drwxr-xr-x root     root              2013-06-16 21:06 audio
-rw-r--r-- root     root       415635 2012-12-17 12:35 shutdownanimation.zip < 關機動畫
-rw-rw-rw- root     root      4995540 2013-06-17 01:10 bootanimation.zip < 開機動畫

bootanimation.zip 格式

在裡頭有一個檔 desc.txt是用來設定撥放的一些參數
以我的為例

320 480 30
p 1 0 part0
p 0 0 part1

圖片是 320*480 每秒 30 幅
第一回合播放1次間隔0幅圖檔目錄part0
第二回合播放無限次間隔0幅圖檔目錄part1

請注意：bootanimation.zip 千萬不要壓縮

參考資料
http://linux.vbird.org/linux_basic/0410accountmanager.php
http://www.cyut.edu.tw/~dywang/linuxSystem/node26.html
http://web.nchu.edu.tw/~jlu/cyut/android/animation.shtml

BCB6 字串處理

2013-05-26T15:38:00.000+08:00

BCB 本身提供一種字串形態 UnicodeString 很好用，也很容易轉型到其它型態，如 string, char... 等等，但本篇是要介紹古老的 std::string 用法，主要是用在函式間傳遞，理由是。。。我用習慣了 = =

以下分為兩個部分，第一是如何把字串傳址進去函式，然後函式幫您處理好，也不用還您，您就可以直接使用。
第二部分則是再進階，假如一個字串不夠用，那我就傳回一個字串陣列，這樣就夠酷吧，也許您可以再修改一下，就可以傳回自定義的結構資料。

先來看看結果，我只截取 API 上的 Memo 畫面，雖然有點醜，但不影響閱讀及程式的正確性。

第一部分、如何把字串傳址進去函式

第二部分、傳回一個字串陣列

最後，我還是把程式碼放在下面，方便複製使用。當然，Memo1 就是 BCB6 提供的文字集物件，這我就不說明了。

呼叫部分
//------------------------------------
    //測試字串傳址
    string str1;
    strTest1(str1);//傳址
    Memo1->Lines->Add(str1.c_str());

    //測試傳回字串陣列
    string *str2;//字串陣列
    str2=strTest2();//測試傳回字串陣列
    Memo1->Lines->Add(str2[0].c_str());
    Memo1->Lines->Add(str2[1].c_str());
    Memo1->Lines->Add(str2[2].c_str());
//-------------------------------------

函式部分
//--------------------------------------------------------------------
//測試字串傳址
void strTest1(string &str){
    str="測試字串傳址...";
}
//測試傳回字串陣列
typedef string * strArr;//給陣列傳回用,直接宣告編譯不會過
strArr strTest2(){
    string ss="測試傳回字串陣列...";
    string *str = new string[3];
    str[0]= "0:" ; str[0]+= ss;
    str[1]= "1:" ; str[1]+= "typedef string * strArr;";
    str[2]= "2:" ; str[2]+= "給陣列傳回用,直接宣告編譯不會過.";
    return str;
}
//--------------------------------------------------------------------

結果當然是秀出下面這樣

測試字串傳址...
0:測試傳回字串陣列...
1:typedef string * strArr;
2:給陣列傳回用,直接宣告編譯不會過.