Google weather APIから取得したお天気情報をVFDに表示します。

Dependencies:   NetServices mbed spxml

Files at this revision

API Documentation at this revision

Comitter:
kanpapa
Date:
Sat Nov 26 12:12:08 2011 +0000
Commit message:
beta version

Changed in this revision

HTTPClient.lib Show annotated file Show diff for this revision Revisions of this file
NetServices.lib Show annotated file Show diff for this revision Revisions of this file
main.cpp Show annotated file Show diff for this revision Revisions of this file
mbed.bld Show annotated file Show diff for this revision Revisions of this file
spxml.lib Show annotated file Show diff for this revision Revisions of this file
vfd_gp1059.h Show annotated file Show diff for this revision Revisions of this file
diff -r 000000000000 -r e89d01416461 HTTPClient.lib
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/HTTPClient.lib	Sat Nov 26 12:12:08 2011 +0000
@@ -0,0 +1,1 @@
+http://mbed.org/users/donatien/code/HTTPClient/#d0be6af2d1db
diff -r 000000000000 -r e89d01416461 NetServices.lib
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/NetServices.lib	Sat Nov 26 12:12:08 2011 +0000
@@ -0,0 +1,1 @@
+http://mbed.org/users/segundo/code/NetServices/#966a0265edfc
diff -r 000000000000 -r e89d01416461 main.cpp
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/main.cpp	Sat Nov 26 12:12:08 2011 +0000
@@ -0,0 +1,411 @@
+//
+// VFD fontx2 weather
+//
+// 2011/11/26 by @kanpapa
+//
+// Special thanks: @gingaxx
+//
+
+#include "mbed.h"
+
+#include "EthernetNetIf.h"
+#include "HTTPClient.h"
+
+#include "spdomparser.hpp"
+#include "spxmlnode.hpp"
+#include "spxmlhandle.hpp"
+
+#include "vfd_gp1059.h"
+/*
+=========================
+FUTABA VFD GP1059A01(I/O)
+-------------------------
+p9     1 (D0)  I/O
+p10    2 (D1)  I/O
+p11    3 (D2)  I/O
+p12    4 (D3)  I/O
+p13    5 (D4)  I/O
+p14    6 (D5)  I/O
+p15    7 (D6)  I/O
+p16    8 (D7)  I/O
+p21    10 (INT) O
+p22    11 (WR)  I
+p23    12 (RD)  I
+p24    13 (CS)  I
+p25    14 (C/D) I
+*/
+
+VFD_GP1059   vfd(p9, p10, p11, p12, p13, p14, p15, p16,    p21, p22, p23, p24, p25);
+
+LocalFileSystem local("local");
+
+// LED Status
+DigitalOut led1(LED1);
+DigitalOut led2(LED2);
+DigitalOut led3(LED3);
+DigitalOut led4(LED4);
+
+unsigned char reverse_bit(unsigned char x){
+    const unsigned int bit[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80};
+    unsigned char y = 0;
+    for (int i = 0; i < 8; i++){
+        if ((bit[i] & x) != 0){
+            y |= bit[7-i];
+        }
+    }
+    return(y);
+}
+
+//
+// FONTX2 test routine
+// original version @gingaxx
+//
+
+//#define  kanji_file    "/local/SHMZN16X.FNT"
+//#define  kanji_file  "/local/k12x10.fnt"
+//#define kanji_file "/local/J2KZN16A.FNT"
+//#define kanji_file "/local/XBGZN16X.TLF"
+#define kanji_file "/local/MGOZN16X.TLF"
+
+int cx = 0;
+int cy = 0;
+//int offsety = 0;
+//bool kstate = false;
+//unsigned char kbuf;
+
+FILE *fp;   // File open buffer
+
+unsigned short  start[92], end[92]; // table
+unsigned char   font[64];           // kanji image read buffer              
+
+char            Identifier[6+1];    // 00-05 "FONTX2"   
+char            FontName[8+1];      // 06-13 Font name    
+unsigned char   XSize;              // 14            
+unsigned char   YSize;              // 15
+unsigned char   CodeType;           // 16 0:ASCII, 1:KANJI   
+unsigned char   Tnum;               // 17 Table entry number
+
+//#define FONT_XBYTE        ((XSize + 7) >> 3)
+//#define FONT_YBYTE        ((YSize + 7) >> 3)
+
+void kanji_init(){ 
+    //move cursor 
+    fp = fopen(kanji_file , "r");
+
+    if(!fp) {
+        printf("File could not be opened!\n");
+        led1 = 1;
+        exit(1);
+    }
+
+    fgets(Identifier,   6+1, fp);    // FONTX2
+    fgets(FontName,     8+1, fp);        
+    fread(&XSize,       1, 1, fp);        
+    fread(&YSize,       1, 1, fp);        
+    fread(&CodeType,    1, 1, fp);  
+    fread(&Tnum,        1, 1, fp);
+
+    printf("Identifier: %s\n\r",Identifier);
+    printf("FontName: %s\n\r",FontName);
+    printf("XSize: %d\n\r",XSize);
+    printf("YSize: %d\n\r",YSize);
+    printf("CodeType: %d\n\r",CodeType);
+    printf("Tnum: %d\n\r",Tnum);
+    
+    // Table read
+    for (int a = 0; a < Tnum; a++){
+        fread(&start[a], 1, 2, fp);
+        fread(&end[a]  , 1, 2, fp);
+        printf("Table No.%d start:%04x end:%04x\n\r",a,start[a],end[a]);
+    }
+}
+
+//Kanji puts  cr = kanji code
+void k_puts(int cr){
+
+    const unsigned char bit_chk[]={0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01};
+
+    // LF code control
+    if (cr == '\n') {
+        cx = 0;
+        cy++;
+        return;    
+    }
+    
+    // calculate kanji address
+    int c = 0;
+    int adrs = 0;
+    while(cr > start[c]){
+        if (cr > end[c]){
+            adrs += end[c] - start[c] + 1;
+        } else {
+            adrs += cr - start[c];
+        }
+        c++;
+    }
+    c--;
+    printf("cr=%X, table num=%d, adrs=%d \r\n",cr,c,adrs);
+    
+    // Kanji image Read
+    fseek( fp, Tnum * 4 + 18 + 32 * adrs, SEEK_SET );
+    fread( &font, 1, 32, fp);
+    
+    // debug dump
+    //for (int s = 0; s < 32 ; s++){
+    //    printf(" %02x ",font[s]);
+    //}
+    //printf("\r\n"); 
+
+    // kanji put
+    c = 0;
+    unsigned int vfd_address = cx * 8 * 16 + cy * 2;
+    //printf("VFD address: %04x\r\n",vfd_address);
+
+    int n = 0;
+    for (int j = 0; j < 2 ; j++) {
+        for (int x = 0; x < 8; x++) {
+            //printf("set VFD address: %04x\r\n",vfd_address);
+            vfd.set_write_read_address(vfd_address);
+            int m = 0;
+            for (int k = 0; k < 2 ; k++) {
+                unsigned int d = 0;      
+                for (int i = 0; i < 8; i++) {
+                    if (font[m * 2 + j] & bit_chk[x]) {
+                        //printf("BIT on!\r\n");
+                        d = d | 1;
+                    }   
+                    if (i < 7) {
+                        d = d << 1;
+                    }
+                    //printf("i:%d, k:%d, m:%d, font:%02x, bit_chk:%02x, data:%02x\r\n",i,k,m,font[m*2+j],bit_chk[x],d);
+                    m++;
+                }
+                //printf("send_data: %02x\r\n",d);
+                vfd.send_data(d);
+            }
+            vfd_address = vfd_address + 8;
+        }
+        n++;
+    }
+
+    // move cursor 
+    cx++;
+    if (cx >= 15){   //LF control
+        cx = 0;
+        cy++;
+    }
+}
+
+void kanji_end(){
+    fclose(fp);
+}
+
+void display_vfd_space(){
+    k_puts(0x8140);
+}    
+
+void display_vfd (const char * buf){
+    unsigned int kc = 0;
+    while (1) {
+        // "0" - "9"  0x30-0x39 824f-8258
+        // "A" - "Z"  0x41-0x4A 8260-8279
+        // "a" - "z"  0x61-0x7a 8281-829a
+        printf("check buf= %02x ", *buf);
+        if (*buf == 0) break;
+        if (*buf >= '0' && *buf <= '9') {
+            kc = 0x821f + *buf;
+        } else if (*buf >= 'A' && *buf <= 'Z') {
+            kc = 0x821f + *buf;
+        } else if (*buf >= 'a' && *buf <= 'z') {
+            kc = 0x8220 + *buf;
+        } else if (*buf == '%') {
+            kc = 0x8193;
+        } else if (*buf == '/') {
+            kc = 0x815e;
+        } else if (*buf == ':') {
+            kc = 0x8146;
+        } else if (*buf == '\n') {
+            kc = '\n';
+        } else if (*buf >= 0x80) {
+            // kanji
+            kc = *buf * 256 + *(buf + 1);
+            buf++;
+        } else {
+            kc = 0;
+        }
+        buf++;
+        
+        printf("kc: %04x ",kc);       
+        if (kc != 0) {
+            k_puts(kc);
+        }
+    }
+}
+
+const char tokyo[7] = {0x93, 0x8c, 0x8b, 0x9e, 0x93, 0x73, 0x00};
+const char otacity[7] = {0x91, 0xe5, 0x93, 0x63, 0x8b, 0xe6, 0x00};
+const char today_weather[7] = {0x82, 0xcc, 0x93, 0x56, 0x8b, 0x43, 0x00};
+const char kanji_condition[7] = {0x8b, 0x43, 0x89, 0xb7, 0x81, 0x46, 0x00};
+const char kanji_c[3] = {0x81, 0x8e, 0x00};
+
+EthernetNetIf eth;
+HTTPClient http;
+
+HTTPResult result;
+bool completed = false;
+void request_callback(HTTPResult r) {
+    result = r;
+    completed = true;
+}
+
+void blink_LED() {
+    for (int i = 0 ; i < 5 ; i++) {
+        led4 = 1;
+        wait(0.2);
+        led4 = 0;
+        wait(0.2);
+    }
+    return;
+}
+
+void dispCurrent() {
+    display_vfd(tokyo);
+    display_vfd(otacity);
+    display_vfd(today_weather);
+    display_vfd_space();
+    return;
+}
+     
+void parseWeather(SP_XmlElementNode *node) {
+    SP_XmlHandle handle(node);
+    SP_XmlElementNode * condition = handle.getChild( "condition" ).toElement();
+    if (condition) {
+        printf("current condition=%s\n",condition->getAttrValue("data"));
+        display_vfd(condition->getAttrValue("data"));
+        display_vfd_space();
+    } 
+    SP_XmlElementNode * tempc = handle.getChild( "temp_c" ).toElement();
+    if (tempc) {
+        printf("current temp=%sC\n",tempc->getAttrValue("data"));
+        display_vfd(kanji_condition);
+        display_vfd(tempc->getAttrValue("data"));
+        display_vfd(kanji_c);
+        display_vfd_space();
+    }
+    SP_XmlElementNode * humidity = handle.getChild( "humidity" ).toElement();
+    if (humidity) {
+        printf("current humidity=%s\n", humidity->getAttrValue("data"));
+        display_vfd(humidity->getAttrValue("data"));
+        display_vfd_space();
+    }
+    SP_XmlElementNode * wind_condition = handle.getChild( "wind_condition" ).toElement();
+    if (wind_condition) {
+        printf("current wind_condition=%s\n",wind_condition->getAttrValue("data"));
+        display_vfd(wind_condition->getAttrValue("data"));
+    }
+}
+
+int main() {
+    // the eth and HTTP code has be taken directly from the HTTPStream documentation page
+    // see http://mbed.org/cookbook/HTTP-Client-Data-Containers
+
+    // Start Sign
+    blink_LED();
+
+    // init VFD
+    vfd.cls();
+    vfd.set_disp_start_address(0);  // Display address: 000000H
+    vfd.luminance_adjustment(0x0f);    // 100%
+
+    // setup FONTX2
+    kanji_init();
+    printf("kanji_init()\r\n");
+    
+    printf("LAN setup\n");
+    EthernetErr ethErr = eth.setup();
+    if (ethErr) {
+        printf("Error in LAN setup\n");
+        vfd.cls();
+        display_vfd("Error in LAN setup");
+        // Close FONTX2 file    
+        kanji_end();
+        printf("kanji_end()\r\n");
+        return -1;
+    }
+    printf("LAN setup ok\n");
+
+    SP_XmlDomParser parser;
+
+    HTTPStream stream;
+
+    char BigBuf[512 + 1] = {0};
+    stream.readNext((byte*)BigBuf, 512); //Point to buffer for the first read
+
+    while(1){
+        led1 = 1;
+        //HTTPResult r = http.get("http://www.google.com/ig/api?weather=Los+Angeles", &stream, request_callback);
+        HTTPResult r = http.get("http://www.google.com/ig/api?weather=ota,tokyo&hl=ja", &stream, request_callback);
+
+        while (!completed) {
+            Net::poll(); //Polls the Networking stack
+            if (stream.readable()) {
+                BigBuf[stream.readLen()] = 0; //Transform this buffer in a zero-terminated char* string
+            
+                parser.append( BigBuf, strlen(BigBuf)); // stream current buffer data to the XML parser
+            
+                stream.readNext((byte*)BigBuf, 512); //Buffer has been read, now we can put more data in it
+            }
+        }
+        if (result == HTTP_OK) {
+            printf("HTTP Read completely\n");
+        } else {
+            printf("HTTP Error %d\n", result);
+            vfd.cls();
+            display_vfd("HTTP Error");
+            // Close FONTX2 file    
+            kanji_end();
+            printf("kanji_end()\r\n");
+            return -1;
+        }
+
+        SP_XmlHandle rootHandle( parser.getDocument()->getRootElement() );
+        SP_XmlElementNode * child2 = rootHandle.getChild( "weather" )
+                                 .getChild( "current_conditions").toElement();
+        led1 = 0;
+    
+        if ( child2 ) {
+            dispCurrent();
+            parseWeather(child2);
+        }
+
+        if ( NULL != parser.getError() ) {
+            printf( "\n\nerror: %s\n", parser.getError() );
+        }
+
+        // scrool 30 * (10sec + 1sec * 3 + 10sec)
+        led2 = 1;
+        for (int loop = 0; loop < 30 ; loop++) {
+            uint16_t address = 0;
+            vfd.set_disp_start_address(address);
+            wait(10);
+        
+            for (int dot = 0; dot < 3; dot++) {
+                vfd.set_disp_start_address(address);
+                wait(1);
+                address++;
+            }
+            wait(10);
+        }
+        led2 = 0;
+        
+        // END Sign
+        blink_LED();    
+
+        //kanji_end();
+        //printf("kanji_end()\r\n");
+
+        printf("end\n");
+
+        wait(60);
+    }
+}
diff -r 000000000000 -r e89d01416461 mbed.bld
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/mbed.bld	Sat Nov 26 12:12:08 2011 +0000
@@ -0,0 +1,1 @@
+http://mbed.org/users/mbed_official/code/mbed/builds/e2ac27c8e93e
diff -r 000000000000 -r e89d01416461 spxml.lib
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/spxml.lib	Sat Nov 26 12:12:08 2011 +0000
@@ -0,0 +1,1 @@
+http://mbed.org/users/hlipka/code/spxml/#3fa97f2c0505
diff -r 000000000000 -r e89d01416461 vfd_gp1059.h
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/vfd_gp1059.h	Sat Nov 26 12:12:08 2011 +0000
@@ -0,0 +1,155 @@
+/*
+
+VFD Control class for GP1059A01
+
+===============
+GP1059A01 INTERFACE CONNECTION
+---------------
+1  D0   2  D1
+3  D2   4  D3
+5  D4   6  D5
+7  D6   8  D7
+9  GND  10 INT
+11 WR   12 RD
+13 CS   14 C/D
+15 5V   16 5V
+17 5V   18 GND
+19 GND  20 ebb(+70V)
+
+=====================
+mbed CONNECTION
+---------------------
+mbed   GP1059A01(I/O)
+---------------------
+p5     1 (D0)  I/O
+p6     2 (D1)  I/O
+p7     3 (D2)  I/O
+p8     4 (D3)  I/O
+p9     5 (D4)  I/O
+p10    6 (D5)  I/O
+p11    7 (D6)  I/O
+p12    8 (D7)  I/O
+p13    10 (INT) O
+p14    11 (WR)  I
+p15    12 (RD)  I
+p16    13 (CS)  I
+p17    14 (C/D) I
+GND    9,18,19 (GND)
+=====================
+
+*/
+
+#ifndef __VFD_GP1059_H__
+#define __VFD_GP1059_H__
+
+#include "mbed.h"
+
+class VFD_GP1059 {
+private:
+    BusOut data;
+    DigitalOut wr,rd,cs,cd;
+    DigitalIn intr;
+
+    void init(){
+        cs = 1;
+        wr = 1;
+        rd = 1;
+        cd = 1;
+    }
+
+public:
+    // constructor
+    VFD_GP1059(PinName d0_pin,
+               PinName d1_pin,
+               PinName d2_pin,
+               PinName d3_pin,
+               PinName d4_pin,
+               PinName d5_pin,
+               PinName d6_pin,
+               PinName d7_pin,
+               PinName intr_pin,
+               PinName wr_pin,
+               PinName rd_pin,
+               PinName cs_pin,
+               PinName cd_pin) :
+               data(d0_pin, d1_pin, d2_pin, d3_pin, d4_pin, d5_pin, d6_pin, d7_pin),
+               intr(intr_pin),
+               wr(wr_pin),
+               rd(rd_pin),
+               cs(cs_pin),
+               cd(cd_pin) {        
+        init();
+        cls();
+    }
+
+    void send_cmd(uint8_t cmd){
+        cd = 1;       // C/D SET HIGH      
+        data = cmd;   // COMMAND SET
+        cs = 0;       // CS SET LOW
+        wr = 0;       // WR SET LOW
+        wait_us(2);   // wait 2us
+        wr = 1;       // WR SET HIGH
+        cs = 1;       // CS SET HIGH
+        wait_us(4);   // wait 4us
+
+        return;
+    }
+
+    void send_data(uint8_t data_value){
+        cd = 0;       // C/D SET HIGH
+        data = data_value;   // DATA SET
+        cs = 0;       // CS SET LOW
+        wr = 0;       // WR SET LOW
+        wait_us(2);   // wait 2us
+        wr = 1;       // WR SET HIGH
+        cs = 1;       // CS SET HIGH
+        wait_us(4);   // wait 4us
+    
+        return;
+    }
+
+    // Luminance Adjustment (06H)
+    void luminance_adjustment(uint8_t data){
+        send_cmd(6);
+        send_data(data);
+
+        return;
+    }    
+
+    // 04H,05H,02H: Setting address of Write
+    void set_write_read_address(uint16_t address){
+        send_cmd(4);    // 04H: Setting lower address of Write-Read
+        send_data((uint8_t)(address & 0x0ff));    // mask upper address 
+    
+        send_cmd(5);    // 05H: Setting upper address of Write-Read
+        send_data((uint8_t)(address >> 8));       // 8bit shift
+
+        send_cmd(2);    // 02H: Data Write
+    
+        return;
+    }
+
+    // 07H,08H: Setting address display started
+    void set_disp_start_address(uint16_t address){
+        send_cmd(7);    // 07H: Setting lower address display started
+        send_data((uint8_t)(address & 0x0ff));
+    
+        send_cmd(8);    // 08H: Setting upper address display started
+        send_data((uint8_t)(address >> 8));
+    
+        return;
+    }
+    
+    // Clear display memory
+    void cls(){
+        set_disp_start_address(0);
+        set_write_read_address(0);
+        for (int i = 0; i < 0x1fff; i++){
+             send_data(0);
+        }
+    return;
+    }
+
+};
+
+#endif
\ No newline at end of file