Jump to content
IGNORED

Supernotes


GDMike

Recommended Posts

Im in the process of making words for my library:

I'm doing colors and not all color combinations are readable.

So, do I make commands for all colors or only the ones that are readable, here I made a command, call color(1)

This photo black chars

But red looks horrible with my call color(6)

 

 

received_564407660945721.jpeg

received_879181759216005.jpeg

Edited by GDMike
Link to comment
Share on other sites

Page III-6 of the User's Reference Guide, lists "HIGH-RESOLUTION COLOR COMBINATIONS"

 

It looks like maybe you're trying to use GRAPHICS MODE color methods.

You can only have 1 foreground and 1 background color in TEXT MODE.

Maybe you set the wrong register, I don't recognize that failure mode, specifically.

Edited by HOME AUTOMATION
punctuation
  • Like 1
  • Thanks 1
Link to comment
Share on other sites

5 hours ago, GDMike said:

Im in the process of making words for my library:

I'm doing colors and not all color combinations are readable.

So, do I make commands for all colors or only the ones that are readable, here I made a command, call color(1)

This photo black chars

But red looks horrible with my call color(6)

 

 

received_564407660945721.jpeg

received_879181759216005.jpeg

Confirmed! The real TI shows an awful mosaic pattern on many of the color combos when viewed in text mode. I wonder if the LCD monitor is behind this.

 

Do you have a MINI MEMORY? I have a little trick that lets you explore this easily.
Letting you change VDP register settings and auto-increment them manually.

  • Like 1
Link to comment
Share on other sites

8 hours ago, GDMike said:

Ok, I've gotten 6 colors with black background completed as they are

CALL COLOR(1) through 6

All accessed by typing them into the command line.

That's all for this Evening.. time for backup..

 

Hey GDMike not sure if this helps.  You can use Forth to quickly experiment with screen colors in 40 column mode.

If you download Camel99 Forth you can start it on your real TI99.

 

Then you can just type this kind of thing to see combinations.

 

DECIMAL
: TINT   7 VWTR ;

1 9 TINT   3 4 TINT  1 12 TINT ( ETC.)

You only need 1 file, CAMEL99 from the zip. ( it will go looking for the START file when it boots but it will just complain and then you're in the Forth interpreter.

 

  • Like 1
Link to comment
Share on other sites

Same results regarding color combinations testing, and I kinda figured that as I've run into this before. 

But there are still lots of color combinations still to Choose. Black chars on just about any background as well. 

Lost my gotek drive..I dunno what happened. Restored to a different thumb drive because the old one (8gb) is still acting up, Even after format.

But nothing lost.

I'm an avid supporter of constant backups. Lol

Where's my Tipi? Now I'm needing it.

 

 

Edited by GDMike
  • Like 1
Link to comment
Share on other sites

7 hours ago, GDMike said:

Same results regarding color combinations testing, and I kinda figured that as I've run into this before. 

But there are still lots of color combinations still to Choose. Black chars on just about any background as well. 

Lost my gotek drive..I dunno what happened. Restored to a different thumb drive because the old one (8gb) is still acting up, Even after format.

But nothing lost.

I'm an avid supporter of constant backups. Lol

Where's my Tipi? Now I'm needing it.

 

 

Ya there no surprises with the colors. It's just faster to be able to see what you like interactively with a command line IMHO.

 

  • Like 1
Link to comment
Share on other sites

Well, I came up with a new algorithm I'll put to work today, since I thought of it in my sleep. It will reduce my color codes to a savings of code writing by more than half it's usage currently. But means I gotta go to the beginning of the "call color" source code and delete everything after it.

Oh well, I'll spend the day doing and confirming today.

It's always exciting when I can find a way to reduce my code.

I always do my code by long hand, I call it, then try reducing my code later once it works. It's always a good feeling when its re-evaluated.

 

Edited by GDMike
Link to comment
Share on other sites

On 5/29/2020 at 9:27 PM, GDMike said:

I'm in text mode but I guess not all colors are readable... actually, I'm not finding many at all that I can use. I'll do a video soon on my progress.

 

FYI, there are 15 non-transparent colors and 14 of them can be used as foreground (FG) on any given background (BG), making for 15 * 14 = 210 possible, more-or-less readable, combinations. According to page 242 of the TI-99/4A User’s Reference Guide, there are 53 “high-resolution color combinations” among them:

Spoiler

URGp242.thumb.png.1a5d94bd98a56bca18db9b27ad349299.png

 

You can use SCREEN in TurboForth, TI Forth and fbForth to change the FG/BG colors in Text mode. SCREEN takes one number on the stack that must contain the FG color in the MSB and the BG color in the LSB:

HEX
0F4 SCREEN    <----white on dark blue

 

Here is code to run through all of the possible, readable combinations every 1/2 second in fbForth 2.0 by typing SCREEN-STEP :

Spoiler

HEX
: SEC/60   ( n -- )  \ n = sixtieths of a second
   7FFF OVER U< ABORT" Exceeds 32767/60 s!"  \ 32767/60-second timer limit
   2 *            \ n*2 to count seconds/60 because timer inc is 2
   0 83D6 !       \ zero screen timer
   BEGIN
      DUP         \ keep copy of n*120 for next go-round
      83D6 @      \ current timer value
      U<          \ timer exceeds input time?
   UNTIL
   DROP              \ clean up stack
;

\ cycle through all possible FG/BG combinations except TRANSPARENT
: SCREEN-STEP  
   010 1 DO        \ cycle BG colors except TRANSPARENT
      010 1 DO     \ cycle FG colors except TRANSPARENT
         J I = 0= IF       \ insure FG and BG not same color
            I 4 SLA        \ FG nybble
            J + SCREEN     \ add BG nybble and set colors
            01E SEC/60     \ 30 decimal..wait 1/2 second
         THEN
      LOOP
   LOOP
   0F4 SCREEN              \ restore my screen to 0F4 (244 decimal)
;   
DECIMAL

 

 

And here it is for TurboForth:

Spoiler

HEX
\ Needed for TurboForth...
CODE: INTS  \ briefly allow interrupts <<<TurboForth>>>
   0300 0002   \ LIMI 2
   0300 0000   \ LIMI 0
;CODE

: SEC/60   ( n -- )  \ n = sixtieths of a second
   7FFF OVER U< ABORT" Exceeds 32767/60 s!"  \ 32767/60-second timer limit
   2 *            \ n*2 to count seconds/60 because timer inc is 2
   0 83D6 !       \ zero screen timer
   BEGIN
      INTS  \ briefly allow interrupts for TurboForth...
      DUP         \ keep copy of n*120 for next go-round
      83D6 @      \ current timer value
      U<          \ timer exceeds input time?
   UNTIL
   DROP              \ clean up stack
;

\ cycle through all possible FG/BG combinations except TRANSPARENT
: SCREEN-STEP  
   010 1 DO        \ cycle BG colors except TRANSPARENT
      010 1 DO     \ cycle FG colors except TRANSPARENT
         J I = 0= IF       \ insure FG and BG not same color
            I 4 ( SLA) <<  \ FG nybble..TurboForth uses <<
            J + SCREEN     \ add BG nybble and set colors
            01E SEC/60     \ 30 decimal..wait 1/2 second
         THEN
      LOOP
   LOOP
   0F4 SCREEN              \ restore my screen to 0F4 (244 decimal)
;   
DECIMAL

 

 

You can change the interval between color changes by changing the hex number in front of SEC/60 in the definition of SCREEN-STEP from 01E to 03C for 1 second, 078 for 2 seconds, etc.

 

...lee

Link to comment
Share on other sites

34 minutes ago, Lee Stewart said:

FYI, there are 15 non-transparent colors and 14 of them can be used as foreground (FG) on any given background (BG), making for 15 * 14 = 210 possible,

Yes, but not all are clear. As a matter of fact, for me anyway, all chars against a black background aren't clear, as pixelation of different colors show. But black chars against any screen color other than Black, look ok.

I'll experiment. I'm pretty sure color >1 on about any background except black background would be ok to start with.

Edited by GDMike
Link to comment
Share on other sites

15 minutes ago, Lee Stewart said:

Did you open the spoilers in my post?

 

...lee

I did, and I see that. But I'm not in a position yet to run.

My code is only capable of pushing 9 colors at the moment.

(Reading call color (x) instead of reading: call color (xx).

So I'm having to mod my code before getting to large scale color combinations.

Lol

You are way ahead of me..<grin>

 

Link to comment
Share on other sites

12 minutes ago, HOME AUTOMATION said:

Troupe... meet EASY BUG...:grin:

 

  Reveal hidden contents

EASY BUG... meet The Troupe!:-o

 

EZ1.JPG.7dae91f536b66070fc99f332b9d44dee.JPG

 

EZ2.JPG.4e0dd79ee47fd1c7e667868146e80fea.JPG

M80D4 ENTER

EZ3.JPG.0df6d18d0f656864c5c7849568a1367f.JPG

PRESS "."     than V8712 (first viewable combo)

EZ4.JPG.9a810009916389529e01338e5e277ab4.JPG

"ENTER"

EZ5.JPG.9e6fc595547a27c9338bb3c546ee3ee7.JPG

 "SPACE" or  "ENTER" will increment a register

EZ6.JPG.21cc78c4aac69eb387bc98e15c02bdd5.JPG

PRESSING "-" will decrement...

EZ7.JPG.47153aef86fa6f9710e839532d367b77.JPG

:waving:

 

It's not that big a deal for me to go to a debugger or explorer (which is easier to me), at this time,because 

I've got bigger fish to fry with my code that I'm actually not ready for for my combo colors yet.

Ty though, forth also provided it as well. But I'll probably opt for explorer when the time comes.

 

 

 

Edited by GDMike
  • Like 1
Link to comment
Share on other sites

Update: found the bug

I'm using that area below row 24

VDP R0,960-976

And I wasn't clearing it after using it thus the key I hit was a paste copied line.

It caused a paste of a previous copied line to be pasted, or whatever was sitting at my temporary holding area,(960-976), at the place the cursor was sitting at the time of the paste. Fixed

 

Old info below:

Was able to duplicate one time and never again, reboot didn't recreate 

I'll watch for it.

 

Edited by GDMike
Link to comment
Share on other sites

1 hour ago, HOME AUTOMATION said:

Troupe... meet EASY BUG...:grin:

 

  Reveal hidden contents

EASY BUG... meet The Troupe!:-o

 

EZ1.JPG.7dae91f536b66070fc99f332b9d44dee.JPG

 

EZ2.JPG.4e0dd79ee47fd1c7e667868146e80fea.JPG

M80D4 ENTER than F0 ENTER...

EZ3.JPG.0df6d18d0f656864c5c7849568a1367f.JPG

PRESS "."     than V8712(first viewable combo)

EZ4.JPG.9a810009916389529e01338e5e277ab4.JPG

"ENTER"

EZ5.JPG.9e6fc595547a27c9338bb3c546ee3ee7.JPG

 "SPACE" or  "ENTER" will increment a register

EZ6.JPG.21cc78c4aac69eb387bc98e15c02bdd5.JPG

PRESSING "-" will decrement...

EZ7.JPG.47153aef86fa6f9710e839532d367b77.JPG

:waving:

 

F-troupe ? Hmmm..

I resemble that remark. Sometimes

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...