head	1.2;
access;
symbols
	bg2_23:1.2
	bg2_22:1.2
	bg2_21:1.2
	bg2_20:1.2
	bg2_16:1.2
	bg2_15:1.2
	bg2_12:1.2
	bg2_07:1.2
	isorc2008_submission:1.1
	handbook_alpha_edition:1.1
	jtres2007_submission:1.1;
locks; strict;
comment	@# @;


1.2
date	2008.02.24.19.47.11;	author martin;	state Exp;
branches;
next	1.1;
commitid	594b47c1c9be4567;

1.1
date	2007.05.14.19.12.14;	author martin;	state Exp;
branches;
next	;
commitid	f9e4648b48d4567;


desc
@@


1.2
log
@JOP goes GPL
@
text
@/*
  This file is part of JOP, the Java Optimized Processor
    see <http://www.jopdesign.com/>

  Copyright (C) 2007, Christof Pitter

  This program is free software: you can redistribute it and/or modify
  it under the terms of the GNU General Public License as published by
  the Free Software Foundation, either version 3 of the License, or
  (at your option) any later version.

  This program is distributed in the hope that it will be useful,
  but WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  GNU General Public License for more details.

  You should have received a copy of the GNU General Public License
  along with this program.  If not, see <http://www.gnu.org/licenses/>.
*/

package vga;

import com.jopdesign.sys.Const;
import com.jopdesign.sys.Native;
//
//	Clock.java
//

public class ClockVgaLine {

	public static void main( String s[] ) {

		int addr = 0;
		int offset = 0x28000;
		boolean j = true;
		
		Native.wr(0, Const.IO_WD);		// make WD happy
		Native.wr(1, Const.IO_WD);
		Native.wr(0, Const.IO_WD);
		Native.wrMem(0x11111111, 0x28000); // first VGA Address	
		Native.wrMem(0x11111111, 0x3ffff); // last VGA Address
		
		// red vertical lines
		
		for (int i=0; i<768; i++)
		{
			for (int k=0; k<128; k++)
			{
					addr = i*128 + k + offset;
				
					if (i<128)
					{
						if (k == i)
						{
							Native.wrMem(0x22222222, addr); // rot
						}
						else
						{
							Native.wrMem(0xffffffff, addr); // gelb
						}
					}
					else if (i>=128 && i<256)
					{
						if (k == (i % 128))
						{
							Native.wrMem(0x22222222, addr); // rot
						}
						else
						{
							Native.wrMem(0xffffffff, addr); // gelb
						}
					}
					else if (i>=256 && i<512)
					{
						if (k == (i % 128))
						{
							Native.wrMem(0x22222222, addr); // rot
						}
						else
						{
							Native.wrMem(0xffffffff, addr); // gelb
						}
					}
					else
					{
						if (k == (i % 128))
						{
							Native.wrMem(0x22222222, addr); // rot
						}
						else
						{
							Native.wrMem(0xffffffff, addr); // gelb
						}
					}		
			}
		}
		time();
	}

	static void time() {

		int next;
		int h, m, s, ms;
		int startVga;
		int stopVga;
		int test;
		int start;
		int addr_line = 0;
		int offset_line = 0x29900;
		
		start = 0x28000;


		h = m = s = ms = 0;
		next = 0;
		s = -1;

		for (;;) {

			++ms;
			if (ms==1000) {
				ms = 0;
				++s;
				if (s==60) {
					s = 0;
					++m;
				}
				if (m==60) {
					m = 0;
					++h;
				}
				if (h==24) h = 0;
				print_02d(h);
				print_char(':');
				print_02d(m);
				print_char(':');
				print_02d(s);
				print_char(' ');
				print_char('S');
				print_char('T');
				print_char('A');
				print_char('R');
				print_char('T');
				print_char(':');
				print_char(' ');
				
				startVga = Native.rdMem(start);
				//print_02d(startVga);
				print_hex(startVga);
				
				print_char(' ');
				print_char('S');
				print_char('T');
				print_char('O');
				print_char('P');
				print_char(':');
				print_char(' ');
				stopVga = Native.rdMem(0x3ffff);
				//print_02d(stopVga);
				print_hex(stopVga);
				
				test = (s % 3);
				
				print_char(' ');
				print_char('E');
				print_char('R');
				print_char('G');
				print_char(':');
				print_char(' ');
				print_02d(test);
				print_char('\r');
				
				
				
			/*	for (int j=0; j<2048; j++)
				{
					addr_line = j + offset_line;
					
					switch (test)
					{
						case 0:
							if((j%128)<=42)
							{
								Native.wrMem(0x22222222, addr_line); // rot
							}
							else
							{
								Native.wrMem(0xCCCCCCCC, addr_line); // grün
							}
						case 1:
							if( ((j%128)>42) && ((j%128)<=84) )
							{
								Native.wrMem(0xffffffff, addr_line); // gelb
							}
							else
							{
								Native.wrMem(0xCCCCCCCC, addr_line); // grün
							}
						case 2:
							if( ((j%128)>84) && ((j%128)<=128) )
							{
								Native.wrMem(0xffffffff, addr_line); // gelb
							}
							else
							{
								Native.wrMem(0xCCCCCCCC, addr_line); // grün
							}
					//	default:
					//		Native.wrMem(0x00000000, addr_line); // schwarz
							
					}
					
				}*/
					
					
	
				Native.wr(s & 1, Const.IO_WD);
			}

			//Native.wr(~s & 1, Const.IO_WD);
			//Native.wr(s & 1, Const.IO_WD);

			next = waitForNextInterval(next);
		}
	}

	static int waitForNextInterval(int next) {

		final int INTERVAL = 1000;		// one ms
		
		if (next==0) {
			next = Native.rd(Const.IO_US_CNT)+INTERVAL;
		} else {
			next += INTERVAL;
		}

		while (next-Native.rd(Const.IO_US_CNT) >= 0)
				;

		return next;
	}

	static void print_02d(int i) {

		int j;
		for (j=0;i>9;++j) i-= 10;
		print_char(j+'0');
		print_char(i+'0');
	}
		
/*
	static void print_04d(int i) {

		if (i<0) {
			print_char('-');
			i = -i;
		}

		int j, k, l;
		for (j=0;i>999;++j) i-= 1000;
		for (k=0;i>99;++k) i-= 100;
		for (l=0;i>9;++l) i-= 10;
		print_char(j+'0');
		print_char(k+'0');
		print_char(l+'0');
		print_char(i+'0');
	}
		

	static void print_06d(int i) {

		if (i<0) {
			print_char('-');
			i = -i;
		}

		int j;

		for (j=0;i>99999;++j) i-= 100000;
		print_char(j+'0');
		for (j=0;i>9999;++j) i-= 10000;
		print_char(j+'0');
		for (j=0;i>999;++j) i-= 1000;
		print_char(j+'0');
		for (j=0;i>99;++j) i-= 100;
		print_char(j+'0');
		for (j=0;i>9;++j) i-= 10;
		print_char(j+'0');
		print_char(i+'0');
	}*/
		


	static void print_hex(int i) {

		int j, k;

		for (j=0; j<8; ++j) {
			k = i>>>((7-j)<<2);
			k &= 0x0f;
			k = k<10 ? k+'0' : k-10+'a';
			print_char(k);
		}
	}


	static void wait_serial() {

		while ((Native.rd(Const.IO_STATUS)&1)==0) ;
	}

	static void print_char(int i) {

		System.out.print((char) i);
		/*
		wait_serial();
		Native.wr(i, Const.IO_UART);
		*/
	}

}
@


1.1
log
@VGA test programs
@
text
@d1 20
@