|
|
@@ -0,0 +1,554 @@
|
|
|
+/**
|
|
|
+ * Minitel library for Arduino (v0.1) / May 2013
|
|
|
+ * http://github.com/01010101/Minitel
|
|
|
+ *
|
|
|
+ * By Jerome Saint-Clair aka 01010101
|
|
|
+ * http://saint-clair.net
|
|
|
+ *
|
|
|
+ * For the Graffiti Research Lab France
|
|
|
+ * http://graffitiresearchlab.fr
|
|
|
+ *
|
|
|
+ * Based on works from the Tetalab (Fabrice, Renaud, PG & Phil)
|
|
|
+ * http://tetalab.org
|
|
|
+ */
|
|
|
+
|
|
|
+ #include "Arduino.h"
|
|
|
+#include "SoftwareSerial.h"
|
|
|
+#include "Minitel.h"
|
|
|
+
|
|
|
+byte _currentBgColor = BLACK;
|
|
|
+byte _currentTextColor = WHITE;
|
|
|
+byte _currentMode = TEXT_MODE;
|
|
|
+byte _currentVideo = VIDEO_STANDARD;
|
|
|
+byte _currentSize = SIZE_NORMAL;
|
|
|
+boolean _currentUnderline = false;
|
|
|
+boolean _currentBlink = false;
|
|
|
+boolean _currentShowCursor = false;
|
|
|
+
|
|
|
+
|
|
|
+Minitel::Minitel() : SoftwareSerial(6,7) {
|
|
|
+ pinMode(6, OUTPUT);
|
|
|
+ pinMode(7, OUTPUT);
|
|
|
+ init();
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+Minitel::Minitel(int rx, int tx) : SoftwareSerial(rx,tx) {
|
|
|
+ pinMode(rx, INPUT);
|
|
|
+ pinMode(tx, OUTPUT);
|
|
|
+ init();
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::init() {
|
|
|
+ //Serial.begin(1200);
|
|
|
+ begin(1200);
|
|
|
+ refreshSettings();
|
|
|
+}
|
|
|
+
|
|
|
+byte Minitel::getGraphicChar(String s) {
|
|
|
+ byte carac= 32; // caractère pixel
|
|
|
+
|
|
|
+ if (s.length() == 6) {
|
|
|
+ carac += s[0] == '0' ? 0 : 1;
|
|
|
+ carac += s[1] == '0' ? 0 : 2;
|
|
|
+ carac += s[2] == '0' ? 0 : 4;
|
|
|
+ carac += s[3] == '0' ? 0 : 8;
|
|
|
+ carac += s[4] == '0' ? 0 : 16;
|
|
|
+ carac += s[5] == '0' ? 0 : 32;
|
|
|
+ return carac;
|
|
|
+ }
|
|
|
+ return 9;
|
|
|
+
|
|
|
+
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::serialprint7(byte b) {
|
|
|
+ boolean i = false;
|
|
|
+ for(int j = 0; j<8;j++) {
|
|
|
+ if (bitRead(b,j)==1) {
|
|
|
+ i =!i; //calcul de la parité
|
|
|
+ }
|
|
|
+ }
|
|
|
+ if (i) {
|
|
|
+ bitWrite(b,7,1); //ecriture de la partié
|
|
|
+ }
|
|
|
+ else {
|
|
|
+ bitWrite(b,7,0); //ecriture de la partié
|
|
|
+ }
|
|
|
+ write(b); //ecriture du byte sur le software serial
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::graphic(String s, int x, int y){
|
|
|
+ moveCursorTo(x, y);
|
|
|
+ graphic(s);
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::graphic(String s) {
|
|
|
+ serialprint7(getGraphicChar(s));
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::textByte(byte c) {
|
|
|
+ serialprint7(c);
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::textByte(byte b, int x, int y) {
|
|
|
+ moveCursorTo(x, y);
|
|
|
+ textByte(b);
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+boolean Minitel::textChar(byte c) {
|
|
|
+ byte charByte = getCharByte(c);
|
|
|
+ if (isValidChar(charByte)) {
|
|
|
+ serialprint7(charByte);
|
|
|
+ return true;
|
|
|
+ }
|
|
|
+ return false;
|
|
|
+}
|
|
|
+
|
|
|
+boolean Minitel::textChar(byte c, int x, int y) {
|
|
|
+ moveCursorTo(x, y);
|
|
|
+ return textChar(c);
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::text(String s, int x, int y) {
|
|
|
+ text(s, x, y, HORIZONTAL);
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::text(String s) {
|
|
|
+ text(s, HORIZONTAL);
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::text(String s, int x, int y, int orientation) {
|
|
|
+ moveCursorTo(x, y);
|
|
|
+ text(s, orientation);
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::text(String s, int orientation) {
|
|
|
+ for (int i=0; i<s.length(); i++) {
|
|
|
+ char c = s.charAt(i);
|
|
|
+ boolean indent = false;
|
|
|
+ if (isAccent(c)) {
|
|
|
+ i+=1; // chars with accents take 2 array indexes
|
|
|
+ c = s.charAt(i);
|
|
|
+ indent = printAccentChar(c);
|
|
|
+ }
|
|
|
+ else {
|
|
|
+ indent = textChar(c);
|
|
|
+ }
|
|
|
+ if (indent && orientation == VERTICAL) {
|
|
|
+ moveCursor(LEFT);
|
|
|
+ moveCursor(DOWN);
|
|
|
+ }
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+// Characters
|
|
|
+/*
|
|
|
+ String chars0 = "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx"; // 0 -> 33
|
|
|
+ String chars1= "!\"#$%&'()*+,-./0123456789:;<=>?@"; // 33 -> 64
|
|
|
+ String chars2 = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"; // 65 -> 90
|
|
|
+ String chars3 = "abcdefghijklmnopqrstuvwxyz"; // 97 -> 122
|
|
|
+*/
|
|
|
+byte Minitel::getCharByte(char c) {
|
|
|
+ String characters = "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx !\"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]x_xabcdefghijklmnopqrstuvwxyz";
|
|
|
+ return (byte) characters.lastIndexOf(c);
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::specialChar(byte c, int x, int y) {
|
|
|
+ moveCursorTo(x, y);
|
|
|
+ specialChar(c);
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::specialChar(byte c) {
|
|
|
+ if (c == SPE_CHAR_BOOK || c == SPE_CHAR_PARAGRAPH
|
|
|
+ || c == SPE_CHAR_ARROW_LEFT || c == SPE_CHAR_ARROW_UP
|
|
|
+ || c == SPE_CHAR_ARROW_RIGHT || c == SPE_CHAR_ARROW_DOWN
|
|
|
+ || c == SPE_CHAR_CIRCLE || c == SPE_CHAR_MINUS_PLUS
|
|
|
+ || c == SPE_CHAR_1_4 || c == SPE_CHAR_1_2
|
|
|
+ || c == SPE_CHAR_3_4 || c == SPE_CHAR_UPPER_OE
|
|
|
+ || c == SPE_CHAR_LOWER_OE || c == SPE_CHAR_BETA) {
|
|
|
+ serialprint7(25);
|
|
|
+ serialprint7(c);
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+boolean Minitel::isValidChar(byte index) {
|
|
|
+ if (index >= 32 && index < 123) {
|
|
|
+ return true;
|
|
|
+ }
|
|
|
+ return false;
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+boolean Minitel::isAccent(char c) {
|
|
|
+ String accents = "áàâäéèëêíìîïóòôöúùûü";
|
|
|
+ if (accents.indexOf(c) >=0) {
|
|
|
+ return true;
|
|
|
+ }
|
|
|
+ return false;
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+boolean Minitel::printAccentChar(char c) {
|
|
|
+ if (isAccent(c)) {
|
|
|
+ String accents = "áàâäéèëêíìîïóòôöúùûü";
|
|
|
+ int index = (accents.indexOf(c)-1)/2;
|
|
|
+
|
|
|
+ int accentTypeIndex = index%4;
|
|
|
+ printAccent(accentTypeIndex);
|
|
|
+
|
|
|
+ int letterIndex = floor(index/4);
|
|
|
+ char letter = getAccentLetter(letterIndex);
|
|
|
+ textChar(letter);
|
|
|
+
|
|
|
+ return true;
|
|
|
+ }
|
|
|
+ return false;
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::printAccent(int index) {
|
|
|
+ serialprint7(25);
|
|
|
+ switch(index) {
|
|
|
+ case(0) :
|
|
|
+ serialprint7(GRAVE);
|
|
|
+ break;
|
|
|
+ case(1) :
|
|
|
+ serialprint7(ACCUTE);
|
|
|
+ break;
|
|
|
+ case(2) :
|
|
|
+ serialprint7(CIRCUMFLEX);
|
|
|
+ break;
|
|
|
+ default :
|
|
|
+ serialprint7(UMLAUT);
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+char Minitel::getAccentLetter(int letterIndex) {
|
|
|
+ switch(letterIndex) {
|
|
|
+ case(0) :
|
|
|
+ return('a');
|
|
|
+ break;
|
|
|
+ case(1) :
|
|
|
+ return('e');
|
|
|
+ break;
|
|
|
+ case(2) :
|
|
|
+ return('i');
|
|
|
+ break;
|
|
|
+ case(3) :
|
|
|
+ return('o');
|
|
|
+ break;
|
|
|
+ default :
|
|
|
+ return('u');
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::repeat(byte n) {
|
|
|
+ serialprint7(18);
|
|
|
+ serialprint7(64+n);
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::bgColor(byte c) {
|
|
|
+ if (c >= 0 && c <=7) {
|
|
|
+ serialprint7(27);
|
|
|
+ serialprint7(c+80);
|
|
|
+ _currentBgColor = c;
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::textColor(byte c) {
|
|
|
+ if (c >= 0 && c <=7) {
|
|
|
+ serialprint7(27);
|
|
|
+ serialprint7(c+64);
|
|
|
+ _currentTextColor = c;
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::useDefaultColors() {
|
|
|
+ bgColor(BLACK);
|
|
|
+ textColor(WHITE);
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::moveCursorTo(int x, int y) {
|
|
|
+ serialprint7(31); // Code positionnement de curseur
|
|
|
+ serialprint7(64+y); // coordonnées x (x+64) (x de 1 à 40)
|
|
|
+ serialprint7(64+x); // coordonnées y (y+64) (y de 1 à 24)
|
|
|
+ refreshSettings();
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::moveCursor(byte dir) {
|
|
|
+ if (dir == LEFT || dir == RIGHT || dir == UP || dir == DOWN) {
|
|
|
+ serialprint7(dir);
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::moveCursorTo(byte location) {
|
|
|
+ if (location == HOME || location == LINE_END || location == TOP_LEFT) {
|
|
|
+ serialprint7(location);
|
|
|
+ }
|
|
|
+ else if (location == CENTER || location == TOP_RIGHT || location == BOTTOM_RIGHT || location == BOTTOM_LEFT) {
|
|
|
+ if (location == CENTER) {
|
|
|
+ moveCursorTo(20, 12);
|
|
|
+ }
|
|
|
+ else if (location == TOP_RIGHT) {
|
|
|
+ moveCursorTo(40, 1);
|
|
|
+ }
|
|
|
+ else if (location == BOTTOM_RIGHT) {
|
|
|
+ moveCursorTo(40, 24);
|
|
|
+ }
|
|
|
+ else if (location == BOTTOM_LEFT) {
|
|
|
+ moveCursorTo(1, 24);
|
|
|
+ }
|
|
|
+ refreshSettings() ;
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::moveCursor(byte dir, int n) {
|
|
|
+ if (dir == LEFT || dir == RIGHT || dir == UP || dir == DOWN) {
|
|
|
+ for (int i=0; i<n; i++) {
|
|
|
+ serialprint7(dir);
|
|
|
+ }
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::refreshSettings() {
|
|
|
+ // Common parameters
|
|
|
+ mode(_currentMode);
|
|
|
+ textColor(_currentTextColor);
|
|
|
+ bgColor(_currentBgColor); // Only in graphic mode ?
|
|
|
+ blink(_currentBlink);
|
|
|
+ cursor(_currentShowCursor);
|
|
|
+ // Graphic mode specific parameters
|
|
|
+ if (_currentMode == GRAPHIC_MODE) {
|
|
|
+ pixelate(_currentUnderline);
|
|
|
+ }
|
|
|
+ // Text mode specific parameters
|
|
|
+ if (_currentMode == TEXT_MODE) {
|
|
|
+ video(_currentVideo);
|
|
|
+ charSize(_currentSize);
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::cursor() {
|
|
|
+ cursor(true);
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::noCursor() {
|
|
|
+ cursor(false);
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::cursor(boolean b) {
|
|
|
+ if(b) {
|
|
|
+ serialprint7(CURSOR_SHOW);
|
|
|
+ }
|
|
|
+ else {
|
|
|
+ serialprint7(CURSOR_HIDE);
|
|
|
+ }
|
|
|
+ _currentShowCursor = b;
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::clearScreen() {
|
|
|
+ serialprint7(CLEARSCREEN);
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::mode(byte mode) {
|
|
|
+ if (mode == GRAPHIC_MODE || mode == TEXT_MODE) {
|
|
|
+ serialprint7(mode);
|
|
|
+ _currentMode = mode;
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::graphicMode() {
|
|
|
+ mode(GRAPHIC_MODE);
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::textMode() {
|
|
|
+ mode(TEXT_MODE);
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::blink() {
|
|
|
+ blink(true);
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::noBlink() {
|
|
|
+ blink(false);
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::blink(boolean b) {
|
|
|
+ serialprint7(27);
|
|
|
+ if (b) {
|
|
|
+ serialprint7(BLINK_ON);
|
|
|
+ }
|
|
|
+ else {
|
|
|
+ serialprint7(BLINK_OFF);
|
|
|
+ }
|
|
|
+ _currentBlink = b;
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::charSize(byte type) {
|
|
|
+ if (type == SIZE_NORMAL || type == SIZE_DOUBLE_HEIGHT || type == SIZE_DOUBLE_WIDTH || type == SIZE_DOUBLE) {
|
|
|
+ serialprint7(27);
|
|
|
+ serialprint7(type);
|
|
|
+ _currentSize = type;
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::incrustation(boolean b) {
|
|
|
+ serialprint7(27);
|
|
|
+ if (b) {
|
|
|
+ serialprint7(INCRUSTATION_ON);
|
|
|
+ }
|
|
|
+ else {
|
|
|
+ serialprint7(INCRUSTATION_OFF);
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::pixelate() {
|
|
|
+ pixelate(true);
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::noPixelate() {
|
|
|
+ pixelate(false);
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::pixelate(boolean b) {
|
|
|
+ serialprint7(27);
|
|
|
+ if (b) {
|
|
|
+ serialprint7(UNDERLINE_ON);
|
|
|
+ }
|
|
|
+ else {
|
|
|
+ serialprint7(UNDERLINE_OFF);
|
|
|
+ }
|
|
|
+ _currentUnderline = b;
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::setLineMask(boolean b) {
|
|
|
+ serialprint7(27);
|
|
|
+ if (b) {
|
|
|
+ serialprint7(LINE_MASK_ON);
|
|
|
+ }
|
|
|
+ else {
|
|
|
+ serialprint7(LINE_MASK_OFF);
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::video(byte v) {
|
|
|
+ if (v == VIDEO_INVERT || v == VIDEO_STANDARD || v == VIDEO_TRANSPARENT) {
|
|
|
+ serialprint7(27);
|
|
|
+ serialprint7(v);
|
|
|
+ _currentVideo = v;
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::standardVideo() {
|
|
|
+ video(VIDEO_STANDARD);
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::invertVideo() {
|
|
|
+ video(VIDEO_INVERT);
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::transparentVideo() {
|
|
|
+ video(VIDEO_TRANSPARENT);
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::setMaxSpeed() {
|
|
|
+ /*
|
|
|
+ serialprint7(27);
|
|
|
+ serialprint7(SPEED_4800);
|
|
|
+ */
|
|
|
+}
|
|
|
+
|
|
|
+// Bip
|
|
|
+// Less than 200ms isn't taken into account
|
|
|
+void Minitel::bip(long duration) {
|
|
|
+ long beginTime = millis();
|
|
|
+ while(millis() < beginTime+100) {//duration) {
|
|
|
+ serialprint7(27);
|
|
|
+ serialprint7(BIP);
|
|
|
+ delay(100);
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+void Minitel::rect(char c, int x, int y, int w, int h) {
|
|
|
+ byte b = getCharByte(c);
|
|
|
+ rect(b, x, y, w, h);
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::rect(byte c, int x, int y, int w, int h) {
|
|
|
+ moveCursorTo(x, y);
|
|
|
+ textByte(c);
|
|
|
+ repeat(w);
|
|
|
+ moveCursorTo(x, y+1);
|
|
|
+ for (int i=0; i<h-2; i++) {
|
|
|
+ textByte(c);
|
|
|
+ moveCursor(DOWN);
|
|
|
+ moveCursor(LEFT);
|
|
|
+ }
|
|
|
+ moveCursorTo(x+w, y+1);
|
|
|
+ for (int i=0; i<h-2; i++) {
|
|
|
+ textByte(c);
|
|
|
+ moveCursor(DOWN);
|
|
|
+ moveCursor(LEFT);
|
|
|
+ }
|
|
|
+ moveCursorTo(x, y+h-1);
|
|
|
+ textByte(c);
|
|
|
+ repeat(w);
|
|
|
+}
|
|
|
+
|
|
|
+void Minitel::spiral(int x, int y, int siz, int c) {
|
|
|
+ int curSiz = 1;
|
|
|
+ // Center
|
|
|
+ specialChar(x, y, c);
|
|
|
+ x++;
|
|
|
+ // Spiral
|
|
|
+ for (int i=0; i< siz; i++) {
|
|
|
+ for (int j=0; j<curSiz; j++) {
|
|
|
+ specialChar(x, y, c);
|
|
|
+ y++;
|
|
|
+ }
|
|
|
+ curSiz++;
|
|
|
+ for (int j=0; j<curSiz; j++) {
|
|
|
+ specialChar(x, y, c);
|
|
|
+ x--;
|
|
|
+ }
|
|
|
+ for (int j=0; j<curSiz; j++) {
|
|
|
+ specialChar(x, y, c);
|
|
|
+ y--;
|
|
|
+ }
|
|
|
+ curSiz++;
|
|
|
+ for (int j=0; j<curSiz; j++) {
|
|
|
+ specialChar(x, y, c);
|
|
|
+ x++;
|
|
|
+ }
|
|
|
+ }
|
|
|
+}
|
|
|
+
|