How can the following code be reduced in characters while still being all in one line, as well as, with the "With too low/too high feedback" code, have a space between the words TOO and LOW, as well as the words TOO and HIGH, without a space being rendered along with the winning text (CORRECT, which I changed to RIGHT due to Family BASIC having maximum characters on one line limitations)? (I've asked both questions on the Famicom World forum (At http://famicomworld.com/forum/index.php?topic=14558.0 and http://famicomworld.com/forum/index.php?topic=14576.0 respectively.), but no one's even responding to them. I also tried asking for help at AtariAge (http://atariage.com), but I had issues with the required sections to post a new topic.):
Without too low/too high feedback (97 characters)
With too low/too high feedback (245 characters)
Here are some examples of Family BASIC code to hopefully help you help me reduce the "With too low/too high feedback" code in characters because I've attempted to use them, all in failure (along with the names of their distinct differences):
Changed math
Prints legibly and uses for loops
Uses DATA and READ in a for loop
Without too low/too high feedback (97 characters)
Code:
0N=RND(10)+1:F.I=0TO0:I."WHAT'S MY NUMBER? (1-10) ",G:I=G<>N:?CHR$(I*-73)CHR$(I*-78)"CORRECT.":N.
With too low/too high feedback (245 characters)
Code:
0N=RND(10)+1:F.T=0TO0:I."WHAT'S MY NUMBER? (1-10) ",G:T=G<>N:L=G<N:H=G>N:R=G=N:A=T*-79:B=H*-71:C=R*-71:?CHR$(A+5)CHR$(A)CHR$(A)CHR$(L*-76)CHR$(L*-79)CHR$(L*-87)CHR$(B+1)CHR$(B+2)CHR$(B)CHR$(B+1)CHR$(C+11)CHR$(C+2)CHR$(C)CHR$(C+1)CHR$(C+13)".":N.
Here are some examples of Family BASIC code to hopefully help you help me reduce the "With too low/too high feedback" code in characters because I've attempted to use them, all in failure (along with the names of their distinct differences):
Changed math
Code:
0N=RND(10)+1:F.T=0TO0:I."WHAT'S MY NUMBER? (1-10) ",G:T=G<>N*-79:L=G<N:H=G>N*-71:R=G=N*-71:?CHR$(T+5)CHR$(T)CHR$(T)CHR$(L*-76)CHR$(L*-79)CHR$(L*-87)CHR$(H+1)CHR$(H+2)CHR$(H)CHR$(H+1)CHR$(R+11)CHR$(R+2)CHR$(R)CHR$(R+1)CHR$(R+13)".":N.
Prints legibly and uses for loops
Code:
0N=RND(10)+1:F.T=0TO0:I."WHAT'S MY NUMBER? (1-10) ",G:T=G<>N:L=G<N:H=G>N:R=G=N:F.X=0TOLSTEP1:?"TOO LOW.":N.:F.Y=0TOHSTEP1:?"TOO HIGH.":N.:F.Z=0TORSTEP1:?"CORRECT.":N.:N.
Uses DATA and READ in a for loop
Code:
0N=RND(10)+1:F.T=0TO0:I."WHAT'S MY NUMBER? (1-10) ",G:T=G<>N:L=G<N:H=G>N:R=G=N:A=T*-79:B=H*-71:C=R*-71:0F.S=1TO15:DATAA+5,A,A,L*-76,L*-79,L*-87,B+1,B+2,B,B+1,C+11,C+2,C,C+1,C+13:READS:?CHR$(S);:N.:?".":N.