Matrix (Movie) Animation

Forum Attachments

Summary:

Can anyone help me make this?

Matrix (Movie) Animation

kaloncpu57 (guest) 05 Mar 2013 21:38

Hi, I want to figure out how to make the falling code from the Matrix movie. I know how to have a few characters falling but I can't get each one to fall at a different speed or how to keep the animation going with new characters appearing. What I have for the basic falling characters is (sorry the code box doesn't work well on my iPod)

:ClrHome
:ClrDraw
:AxesOff
:For(X,1,16
:Output(X,3,"O
:Output(X,6,"Z
:For(Y,1,50
:End
:ClrHome
:End

Re: Matrix (Movie) Animation

Xeda Elnara 07 Mar 2013 13:05

Hmm, making it fall at different rates could be difficult (while making it go fast). If it can all be moving up at the same rate, maybe try:

"         ;no space
Disp Ans,Ans,Ans,Ans,Ans,Ans,Ans
999999999
Repeat getKey=45
Output(8,1,randInt(E7,Ans     ;the E is the one at [2nd][,], not the Alpha E
Output(8,9,randInt(E7,Ans
Disp "
End

---

47%? Take a look and try to imagine how cool 100% will be. This has won zContest 2011 and made news on TICalc. This compromise between Assembly and BASIC parses like BASIC and is fast like assembly. Grammer 2

Re: Matrix (Movie) Animation

Stephen Bendl 05 Mar 2013 21:51

You turned off the Axes and did ClrDraw… do you plan on making this on the Graph screen? If so, the command for that is

Text row,column,string

I'm assuming the For(y,1,50 is to delay, cause it's not doing anything right now… as for adding new characters, you might try something like this to generate random characters

:sub("ABC ... XYZ",randInt(1,26,1

and to make them fall at different speeds? that's pretty tricky… the only way I can think to do it is to give some of the rows scale factors, i.e.

:For(x,1,16
:Output(X,3,"O
:Output(2X,6,"Z
:End

kaloncpu57 (guest) 05 Mar 2013 22:29

the random generator comes up with an Arguement Error and the scale factors cause a Domain Error and basically I just want to go to the programs and hit enter and have this work, so I guess yes I want to do it on the graph screen, also yes the For(Y,1,50 is just a delay,

Stephen Bendl 05 Mar 2013 22:37

D'oh stupid mistake on the scale factor, sorry, that won't work… and as for the random generator, try

:sub("ABC ... XYZ",randInt(1,26),1

kaloncpu57 (guest) 07 Mar 2013 18:01

hey thanks a lot, it's pretty close now, all I need is for it to repeat and to get rid of the domain error when the characters reach the bottom of the screen

(account deleted) 08 Mar 2013 01:31

Say this:

If N<54
Then
[Stop putting on text]
[Remove the Old text with Text(_,_,"______________

That should eliminate ERR:DOMAIN. :D

---

Coffee + Radiohead = ^^