A little HELP!!

[Ramius]

I believe everything is wired correctly. Yes pin 1 to 28 is connected. Pin 26 (Vout2) goes through a 3.3k resistor per the schematic and removing the resistor does not make a difference. Yes 20-23 are grounded. Before the software changes, NTSC. appeared both with video in and no video in. No video in will display the "No Synchs received" message with NTSC. and the PRPM 6789 message. Now with video in nothing is displayed almost as if our added code is in the wrong subroutine section?

[Ramius]

Hi!
I took a previous version and inserted the additional code and it worked sort of! The PRPM now appears in both the mode with a video input and without a video input! You wrote "I found one wdata that had a bit incorrect and have corrected those, easily done if the codestudio cursor is in the wrong place and you type something." Not sure which or where so maybe this was the cause? There is something else I cannot seem to change and that is the size of the characters! You can see in the code I changed the zoom register to all zeros which should make the characters the smallest possible, however any line number greater than line 8 is off the screen! Is there more than one register I need to change?

Thanks, Ed

P.S. attached is the code without the wdata bit change.

[aerostar]

Looks like we both doing the same thing, attached is my corrected version

I have tested this with NTSC output from RPi and it switches and displays correctly.

I have moved the text, also the RPM and NTSC so that it only appears when there is incoming video.

Regarding the text size I think you will have to play with the POSITION REGISTER - never tried that but that should do something. The STV data sheet does not give much idea as to what that does !

Use my hex file and see if it works on yours.

Should have changed the file name - memory lapse.

[aerostar]

I had a quick look at the Position Register and put this in

WDATA = %0001001000001111 '%0001 011111 001111
GOSUB Send ' Position ADDRESS 15

It moved the lines up and I could get line 9 showing - still missing line 10 at the moment.

Looks like Row Attributes may also be involved.

Will have to ask my friend who did the assembler version if he did anything to Row Attributes.

[Ramius]

Hi Aerostar!
I had thought that this was the character size:

WDATA = %0001000011110000 '4 PIXELS HORIZ AND VERT !
GOSUB Send ' Zoom ADDRESS 12

So I changed it to: WDATA = %0001000000000000 and it made no difference in the text size!

I would also be curious if your setup displays actual red characters as mine seems like a light pink.

Here is a picture of my board

Best, Ed

[aerostar]

Actually the zoom was already set at minimum.

Not played with colour oops sorry color!! but Never Twice Same Color sets have a HUE/TINT control that you can alter on the screen.

I now have worked out getting all lines on screen, it is combined with position and line characteristics. Removed the border area around the characters

Here are the values I have used to get the attached picture.

WDATA Values to be changed to values below

In init routine

'-------------------------------------------------------------
WDATA = %0001001100001111 ' was %0001 011111 001111
GOSUB Send ' Position ADDRESS 15 *****
'-------------------------------------------------------------

and in this

FOR ICOUNT = 0 TO 10
WDATA = %0001000010000001 '<<<<<$10c4 originally
' WDATA =%0001000010000111
GOSUB Send
NEXT ICOUNT

that should! sort the screen out.



Quick and dirty code to do screen fill as a subroutine - modified CLS routine

Run it with no external video input

This is where I put the call, once it has done the Xs it will not go further remeber to comment out GOSUB HEADER.

LOOPER:
    'GOSUB HEADER    ' LINE 3 RIGHT HAND SIDE TEST.
    GOSUB FILLSCREEN
STOPHERE:
    GOTO STOPHERE

I put this at the very bottom of current code.

'----------------------debug fills screen with X------------------

FILLSCREEN: 
    'character=$0B       'SPACE
     TEMP1=0   ' LINECOUNTER
     TEMP =0    'CHARCOUNTER
loop2a:
    
	WDATA = 0  ' LINECOUNTER*256 + CHARCOUNTER   ADDRESS
    GOSUB Send
    

LOOP3a:    '                :CHARACTERS 100011       
	WDATA = %0001011100100011  '     X CHARACTER
    GOSUB Send
	TEMP = TEMP + 1
	IF TEMP >= 28 THEN
    TEMP = 0
    TEMP1=TEMP1 + 1
	ENDIF
	IF TEMP1 >= 11 THEN SCREENBLANKA
 	
    GOTO LOOP3A
    
SCREENBLANKA:
	RETURN

[aerostar]

Had a play with colors -I found that reducing the drive in the MODE REGISTER, BIT M5, from 6dB to 0dB improved the colours, so M5 needs to be a 0, this will depend on how good the monitor is..



If you mofify the fillscreen to the following you should get lines of ifferent colors.

FILLSCREEN: 
    'character=$0B       'SPACE
     TEMP1=0   ' LINECOUNTER
     TEMP =0    'CHARCOUNTER
loop2a:
    
	WDATA = 0  ' LINECOUNTER*256 + CHARCOUNTER   ADDRESS
    GOSUB Send
                                             

LOOP3a:    '                :CHARACTERS 100011       
	WDATA = %0001011100100011  '     X CHARACTER
'   WDATA = %0001011101110111
'    if temp1 =0 then WDATA = %0001011101110111
    if temp1 =1 then WDATA = %0001000001100011
    if temp1 =2 then WDATA = %0001000101100011
    if temp1 =3 then WDATA = %0001001001100011
    if temp1 =4 then WDATA = %0001001101100011
    if temp1 =5 then WDATA = %0001010001100011
    if temp1 =6 then WDATA = %0001010101100011
    if temp1 =7 then WDATA = %0001011001100011
    if temp1 >=8 then WDATA = %0001011101100011
    
    GOSUB Send
	TEMP = TEMP + 1
	IF TEMP >= 28 THEN
    TEMP = 0
    TEMP1=TEMP1 + 1
	ENDIF
	IF TEMP1 >= 11 THEN SCREENBLANKA
 	
    GOTO LOOP3A
    
SCREENBLANKA:
	RETURN