Supernotes

[GDMike]

Anyway I've put this code into explorer to see what's going on.

[GDMike]

Here's a video of explorer 

My "F" looks like it's processing ok, but the"5" isn't

 

[GDMike]

The code

[HOME AUTOMATION]

VSBR moves only 1 byte into R1. MOV moves 2. So the CI will always be more than >40 if the value of the high byte is more than 0.

 

Although my MINI MEMORY book doesn't say, I believe VSBR always returns 0 in the low byte.

 

Try, MOVB instead.

[GDMike]

Did you see my explorer video.

I'm showing the correct values in R1 (4635)

My "F" is processing correctly, but my "5" turns into "50"

I'm dead tired...I'll pull up my code from last year and look at it.ty

Edited June 2, 2020 by GDMike

[HOME AUTOMATION]

Feel confident, R1 should start off as (0046). After the second VSBR, R1 should be(0035).

[GDMike]

I'm examining some of my code from last year.

[+Lee Stewart]

1 hour ago, HOME AUTOMATION said:

Although my MINI MEMORY book doesn't say, I believe VSBR always returns 0 in the low byte.

 

VSBR leaves the LSB of R1 untouched.

 

...lee

[+Lee Stewart]

3 hours ago, GDMike said:

The code

 

I took liberties with your code  

• Preserved R1 by using R0 for the second color (BG) rather than copying it to R4
• Changed your second use of R1 to use R0
• Presuming that T1 starts on an even address, “MOV  T1,R1” and “MOV  T2,R1” both copy the same 2 bytes, viz., ‘F5’. It needs to be MOVB
• Additional changes explained in the code that follows in the spoiler: 

Spoiler

T1     TEXT 'F'
T2     TEXT '5'
START  LWPI WS
*
* get FG nybble into MSB of R1
*
       CLR  R1             for FG nybble
ST2    MOVB @T1,R1
       AI   R1,->3000      convert ASCII in MSB to number (if 0-9)
       CI   R1,>0A00       hex digit > 9?
       JLT  NEXT2          no..we're good
       AI   R1,->0700      correct to hex A-F
NEXT2  SLA  R1,4           shift to FG nybble
*
* get BG nybble into MSB of R0
*
       CLR  R0             for BG nybble
       MOVB @T2,R0
       AI   R0,->3000      convert ASCII in MSB to number (if 0-9)
       CI   R0,>0A00       hex digit > 9?
       JLT  NEXT4          no..we're good
       AI   R0,->0700      correct to hex A-F
*
* prepare for VWTR
*
NEXT4  A    R1,R0          add FG nybble to BG nybble
       AI   R0,>0007       we're updating VR07
       SWPB R0             VDP register # to MSB and FG+BG to LSB
STOP   LIMI 2
       LIMI 0
       JMP  ST2            ????
       END

 

 

...lee

[+mizapf]

Take care:

 

T1 TEXT '5'
T2 TEXT 'F'
...
   MOV @T2,R1

This will fill R1 with '5F'. With MOV, only word addresses (even) can be used; the 2^0 bit (A15) is ignored. You'd get the same result with MOV @T1,R1. 

 

Edit: Wow, that was really synchronous with Lee...

Edited June 2, 2020 by mizapf
Again, blank lines in the code.

[GDMike]

Thx Lee, I was going to pull the file from last year but I got too busy today with yardwork hitting me. 

The code at the bottom,

JMP  ST2            ????
       END

Was so I could repeat the process in explorer.

Thank you for clearing this up for us, I'm hoping to get started on the PAB next.

Thank you everyone. 

Edited June 2, 2020 by GDMike

[GDMike]

I ran that code in explorer and I did not get my final result of >F5 being deposited into R0 or any register.

So I played with the code and got the "0F" and "05" formulated with what Lee produced earlier, and I deposited those two bytes into R5 as pictured.

I just now need to get them combined into a register as "F5" ?

 

Edited June 3, 2020 by GDMike

[GDMike]

Ahh..I see how with SLA 4

So it's just a matter of lining it up prior to my move. 

Looks like I'm getting close.

[+mizapf]

If the FG color is in R0, and the BG color is in R1 (both in the high byte), you can OR R0 on R1 after shifting.

 

SLA R0,4
SOC R0,R1

Edited June 3, 2020 by mizapf

[GDMike]

I'll give it a try. Ty

[GDMike]

Yes sir. That did it! I can handle the rest!! Great math. I'm not too good at that. Thanks!!

 

Edited June 3, 2020 by GDMike

[GDMike]

Compiling into the real program.. keeping my fingers crossed..

[GDMike]

Yay!!! Thanks to everyone - it works!!

Sorry for the typos.. one handed camera holding.

 

Edited June 3, 2020 by GDMike

[GDMike]

A little ahead of schedule..I gave myself until the weekend to complete this task.

Now to start reading up on PAB settings for disk reading/writing. I'm ready to do this since my command line is now set to interpret my commands against my library of predefined statements.

 

Edited June 3, 2020 by GDMike

[+Lee Stewart]

2 hours ago, mizapf said:

If the FG color is in R0, and the BG color is in R1 (both in the high byte), you can OR R0 on R1 after shifting.

SLA R0,4
SOC R0,R1

 

It is interesting to note that the execution times for your SOC suggestion and my A suggestion are identical and, fortunately, in this particular case, produce the same results:

       SOC  R1,R0    <---14 clock cycles  + 4 memory accesses
*  -or-
       A    R1,R0    <---14 clock cycles  + 4 memory accesses

 

...lee

[HOME AUTOMATION]

2 hours ago, GDMike said:

Yay!!! Thanks to everyone - it works!!

Sorry for the typos.. one handed camera holding.

 

 

 

Haha, you did all of this... just to find a creative way to print the F5 in...

 

"CALL COMMAND WITH F5 KEY".

 

Oh WOW! I'm out>.

[GDMike]

The command line allows the user to customize the variant of screen/char colors because I didnt want a hot key to do it and

along with other features including copying, deleting pages AND reading, writing pages as a file..I hope anyway as that's the next step.

 

[GDMike]

Reviw DSR and PAB time!.

 

Edited June 3, 2020 by GDMike

[GDMike]

Here's the latest SNP. The other I uploaded earlier was indeed an older version.

 

 

DSKA0071.dsk

Edited June 4, 2020 by GDMike

[HOME AUTOMATION]