UMD - Revision history

Bas at 01:32, 13 January 2019

2019-01-13T01:32:22Z

← Older revision		Revision as of 01:32, 13 January 2019
Line 3:		Line 3:
	\|Picture=		\|Picture=
	\|Omschrijving=Under Monitor Display hacks		\|Omschrijving=Under Monitor Display hacks
	\|Status=~~In progress~~		\|Status=Abandoned
	\|Contact=Eightdot		\|Contact=Eightdot
	\|Contact1=Sebastius		\|Contact1=Sebastius

Eightdot at 01:13, 19 November 2016

2016-11-19T01:13:25Z

← Older revision		Revision as of 01:13, 19 November 2016
Line 239:		Line 239:

	[[File:UMD_font1.svg]]		[[File:UMD_font1.svg]]

			=== dumper ===

			#!/usr/bin/perl

			use strict;

			use Fcntl qw(:seek);

			my($fh, $filename, $byte_position, $fontbytes);

			$filename = "umd_flash.bin";
			$byte_position = 0x16e0+0x800*1;

			open($fh, "<", $filename)
			\|\| die "can't open $filename: $!";

			binmode($fh)
			\|\| die "can't binmode $filename";

			sysseek($fh, $byte_position, SEEK_CUR) # NB: 0-based
			\|\| die "couldn't see to byte $byte_position in $filename: $!";

			sysread($fh, $fontbytes, 0x800,0) == 0x800
			\|\| die "couldn't read byte from $filename: $!";


			my $ledsz = 10;
			my $cellsz = $ledsz*8+6;
			my $tblsz = 16*$cellsz;

			print qq(<?xml version="1.0" encoding="UTF-8" standalone="no"?>\n);
			print qq{<svg width="@{[ $tblsz+4 ]}" height="@{[ $tblsz+4 ]}" xmlns="http://www.w3.org/2000/svg">\n};
			print qq(<rect width="@{[ $tblsz+2 ]}" height="@{[ $tblsz+2 ]}" style="fill:rgb(255,255,255);stroke-width:1;stroke:rgb(0,0,0)" />);
			foreach my $row (0 .. 15)
			{
			print qq(<line x1="0" x2="@{[ $tblsz+2 ]}" y1="@{[ $row$cellsz+1 ]}" y2="@{[ $row$cellsz+1 ]}" style="stroke:rgb(0,0,0);stroke-width:1"/>\n);
			print qq(<line y1="0" y2="@{[ $tblsz+2 ]}" x1="@{[ $row$cellsz+1 ]}" x2="@{[ $row$cellsz+1 ]}" style="stroke:rgb(0,0,0);stroke-width:1"/>\n);
			foreach my $col (0..15)
			{
			my $charlen=ord(substr($fontbytes,$row128+$col8,1));
			my $charbytes=substr($fontbytes,$row128+$col8+1,7);
			if ($charlen ne 0)
			{
			print qq(<rect x="@{[ $col$cellsz+4 ]}" y="@{[ $row$cellsz+4 ]}" width="@{[ $ledsz$charlen+1 ]}" height="@{[ $ledsz7 ]}");
			print qq( style="fill:rgb(0,0,0);stroke-width:1;stroke:rgb(0,0,0)" />\n);
			foreach my $byt (0..7)
			{
			foreach my $bit (0..7)
			{
			if(ord(substr($charbytes,$byt,1)) & (1<<$bit))
			{
			print qq(<circle cx="@{[ $col$cellsz+4+$ledsz$byt+$ledsz/2 ]}");
			print qq( cy="@{[ $row$cellsz+4+$ledsz$bit+$ledsz/2 ]}" r="@{[ $ledsz/2 ]}");
			print qq( stroke="black" stroke-width="1" fill="#00ff00" />\n);
			}
			}
			}
			}
			}

			}
			print qq{</svg>\n};

Eightdot at 01:11, 19 November 2016

2016-11-19T01:11:17Z

← Older revision		Revision as of 01:11, 19 November 2016
Line 177:		Line 177:
	+7 program: data (len = messagelen-7)		+7 program: data (len = messagelen-7)

	= application (in FLASH) =		=== application (in FLASH) ===

Eightdot at 01:10, 19 November 2016

2016-11-19T01:10:15Z

← Older revision		Revision as of 01:10, 19 November 2016
Line 150:		Line 150:
	== Protocol ==		== Protocol ==

	= bootloader (in EPROM) =		=== bootloader (in EPROM) ===
	starts program download if:		starts program download if:
	address == 0xFE \|\|		address == 0xFE \|\|

Eightdot at 01:09, 19 November 2016

2016-11-19T01:09:29Z

← Older revision		Revision as of 01:09, 19 November 2016
Line 229:		Line 229:
	" 0x0e set substr bitidxmap +3 str_idx +4 data (words)		" 0x0e set substr bitidxmap +3 str_idx +4 data (words)
	" 0x0f set substr idxs +3 str_idx +4 data		" 0x0f set substr idxs +3 str_idx +4 data

			== fonts ==

			Font0

			[[File:UMD_font0.svg]]

			Font1

			[[File:UMD_font1.svg]]

Eightdot: /* application (in FLASH) */

2016-11-18T21:45:55Z

application (in FLASH)

← Older revision		Revision as of 21:45, 18 November 2016
Line 220:		Line 220:
	" 0x04 set strobj flags +3 idx +4 val &03 font (0,1 valid 2,3 invalid)		" 0x04 set strobj flags +3 idx +4 val &03 font (0,1 valid 2,3 invalid)
	&08 dimm &10 inverse video &20 left al. &40 right al. &84 ??		&08 dimm &10 inverse video &20 left al. &40 right al. &84 ??
	" 0x05 set strobj string +3 idx +4 string		" 0x05 set strobj string +3 idx +4..14 string
	" 0x07 see 0x0c		" 0x07 see 0x0c
	" 0x09 cpy ? idx=myaddr? +3 data (words)		" 0x09 cpy ? idx=myaddr? +3 data (words)
Line 226:		Line 226:
	" 0x0b set telly bits? +3 idx +4 data (dwords)		" 0x0b set telly bits? +3 idx +4 data (dwords)
	" 0x0c ?cpy? +3 idx +4 data (words)		" 0x0c ?cpy? +3 idx +4 data (words)
	" 0x0d set ~~substr substr~~ +3 idx +4 ~~data~~		" 0x0d set stings +3 idx +4 strings (0 sep)
	" 0x0e set substr bitidxmap +3 str_idx +4 data (words)		" 0x0e set substr bitidxmap +3 str_idx +4 data (words)
	" 0x0f set substr idxs +3 str_idx +4 data		" 0x0f set substr idxs +3 str_idx +4 data

Eightdot: /* application (in FLASH) */

2016-11-18T20:49:54Z

application (in FLASH)

← Older revision		Revision as of 20:49, 18 November 2016
Line 188:		Line 188:

	message:		message:
	+1 0xFF bootload, writes 0x00 to flash[0x6], then reboots		+0 0xFF bootload, writes 0x00 to flash[0x6], then reboots
	+2 0x05 ? must be 0x05		+1 0x05 ? must be 0x05
	+3 0x01 ? must be 0x01		+2 0x01 ? must be 0x01
	+4 swver must be 0xffff or >= flash[0xE]		+3 swver must be 0xffff or >= flash[0xE]
	(=0x0504 = v4.5)		(=0x0504 = v4.5)
	+6 hwver must be flash[0x14] (=0x03)		+5 hwver must be flash[0x14] (=0x03)

	message:		message:
	+1 0x02 update bit_buf		+0 0x02 update bit_buf
	+2 data (len=msg_size-1; max 0x400)		+1 data (len=msg_size-1; max 0x400)

	message:		message:
	+1 0xDB broadcast ?		+0 0xDB broadcast ?
	+2 0x01 set telly? (note: no reset)		+1 0x01 set telly? (note: no reset)
	+3 idx bit to set ?		+2 idx bit to set ?

	message:		message:
	+1 0xCD unicast ?		+0 0xCD unicast ?
	+2 0xFF to all ?		+1 0xFF to all ?
	+3 0x02 bitbus set bytes +4 offs +6 data		+2 0x02 bitbus set bytes +3 offs +5 data
	" 0x05 set str by id +4 id +6 str		" 0x05 set str by id +3 id +5 str
	" 0x07 see 0x0c		" 0x07 see 0x0c
	" 0x0c cpy? 3E80 by id +4 id +6 data (words)		" 0x0c cpy? 3E80 by id +3 id +5 data (words)
	" 0x0d update str by id +4 id +6 str		" 0x0d update str by id +3 id +5 str

	+1 0xCD unicast ?		+0 0xCD unicast ?
	+2 addr must be my_addr (canot be 0xff)		+1 addr must be my_addr (canot be 0xff)
	+3 0x01 ? len==0x4 ? clr ? strobj.len=0		+2 0x01 ? len==0x4 ? clr ? +3 idx strobj.len=0
	" 0x01 ? len!=0x4 ? clr ? +4 idx +5 pos +9 len		" 0x01 ? len!=0x4 ? clr ? +3 idx +4 pos +8 len
	" 0x02 set stridx id +4 str_idx +5 id		" 0x02 set stridx id +3 str_idx +4 id
	" 0x04 set strobj ~~flass~~ +4 idx +5 val		" 0x04 set strobj flags +3 idx +4 val &03 font (0,1 valid 2,3 invalid)
	" 0x05 set strobj ~~str~~ +4 idx +6 string		&08 dimm &10 inverse video &20 left al. &40 right al. &84 ??
			" 0x05 set strobj string +3 idx +4 string
	" 0x07 see 0x0c		" 0x07 see 0x0c
	" 0x09 cpy ? idx=myaddr? +4 data (words)		" 0x09 cpy ? idx=myaddr? +3 data (words)
	" 0x0a set displ_map_bright? +4 val		" 0x0a set displ_map_bright? +3 val
	" 0x0b set telly bits? +4 idx +5 data (dwords)		" 0x0b set telly bits? +3 idx +4 data (dwords)
	" 0x0c ?cpy? +4 idx +5 data (words)		" 0x0c ?cpy? +3 idx +4 data (words)
	" 0x0d set substr substr +4 idx +5 data		" 0x0d set substr substr +3 idx +4 data
	" 0x0e set substr bitidxmap +4 str_idx +5 data (words)		" 0x0e set substr bitidxmap +3 str_idx +4 data (words)
	" 0x0f set substr idxs +4 str_idx +5 data		" 0x0f set substr idxs +3 str_idx +4 data

Eightdot at 15:58, 14 November 2016

2016-11-14T15:58:01Z

← Older revision		Revision as of 15:58, 14 November 2016
Line 147:		Line 147:
	my $packet = "\xfe$command\xff";		my $packet = "\xfe$command\xff";
	print $packet;		print $packet;

			== Protocol ==

			= bootloader (in EPROM) =
			starts program download if:
			address == 0xFE \|\|
			flash[5] !=0x23 \|\| //programmed after rest of flash
			flash[6] !=0xff //programmed to 0 by appication before
			//reboot to request download



			max 0x200 bytes/?message?
			0xFD escape, next byte ^= 0x20
			0xFE message start
			0xFF message end

			crc16_<<ccitt?>> over unescaped data,
			including crc bytes should give 0xf0B8

			message:
			+0 ?
			+1 0x05
			+2 0x02 erase
			" 0x05 program
			" 0x0a done
			+3 program: address low
			+5 program: address high
			+7 program: data (len = messagelen-7)

			= application (in FLASH) =


			0xFD escape, next byte ^= 0x20
			0xFE message start
			0xFF message end

			crc16_<<ccitt?>> over unescaped data,
			including crc bytes should give 0xf0B8

			message:
			+1 0xFF bootload, writes 0x00 to flash[0x6], then reboots
			+2 0x05 ? must be 0x05
			+3 0x01 ? must be 0x01
			+4 swver must be 0xffff or >= flash[0xE]
			(=0x0504 = v4.5)
			+6 hwver must be flash[0x14] (=0x03)

			message:
			+1 0x02 update bit_buf
			+2 data (len=msg_size-1; max 0x400)

			message:
			+1 0xDB broadcast ?
			+2 0x01 set telly? (note: no reset)
			+3 idx bit to set ?

			message:
			+1 0xCD unicast ?
			+2 0xFF to all ?
			+3 0x02 bitbus set bytes +4 offs +6 data
			" 0x05 set str by id +4 id +6 str
			" 0x07 see 0x0c
			" 0x0c cpy? 3E80 by id +4 id +6 data (words)
			" 0x0d update str by id +4 id +6 str

			+1 0xCD unicast ?
			+2 addr must be my_addr (canot be 0xff)
			+3 0x01 ? len==0x4 ? clr ? strobj.len=0
			" 0x01 ? len!=0x4 ? clr ? +4 idx +5 pos +9 len
			" 0x02 set stridx id +4 str_idx +5 id
			" 0x04 set strobj flass +4 idx +5 val
			" 0x05 set strobj str +4 idx +6 string
			" 0x07 see 0x0c
			" 0x09 cpy ? idx=myaddr? +4 data (words)
			" 0x0a set displ_map_bright? +4 val
			" 0x0b set telly bits? +4 idx +5 data (dwords)
			" 0x0c ?cpy? +4 idx +5 data (words)
			" 0x0d set substr substr +4 idx +5 data
			" 0x0e set substr bitidxmap +4 str_idx +5 data (words)
			" 0x0f set substr idxs +4 str_idx +5 data

Crashjuh at 14:25, 13 November 2016

2016-11-13T14:25:12Z

← Older revision		Revision as of 14:25, 13 November 2016
Line 4:		Line 4:
	\|Omschrijving=Under Monitor Display hacks		\|Omschrijving=Under Monitor Display hacks
	\|Status=In progress		\|Status=In progress
	\|Contact=Eightdot,Sebastius		\|Contact=Eightdot
			\|Contact1=Sebastius
	}}		}}

Juerd: /* on Host */

2016-11-12T05:08:53Z

on Host

← Older revision		Revision as of 05:08, 12 November 2016
Line 14:		Line 14:

	stty -F /dev/ttyUSB0 115200		stty -F /dev/ttyUSB0 115200
	./test CD 01 05 ff `echo Hoi ~~Revspace~~ \| perl -nle'print join " ", unpack("H*", $_) =~ /(..)/g'` > /dev/ttyUSB0
			C code:

			./test CD 01 05 ff `echo Hoi RevSpace \| perl -nle'print join " ", unpack("H*", $_) =~ /(..)/g'` > /dev/ttyUSB0

			Perl code:

			perl test.pl "Hoi RevSpace" > /dev/ttyUSB0

	== C code ==		== C code ==