vintagechips

/*
 * File:   LIKE6875.c
 * Author: Tetsuya Suzuki
 *
 * Created on 2/16/2016 2:18:49 AM UTC
 * "Created in MPLAB Xpress"
 */

#include <xc.h>

vintagechips

100 REM Versa Writer
110 REM
120 @(0)=7;@(1)=5;@(2)=5;@(3)=5;@(4)=7;REM 0
130 @(5)=6;@(6)=2;@(7)=2;@(8)=2;@(9)=7;REM 1
140 @(10)=7;@(11)=1;@(12)=7;@(13)=4;@(14)=7;REM 2
150 @(15)=7;@(16)=1;@(17)=7;@(18)=1;@(19)=7;REM 3
160 @(20)=4;@(21)=5;@(22)=7;@(23)=1;@(24)=1;REM 4
170 @(25)=7;@(26)=4;@(27)=7;@(28)=1;@(29)=7;REM 5
180 @(30)=7;@(31)=4;@(32)=7;@(33)=5;@(34)=7;REM 6 
190 @(35)=7;@(36)=1;@(37)=1;@(38)=1;@(39)=1;REM 7

vintagechips

//baud rate generator
//device: PIC12F1822(5V)
//compiler: HI-TECH PICC 9.80a

#include <pic.h>

__CONFIG(FOSC_INTOSC & WDTE_OFF);

void main(){
	OSCCON = 0b11110000; //32MHz