bgri/m100LE

More anticipation for the 'CONGRATS' message

Closed this issue · 7 comments

hackerb9 commented

As mentioned in #6, the main thing missing aesthetically right now is slowly flipping over the letters when you win to give a sense of anticipation before the word "CONGRATS!!"

hackerb9 commented

It would make sense to have a general subroutine for "letter flipping".

bgri commented
bgri commented

Well, I've been experimenting with a few things to do the 'letter-reveal' as each letter is tested. Also might work for the congrats. routine. Code is ugly (you've been warned). I've also got some timer loops and some display timers that are probably slowing things down.

I've tested this on my 102 and it works... but it's only a start. Not happy with anything here yet...

`
10 ' Test flashing character reveal routine
20 W$="HIPPY": ' TARGET WORD
24 P=10
26 TW$="": ' TEST WORD (OUR GUESS)
28 INPUT TW$
33 CLS
34 PRINT @ 20, TIME$
100 FOR N=1 TO 5
110 FOR L=1 TO 26
113 'GOSUB 550 : 'DELAY TO SLOW DOWN THE FLASH
114 'GOSUB 500
115 'GOSUB 550
116 'GOSUB 530
117 PRINT @ N, CHR$(L+65): PRINT @ 60, TIME$
120 IF CHR$(L+65) = MID$(TW$,N,1) AND MID$(TW$,N,1) = MID$(W$,N,1) THEN NEXT N ELSE NEXT L
130 IF N <6 THEN PRINT @ N, "." ELSE END
135 NEXT N
499 END
500 ' SPINNER THING
510 PRINT @ N,"/":GOSUB 560: PRINT @ N,"-":GOSUB 560:PRINT @ N, "":GOSUB 560:PRINT @ N,"|":GOSUB 560: PRINT @ N, "/":GOSUB 560: PRINT @ N,"-":GOSUB 560: PRINT @ N,"":GOSUB 560: PRINT @ N,"|"
520 RETURN
530 ' SYMBOLS
532 FOR X=33 TO 64: PRINT @ N, CHR$(X)
534 RETURN
550 ' PAUSE
560 FOR X = 1 TO P:NEXT X
570 RETURN

`

hackerb9 commented

That doesn't look too bad. Reminds me of those movies where they need suspense so they have a computer slowly cracking a password letter by letter. It needs to be fairly swift, though, since the user already knows that the only letters that can legitimately appear in that spot are the ones that they typed.

Have you considered switching the letter to Reverse Video to make it look a little like a Wordle tile?

RV=CHR$(27)+"p": NV=CHR$(27)+"q"

🅷 🅸 🅿 🅿 🆈

bgri commented

Hmm, perhaps! Have to test it. I do use reverse video in the LOADING message but I think I get to that using a poke. Will have to convert that to VT52 code as well.

hackerb9 commented

I do use reverse video in the LOADING message but I think I get to that using a poke. Will have to convert that to VT52 code as well.

Already done. ☺

36 RV$=CHR$(27)+"p": NV$=CHR$(27)+"q": 'REVERSE / NORMAL VIDEO                  
6002 PRINT @ 72, RV$ "LOADING" NV$;

The POKE method of reverse video was one of the first things I knew wouldn't be portable. My Tandy 200 didn't show anything, so I presume the POKE was changing some memory location it oughtn't.

bgri commented

Heh, you're a machine! Thank you!