Hey! I'm currently working on my first RPG in pure BASIC.

For the main menu, i want to have lightning strikes on the horizon in the picture on the backdrop. So far, this is my code:

:Lbl M1
:RecallPic Pic3
:While 1
:rand(25
:RecallPic Pic5
:rand(25
:ClrDraw
:RecallPic Pic3
:End
Pic3 is the normal picture, and Pic5 is the normal picture, but with lightning bolts in the picture. My problem is this: the ClrDraw causes the whole picture to flicker, and i don't know how to avoid it. And yes, I know the flickering can be interpreted as lightning strikes, but i still don't like it.

how do you copy a string of commands (a program) from one program to another?

i tried using a string, but it didn't work. because i have several programs i would like to combine together for memory reasons and just for convenience.

Heyyy guys! I'm new to the forum  Anywayy, i'm not sure if we're supposed to do BASIC code in a special box when posting like on other forums, but here i goooo.
I'm making a horse racing game for my calculator, which involves selecting one of five horses (i had a friend do cool graphics for each one ), and placing a bet on a horse . I've made the racing animation work, yet it takes up tonsss of memory, because it wanted to have the winning horse in front of the others in each animation. So, being the TI-noob that i am, i made a seperate race code for each horses' victory. Is there anyway I can shrink it down to code for just one race? Here it is:

:ClrHome
:ClrDraw
:randInt(1,5)->R
:If R=1:Then
:ClrHome
:For(X,2,16)   //it's starting at 2 so the other horses can be "behind" the lead horse
:Output(2,X,"o  //row #2 is first lane so the race is more in the center of the screen
:Output(3,X-1,"o
:Output(4,X-1,"o
:Output(5,X-1,"o
:Output(6,X-1,"o
:For(Y,1,150)
:End
:Output(2,X," "
:Output(3,X-1," "
:Output(4,X-1," "
:Output(5,X-1," "
:Output(6,X-1," "
:End
:Goto AE     //the victory scene is on lbl AE
:End

Now this code would be repeated for all 5 potential R values (each horse). Is there any way I can avoid repeating this code, but still have one horse winning? (In this case, the horse in lane 1 won)