heey, first to begin: here is my full code:
Code:
my problem is next: i made an user-made input, with correspoding letters saving in a string (Str3)
now have i an appvar with each of the 26 letters as an 'sprite'
so what ive done is to draw each letter of the string.
but now the first, third, fifth, etc. i pressed a key, my background disappears. why? that's the question. if there is some ambiguity: save my code in sourcecoder and try
Edit: Screenshot
tanx!
Code:
:DCS
"BB777777777777BBB77222222222277B77222222222222777222BBBB222222277222BBBB2222222777222BB22222222777722BB22222222777777BB22222222777777BB77222222777777BB77777777777777BB777BB77777777BBBBBBBB77777777BBBBBBBB77777777777777777777B77777777777777BBB777777777777BB"
ClrHome
If 80>det([[20
Then
Disp "Get Doors CSE to run this:","http://dcs.cemetech.net"
Return
End
Disp "========LINGO v1.0========"," 1 PLAYER"," 2 PLAYERS"," QUIT"
2->R
Repeat Ans=105
If Ans
Then
Output(R,1," "
Output(R,26," "
End
min(4,max(2,R+sum(DeltaList(Ans={25,34->R
Output(R,1,">
Output(R,26,"<
getKey
End
If R=4
Then
ClrHome
Stop
End
If R=3
Then
Repeat length(Str9)=5
ClrHome
Disp "PLEASE ENTER A WORD OF 5","LETTERS:","",""
Asm(prgmALOCK
Input " ",Str9
End
End
If R=2
Then
"rowSwap(LINGO"->Str0
randInt(1,479
det(0
End
{22,14,17,3,26,27}->|LLING
"LINGO2"
real(5,0,0
real(0,1,1
real(0,3,4,93,1
real(0,3,4,93,0
For(A,1,5
For(B,1,5
real(7,7,19A-17,19B-17,20,20,0,0
End
End
For(A,1,dim(|LLING
real(4,0,6A+110,20,1,1,0,0,255,0,0,|LLING(A)
End
real(9
" "->Str3
Repeat K=105
Repeat Ans>40 and Ans<94 or max(Ans={105,23
getKey->K
End
Ans-20-5int(.1Ans
If 6>length(Str3) and 0<Ans and Ans<29
Str3+sub("ABC DEFGHIJKLMNOPQRSTUVWXYZ",Ans,1->Str3
If K=23 and 1<length(Str3
sub(Str3,1,length(Str3)-1->Str3
For(A,1,length(Str3
real(4,0,6A+104,30,1,1,0,0,255,0,0,inString("ABCDEFGHIJKLMNOPQRSTUVWXYZ!? ",sub(Str3,A,1))-1
End
real(9
End
If 1<length(Str3
sub(Str3,2,length(Str3)-1->Str3
Pause
real(0,3,4,255,1
real(0,3,4,255,0
real(0,1,0,1
my problem is next: i made an user-made input, with correspoding letters saving in a string (Str3)
now have i an appvar with each of the 26 letters as an 'sprite'
so what ive done is to draw each letter of the string.
but now the first, third, fifth, etc. i pressed a key, my background disappears. why? that's the question. if there is some ambiguity: save my code in sourcecoder and try
Edit: Screenshot
tanx!