/*
* Font.c
*
* Created on: 20 Dec 2015
* Author: Mike
*/
#include <stdint.h>
#include <string.h>
#include "libSSD1306/ap_math.h"
#include "libSSD1306/SSD1306.h"
#include "libSSD1306/Font.h"
#include "libSSD1306/ascii-lucida.h"
uint8_t cursor_x;
uint8_t cursor_y;
/*
* display text using a 5x7 bitmap font in ASCII letters
*/
static const unsigned char font[][5] =
{
{ 0x00, 0x00, 0x00, 0x00, 0x00 }, // 0x20 32
{ 0x00, 0x00, 0x6f, 0x00, 0x00 }, // ! 0x21 33
{ 0x00, 0x07, 0x00, 0x07, 0x00 }, // " 0x22 34
{ 0x14, 0x7f, 0x14, 0x7f, 0x14 }, // # 0x23 35
{ 0x2e, 0x2a, 0xff, 0x2a, 0x3a }, // $ 0x24 36
{ 0x23, 0x13, 0x08, 0x64, 0x62 }, // % 0x25 37
{ 0x36, 0x49, 0x56, 0x20, 0x50 }, // & 0x26 38
{ 0x00, 0x00, 0x07, 0x00, 0x00 }, // ' 0x27 39
{ 0x00, 0x1c, 0x22, 0x41, 0x00 }, // ( 0x28 40
{ 0x00, 0x41, 0x22, 0x1c, 0x00 }, // ) 0x29 41
{ 0x14, 0x08, 0x3e, 0x08, 0x14 }, // * 0x2a 42
{ 0x08, 0x08, 0x3e, 0x08, 0x08 }, // + 0x2b 43
{ 0x00, 0x50, 0x30, 0x00, 0x00 }, // , 0x2c 44
{ 0x08, 0x08, 0x08, 0x08, 0x08 }, // - 0x2d 45
{ 0x00, 0x60, 0x60, 0x00, 0x00 }, // . 0x2e 46
{ 0x20, 0x10, 0x08, 0x04, 0x02 }, // / 0x2f 47
{ 0x3e, 0x51, 0x49, 0x45, 0x3e }, // 0 0x30 48
{ 0x00, 0x42, 0x7f, 0x40, 0x00 }, // 1 0x31 49
{ 0x42, 0x61, 0x51, 0x49, 0x46 }, // 2 0x32 50
{ 0x21, 0x41, 0x45, 0x4b, 0x31 }, // 3 0x33 51
{ 0x18, 0x14, 0x12, 0x7f, 0x10 }, // 4 0x34 52
{ 0x27, 0x45, 0x45, 0x45, 0x39 }, // 5 0x35 53
{ 0x3c, 0x4a, 0x49, 0x49, 0x30 }, // 6 0x36 54
{ 0x01, 0x71, 0x09, 0x05, 0x03 }, // 7 0x37 55
{ 0x36, 0x49, 0x49, 0x49, 0x36 }, // 8 0x38 56
{ 0x06, 0x49, 0x49, 0x29, 0x1e }, // 9 0x39 57
{ 0x00, 0x36, 0x36, 0x00, 0x00 }, // : 0x3a 58
{ 0x00, 0x56, 0x36, 0x00, 0x00 }, // ; 0x3b 59
{ 0x08, 0x14, 0x22, 0x41, 0x00 }, // < 0x3c 60
{ 0x14, 0x14, 0x14, 0x14, 0x14 }, // = 0x3d 61
{ 0x00, 0x41, 0x22, 0x14, 0x08 }, // > 0x3e 62
{ 0x02, 0x01, 0x51, 0x09, 0x06 }, // ? 0x3f 63
{ 0x3e, 0x41, 0x5d, 0x49, 0x4e }, // @ 0x40 64
{ 0x7e, 0x09, 0x09, 0x09, 0x7e }, // A 0x41 65
{ 0x7f, 0x49, 0x49, 0x49, 0x36 }, // B 0x42 66
{ 0x3e, 0x41, 0x41, 0x41, 0x22 }, // C 0x43 67
{ 0x7f, 0x41, 0x41, 0x41, 0x3e }, // D 0x44 68
{ 0x7f, 0x49, 0x49, 0x49, 0x41 }, // E 0x45 69
{ 0x7f, 0x09, 0x09, 0x09, 0x01 }, // F 0x46 70
{ 0x3e, 0x41, 0x49, 0x49, 0x7a }, // G 0x47 71
{ 0x7f, 0x08, 0x08, 0x08, 0x7f }, // H 0x48 72
{ 0x00, 0x41, 0x7f, 0x41, 0x00 }, // I 0x49 73
{ 0x20, 0x40, 0x41, 0x3f, 0x01 }, // J 0x4a 74
{ 0x7f, 0x08, 0x14, 0x22, 0x41 }, // K 0x4b 75
{ 0x7f, 0x40, 0x40, 0x40, 0x40 }, // L 0x4c 76
{ 0x7f, 0x02, 0x0c, 0x02, 0x7f }, // M 0x4d 77
{ 0x7f, 0x04, 0x08, 0x10, 0x7f }, // N 0x4e 78
{ 0x3e, 0x41, 0x41, 0x41, 0x3e }, // O 0x4f 79
{ 0x7f, 0x09, 0x09, 0x09, 0x06 }, // P 0x50 80
{ 0x3e, 0x41, 0x51, 0x21, 0x5e }, // Q 0x51 81
{ 0x7f, 0x09, 0x19, 0x29, 0x46 }, // R 0x52 82
{ 0x46, 0x49, 0x49, 0x49, 0x31 }, // S 0x53 83
{ 0x01, 0x01, 0x7f, 0x01, 0x01 }, // T 0x54 84
{ 0x3f, 0x40, 0x40, 0x40, 0x3f }, // U 0x55 85
{ 0x0f, 0x30, 0x40, 0x30, 0x0f }, // V 0x56 86
{ 0x3f, 0x40, 0x30, 0x40, 0x3f }, // W 0x57 87
{ 0x63, 0x14, 0x08, 0x14, 0x63 }, // X 0x58 88
{ 0x07, 0x08, 0x70, 0x08, 0x07 }, // Y 0x59 89
{ 0x61, 0x51, 0x49, 0x45, 0x43 }, // Z 0x5a 90
{ 0x00, 0x00, 0x7f, 0x41, 0x00 }, // [ 0x5b 91
{ 0x02, 0x04, 0x08, 0x10, 0x20 }, // \ 0x5c 92
{ 0x00, 0x41, 0x7f, 0x00, 0x00 }, // ] 0x5d 93
{ 0x04, 0x02, 0x01, 0x02, 0x04 }, // ^ 0x5e 94
{ 0x40, 0x40, 0x40, 0x40, 0x40 }, // _ 0x5f 95
{ 0x00, 0x00, 0x03, 0x04, 0x00 }, // ` 0x60 96
{ 0x20, 0x54, 0x54, 0x54, 0x78 }, // a 0x61 97
{ 0x7f, 0x48, 0x44, 0x44, 0x38 }, // b 0x62 98
{ 0x38, 0x44, 0x44, 0x44, 0x44 }, // c 0x63 99
{ 0x38, 0x44, 0x44, 0x48, 0x7f }, // d 0x64 100
{ 0x38, 0x54, 0x54, 0x54, 0x18 }, // e 0x65 101
{ 0x08, 0x7e, 0x09, 0x01, 0x02 }, // f 0x66 102
{ 0x0c, 0x52, 0x52, 0x52, 0x3e }, // g 0x67 103
{ 0x7f, 0x08, 0x04, 0x04, 0x78 }, // h 0x68 104
{ 0x00, 0x44, 0x7d, 0x40, 0x00 }, // i 0x69 105
{ 0x20, 0x40, 0x44, 0x3d, 0x00 }, // j 0x6a 106
{ 0x00, 0x7f, 0x10, 0x28, 0x44 }, // k 0x6b 107
{ 0x00, 0x41, 0x7f, 0x40, 0x00 }, // l 0x6c 108
{ 0x7c, 0x04, 0x18, 0x04, 0x78 }, // m 0x6d 109
{ 0x7c, 0x08, 0x04, 0x04, 0x78 }, // n 0x6e 110
{ 0x38, 0x44, 0x44, 0x44, 0x38 }, // o 0x6f 111
{ 0x7c, 0x14, 0x14, 0x14, 0x08 }, // p 0x70 112
{ 0x08, 0x14, 0x14, 0x14, 0x7c }, // q 0x71 113
{ 0x7c, 0x08, 0x04, 0x04, 0x08 }, // r 0x72 114
{ 0x48, 0x54, 0x54, 0x54, 0x20 }, // s 0x73 115
{ 0x04, 0x3f, 0x44, 0x40, 0x20 }, // t 0x74 116
{ 0x3c, 0x40, 0x40, 0x20, 0x7c }, // u 0x75 117
{ 0x1c, 0x20, 0x40, 0x20, 0x1c }, // v 0x76 118
{ 0x3c, 0x40, 0x30, 0x40, 0x3c }, // w 0x77 119
{ 0x44, 0x28, 0x10, 0x28, 0x44 }, // x 0x78 120
{ 0x0c, 0x50, 0x50, 0x50, 0x3c }, // y 0x79 121
{ 0x44, 0x64, 0x54, 0x4c, 0x44 }, // z 0x7a 122
{ 0x00, 0x08, 0x36, 0x41, 0x41 }, // { 0x7b 123
{ 0x00, 0x00, 0x7f, 0x00, 0x00 }, // | 0x7c 124
{ 0x41, 0x41, 0x36, 0x08, 0x00 }, // } 0x7d 125
{ 0x08, 0x0c, 0x08, 0x18, 0x08 }, // ~ 0x7e 126
};
#define extDegrees 0
static const unsigned char font_ext[][5] =
{
[extDegrees] =
{ 0x00, 0x06, 0x09, 0x06, 0x00 }, // a ° sign
};
void
font_gotoxy (uint8_t x, uint8_t y)
{
cursor_x = x;
cursor_y = y;
}
void
font_putchar (uint8_t c)
{
uint8_t *ptr = display_address () + cursor_x * 6 + cursor_y * WIDTH;
int i;
if ('\r' == c)
{
cursor_x = 0;
cursor_y++;
if (cursor_y >= HEIGHT / 8)
{
cursor_y = 0;
}
return;
}
for (i = 0; i < 5; i++)
{
if (c > ' ' && c < 0x80)
{
*ptr++ = font[c - ' '][i];
}
else if (c == '°')
{
*ptr++ = font_ext[extDegrees][i];
}
else
{
*ptr++ = 0;
}
}
*ptr++ = 0;
// move cursor
cursor_x++;
if (cursor_x >= WIDTH / 6)
{
cursor_x = 0;
cursor_y++;
if (cursor_y == HEIGHT / 8)
{
cursor_y = 0;
}
}
}
void
font_puts (uint8_t *s)
{
while (s && *s)
{
font_putchar (*(s++));
}
}
uint8_t
get_digits (uint16_t x, uint16_t y)
{
return ((ascii_lucida_bits[(y * ascii_lucida_width) / 8 + (x / 8)]) >> (x & 7))
& 1;
}
static uint8_t
format_num (char *buff, uint8_t digits, uint8_t dp_pos, int val)
{
digits++;
uint8_t pos = digits;
uint8_t dp_loc = pos - dp_pos;
uint8_t sign = 0;
if (val < 0)
{
sign = 1;
val = -val;
}
buff[pos] = 0;
while (pos)
{
if (pos == dp_loc)
{
buff[--pos] = '.';
}
else
{
buff[--pos] = val % 10 + '0';
val /= 10;
if (val == 0 && pos < dp_loc)
break;
}
}
if (sign)
{
buff[--pos] = '-';
}
return digits;
}
void
font_digits (uint8_t digits, uint8_t dp_pos, int val)
{
char buff[10] = " ";
format_num (buff, digits, dp_pos, val);
font_puts ((unsigned char *)buff);
}
void
font_sig_digits (uint8_t x, uint8_t y, uint8_t right_justify, uint8_t dp_pos,
int val)
{
char digits;
char sign = 0;
int uval;
if (val < 0)
{
uval = -val;
sign = 1; // mark as negative
}
else
{
uval = val;
}
if (uval < 10) // always one digit for a sign or space, one for a digit
{
digits = 1;
}
if (uval >= 10 && uval < 100)
{
digits = 2;
}
if (uval >= 100 && uval < 1000)
{
digits = 3;
}
if (uval >= 1000)
{
digits = 4;
}
// backup for the - sign if right justified
if (right_justify)
{
if (dp_pos < 10)
{
digits += 2;
}
else
{
digits += 1;
}
x -= (digits);
}
font_gotoxy (x, y);
font_digits (digits, dp_pos, val);
}
#define FONTX 10
#define FONTY 18
void
scan_xbm (void)
{
int i, j;
for (i = 0; i < FONTY; i++)
{
for (j = 0; j < FONTX * 6; j++)
{
drawPixel (j, i, get_digits (j, i));
}
}
}
void
print_large_string (char *string, int x, int y, int digits)
{
int xt, yt, j;
for (yt = 0; yt < FONTY; yt++) // iterate down scan lines
{
for (xt = 0; xt < digits; xt++)
{
for (j = 0; j < FONTX; j++)
{
unsigned char c = (string[xt] & 0x7F);
if (c < 32)
c = 32;
drawPixel (x + j + xt * FONTX, y + yt,
get_digits (j + (c - 32) * FONTX, yt));
}
}
}
}
void
print_digits (uint8_t x, uint8_t y, uint8_t digits, uint8_t dp_pos, int val)
{
char buff[10] = " ";
uint8_t len = format_num (buff, digits, dp_pos, val);
print_large_string (buff, x, y, len);
}
/* print a digit value 0 to 9 (not ASCII) rotated by ang */
void
print_rotated (uint8_t x, uint8_t y, int ang, uint8_t val)
{
int co = ap_cos (ang);
int si = ap_sin (ang);
int xt, yt;
for (yt = 0; yt < FONTY; yt++) // iterate down scan lines
{
for (xt = 0; xt < FONTX; xt++)
{
if (get_digits (xt + (val + 16) * FONTX, yt))
{
int cx = xt - FONTX / 2;
int cy = yt - FONTY / 2;
int px = AP_SCALE(cx * co - cy * si);
int py = AP_SCALE(cx * si + cy * co);
drawPixel (x + px, y + py, WHITE);
}
}
}
}