heey, first to begin: here is my full code:

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!
I'm not super familiar with the DCSE libraries, but it looks like the offending code is in this region:

Code:
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

It also looks like you're using sprites for the font, instead of drawString (real(6)). Is there any particular reason for that? However my guess is that you've only drawn the background to one of the two display buffers, so every time you real(9), it flips the currently displayed buffer, and only one of them has your background.
elfprince13 wrote:

It also looks like you're using sprites for the font, instead of drawString (real(6)). Is there any particular reason for that? However my guess is that you've only drawn the background to one of the two display buffers, so every time you real(9), it flips the currently displayed buffer, and only one of them has your background.


yes, i use sprites, because the DrawString is a little bit to big to show a large sentence, so i made my own font with letters of 5x7 pixels, which is much less than the DrawString.
your second thing: does it mean, that i must add something like real(8,1,0)???
It's probably better to just draw your background twice, once on each layer, and be done with it.
  
Register to Join the Conversation
Have your own thoughts to add to this or any other topic? Want to ask a question, offer a suggestion, share your own programs and projects, upload a file to the file archives, get help with calculator and computer programming, or simply chat with like-minded coders and tech and calculator enthusiasts via the site-wide AJAX SAX widget? Registration for a free Cemetech account only takes a minute.

» Go to Registration page
Page 1 of 1
» All times are UTC - 5 Hours
 
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum

 

Advertisement