// JI3BNB SSTV ENCODER (ROBOT B/W 8S MODE) v1.0 2016.04.08 // ARDUINO UNO + AD9850 DDS // THIS PROGRAM IS IN THE PUBLIC DOMAIN #include #define CLK 8 //UNO:PORT_B0 #define FQ 9 //UNO:PORT_B1 #define DATA 10 //UNO:PORT_B2 #define RST 11 //UNO:PORT_B3 volatile long oFrq; volatile byte sSq; volatile int ti; volatile int line; char line00[7] = " SSTV "; char line01[7] = "JN33LP"; const uint8_t font_a[] = {0x00, 0x18, 0x24, 0x62, 0x62, 0x62, 0x7E, 0x62, 0x62, 0x62, 0x00}; const uint8_t font_b[] = {0x00, 0x7C, 0x32, 0x32, 0x32, 0x3C, 0x32, 0x32, 0x32, 0x7C, 0x00}; const uint8_t font_c[] = {0x00, 0x3C, 0x62, 0x62, 0x60, 0x60, 0x60, 0x62, 0x62, 0x3C, 0x00}; const uint8_t font_d[] = {0x00, 0x7C, 0x32, 0x32, 0x32, 0x32, 0x32, 0x32, 0x32, 0x7C, 0x00}; const uint8_t font_e[] = {0x00, 0x7E, 0x60, 0x60, 0x60, 0x7C, 0x60, 0x60, 0x60, 0x7E, 0x00}; const uint8_t font_f[] = {0x00, 0x7E, 0x60, 0x60, 0x60, 0x7C, 0x60, 0x60, 0x60, 0x60, 0x00}; const uint8_t font_g[] = {0x00, 0x3C, 0x62, 0x62, 0x60, 0x60, 0x66, 0x62, 0x62, 0x3C, 0x00}; const uint8_t font_h[] = {0x00, 0x62, 0x62, 0x62, 0x62, 0x7E, 0x62, 0x62, 0x62, 0x62, 0x00}; const uint8_t font_i[] = {0x00, 0x3C, 0x18, 0x18, 0x18, 0x18, 0x18, 0x18, 0x18, 0x3C, 0x00}; const uint8_t font_j[] = {0x00, 0x1E, 0x0C, 0x0C, 0x0C, 0x0C, 0x4C, 0x4C, 0x4C, 0x38, 0x00}; const uint8_t font_k[] = {0x00, 0x62, 0x64, 0x68, 0x70, 0x68, 0x64, 0x62, 0x62, 0x62, 0x00}; const uint8_t font_l[] = {0x00, 0x60, 0x60, 0x60, 0x60, 0x60, 0x60, 0x60, 0x60, 0x7E, 0x00}; const uint8_t font_m[] = {0x00, 0x42, 0x62, 0x76, 0x6A, 0x62, 0x62, 0x62, 0x62, 0x62, 0x00}; const uint8_t font_n[] = {0x00, 0x42, 0x62, 0x72, 0x6A, 0x66, 0x62, 0x62, 0x62, 0x62, 0x00}; const uint8_t font_o[] = {0x00, 0x3C, 0x62, 0x62, 0x62, 0x62, 0x62, 0x62, 0x62, 0x3C, 0x00}; const uint8_t font_p[] = {0x00, 0x7C, 0x62, 0x62, 0x62, 0x7C, 0x60, 0x60, 0x60, 0x60, 0x00}; const uint8_t font_q[] = {0x00, 0x3C, 0x62, 0x62, 0x62, 0x62, 0x62, 0x6A, 0x6A, 0x3C, 0x08}; const uint8_t font_r[] = {0x00, 0x7C, 0x62, 0x62, 0x62, 0x7C, 0x68, 0x64, 0x62, 0x62, 0x00}; const uint8_t font_s[] = {0x00, 0x3C, 0x62, 0x60, 0x60, 0x3C, 0x06, 0x06, 0x46, 0x3C, 0x00}; const uint8_t font_t[] = {0x00, 0x7E, 0x18, 0x18, 0x18, 0x18, 0x18, 0x18, 0x18, 0x18, 0x00}; const uint8_t font_u[] = {0x00, 0x62, 0x62, 0x62, 0x62, 0x62, 0x62, 0x62, 0x62, 0x3C, 0x00}; const uint8_t font_v[] = {0x00, 0x62, 0x62, 0x62, 0x62, 0x62, 0x62, 0x22, 0x14, 0x08, 0x00}; const uint8_t font_w[] = {0x00, 0x62, 0x62, 0x62, 0x62, 0x62, 0x6A, 0x76, 0x62, 0x42, 0x00}; const uint8_t font_x[] = {0x00, 0x42, 0x62, 0x74, 0x38, 0x1C, 0x2E, 0x46, 0x42, 0x42, 0x00}; const uint8_t font_y[] = {0x00, 0x42, 0x62, 0x74, 0x38, 0x18, 0x18, 0x18, 0x18, 0x18, 0x00}; const uint8_t font_z[] = {0x00, 0x7E, 0x06, 0x0E, 0x0C, 0x18, 0x30, 0x70, 0x60, 0x7E, 0x00}; const uint8_t font_0[] = {0x00, 0x3C, 0x62, 0x62, 0x66, 0x6A, 0x72, 0x62, 0x62, 0x3C, 0x00}; const uint8_t font_1[] = {0x00, 0x38, 0x18, 0x18, 0x18, 0x18, 0x18, 0x18, 0x18, 0x18, 0x00}; const uint8_t font_2[] = {0x00, 0x3C, 0x46, 0x06, 0x06, 0x1C, 0x20, 0x60, 0x60, 0x7E, 0x00}; const uint8_t font_3[] = {0x00, 0x3C, 0x46, 0x06, 0x06, 0x1C, 0x06, 0x06, 0x46, 0x3C, 0x00}; const uint8_t font_4[] = {0x00, 0x0C, 0x1C, 0x2C, 0x4C, 0x4C, 0x7E, 0x0C, 0x0C, 0x0C, 0x00}; const uint8_t font_5[] = {0x00, 0x7E, 0x60, 0x60, 0x60, 0x7C, 0x06, 0x06, 0x46, 0x3C, 0x00}; const uint8_t font_6[] = {0x00, 0x3C, 0x62, 0x60, 0x60, 0x7C, 0x62, 0x62, 0x62, 0x3C, 0x00}; const uint8_t font_7[] = {0x00, 0x7E, 0x06, 0x0C, 0x18, 0x30, 0x30, 0x30, 0x30, 0x30, 0x00}; const uint8_t font_8[] = {0x00, 0x3C, 0x62, 0x62, 0x62, 0x3C, 0x62, 0x62, 0x62, 0x3C, 0x00}; const uint8_t font_9[] = {0x00, 0x3C, 0x46, 0x46, 0x46, 0x3E, 0x06, 0x06, 0x46, 0x3C, 0x00}; const uint8_t font_slu[] = {0x00, 0x00, 0x02, 0x06, 0x0E, 0x1C, 0x38, 0x70, 0x60, 0x40, 0x00}; const uint8_t font_das[] = {0x00, 0x00, 0x00, 0x00, 0x00, 0x7E, 0x7E, 0x00, 0x00, 0x00, 0x00}; const uint8_t font_dot[] = {0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x06, 0x06, 0x00}; const uint8_t font_que[] = {0x00, 0x3C, 0x46, 0x06, 0x06, 0x0C, 0x10, 0x00, 0x30, 0x30, 0x00}; const uint8_t font_eks[] = {0x00, 0x18, 0x18, 0x18, 0x18, 0x10, 0x10, 0x00, 0x18, 0x18, 0x00}; const uint8_t font_col[] = {0x00, 0x00, 0x00, 0x18, 0x18, 0x00, 0x00, 0x18, 0x18, 0x00, 0x00}; const uint8_t font_spa[] = {0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}; boolean textArea[1232]; //56*22 void shortPulse (char PIN) { digitalWrite(PIN, 1); digitalWrite(PIN, 0); } void setFreq(double freq) { //--calculate int32_t d_Phase = freq * pow(2, 32) / 125000000; //--send first 32bit for (int i=0; i<32; i++, d_Phase>>=1) { if(d_Phase & 1 == 1) { PORTB |= _BV(2); //--data } else { PORTB &= ~_BV(2); //--data } //--short pulse clk PORTB |= _BV(0); PORTB &= ~_BV(0); } //--send rest 8bit PORTB &= ~_BV(2); //--data for (int i=0; i<8; i++) { //--short pulse clk PORTB |= _BV(0); PORTB &= ~_BV(0); } //--finish, short pulse fq PORTB |= _BV(1); delayMicroseconds(30); PORTB &= ~_BV(1); } void setup() { Timer1.initialize(); Timer1.attachInterrupt(timer1_interrupt, 999); //-- SLANT ADJUST -- digitalWrite(6, 1); //INTERNAL PULL UP digitalWrite(3, 1); //INTERNAL PULL UP pinMode(CLK, OUTPUT); pinMode(FQ, OUTPUT); pinMode(DATA, OUTPUT); pinMode(RST, OUTPUT); //--reset shortPulse(RST); shortPulse(CLK); //--change mode shortPulse(FQ); //--done delay(5); } void timer1_interrupt(void) { int p; if(sSq == 3) { if(line >= 40 && line <= 61) { if(ti < 56) { p = 56 * (line - 40) + ti; if(textArea[p]) { setFreq(oFrq - 1500); } else { setFreq(oFrq - 2300); } } else if(ti == 56) { line++; sSq = 2; } } else { switch(ti) { case 0: setFreq(oFrq - 1500); break; case 14: setFreq(oFrq - 1767); break; case 28: setFreq(oFrq - 2033); break; case 42: setFreq(oFrq - 2300); break; case 56: line++; if(line == 120) { sSq = 0; } else { sSq = 2; } break; } } ti++; } } //********************* void loop() { int x; int y; int i; int p; if(digitalRead(3) == 0) // - Frequency change - { oFrq = 3735000; // kHz } else { oFrq = 7165000; // kHz } if(sSq == 0) { setFreq(2); while(sSq == 0) { if(digitalRead(6) == 0) // - SEND SW - { sSq = 1; } else { delay(30); } } } if(sSq == 1) { for(i = 0; i < 1232; i++) { textArea[i] = false; } for(i = 0; i < 12; i++) { char ch; if(i < 6) { ch = line00[i]; } else { ch = line01[i - 6]; } for(y = 0; y < 11; y++) { for(x = 0; x < 8; x++) { if(i < 6) { p = 4 + (56 * y) + (8 * i) + x; } else { p = 4 + (56 * 11) + (56 * y) + (8 * (i - 6)) + x; } uint8_t mask; if(x == 0){mask = B10000000;} else if(x == 1){mask = B01000000;} else if(x == 2){mask = B00100000;} else if(x == 3){mask = B00010000;} else if(x == 4){mask = B00001000;} else if(x == 5){mask = B00000100;} else if(x == 6){mask = B00000010;} else if(x == 7){mask = B00000001;} if(ch == 'A') { if((font_a[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'B') { if((font_b[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'C') { if((font_c[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'D') { if((font_d[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'E') { if((font_e[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'F') { if((font_f[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'G') { if((font_g[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'H') { if((font_h[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'I') { if((font_i[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'J') { if((font_j[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'K') { if((font_k[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'L') { if((font_l[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'M') { if((font_m[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'N') { if((font_n[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'O') { if((font_o[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'P') { if((font_p[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'Q') { if((font_q[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'R') { if((font_r[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'S') { if((font_s[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'T') { if((font_t[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'U') { if((font_u[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'V') { if((font_v[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'W') { if((font_w[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'X') { if((font_x[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'Y') { if((font_y[y] & mask) != 0) { textArea[p] = true; } } else if(ch == 'Z') { if((font_z[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '0') { if((font_0[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '1') { if((font_1[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '2') { if((font_2[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '3') { if((font_3[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '4') { if((font_4[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '5') { if((font_5[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '6') { if((font_6[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '7') { if((font_7[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '8') { if((font_8[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '9') { if((font_9[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '/') { if((font_slu[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '-') { if((font_das[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '.') { if((font_dot[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '?') { if((font_que[y] & mask) != 0) { textArea[p] = true; } } else if(ch == '!') { if((font_eks[y] & mask) != 0) { textArea[p] = true; } } else if(ch == ':') { if((font_col[y] & mask) != 0) { textArea[p] = true; } } else if(ch == ' ') { if((font_spa[y] & mask) != 0) { textArea[p] = true; } } } } } delay(400); //--VIS SEQUENCE //VIS CODE for ROBOT B/W 8S is B0000010 (DECIMAL 2) setFreq(oFrq - 1900); delay(300); setFreq(oFrq - 1200); //BREAK delay(10); setFreq(oFrq - 1900); delay(300); setFreq(oFrq - 1200); //START BIT delay(30); setFreq(oFrq - 1300); //BIT 0 (LSB FIRST) delay(30); setFreq(oFrq - 1100); //BIT 1 delay(30); setFreq(oFrq - 1300); //BIT 2, 3, 4, 5, 6 delay(150); setFreq(oFrq - 1100); //EVEN PARITY delay(30); setFreq(oFrq - 1200); //STOP BIT delay(30); //--VIS SEQUENCE DONE line = 0; sSq = 2; } if(sSq == 2) { //--sync setFreq(oFrq - 1200); delayMicroseconds(9990); //-- ti = 0; sSq = 3; } }