Revision 0:e89d01416461, committed 2011-11-26

Comitter:

kanpapa

Date:

Sat Nov 26 12:12:08 2011 +0000

Commit message:

beta version

Changed in this revision

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