-----------------------------------

lil_li

Mon May 12, 2003 8:02 am


Matrix text effect

-----------------------------------

hey... anyone know how to use "Matrix" to make words?

i mean like, i know how to do the green letters falling down. But i want it stops and make words or Pictures... You ppl know how to do that?


-----------------------------------

AsianSensation

Mon May 12, 2003 8:04 am



-----------------------------------

look up at catalyst's source code, he has it in the source code help section


-----------------------------------

Catalyst

Mon May 12, 2003 2:21 pm



-----------------------------------

it would take some heavy modding to make what you want tho


-----------------------------------

Homer_simpson

Mon May 12, 2003 4:15 pm


Re: Matrix text effect

-----------------------------------

But i want it stops and make words or Pictures... 
what does that mean?


-----------------------------------

kythoon

Mon May 12, 2003 4:19 pm



-----------------------------------

think he means the letters fall down the screen and then form a word at the bottom instead of disappearing


-----------------------------------

void

Mon May 12, 2003 5:08 pm



-----------------------------------

like in the actual movie...when the letters fell down like crazy then out of nowhere some letters didnt fall all the way...and in the end it spelled out..."YOU ARE A DUMBASS"....wait...no....that was my dream....it was actually "THE MATRIX"


-----------------------------------

Homer_simpson

Mon May 12, 2003 5:12 pm



-----------------------------------

Lol!!!!
IC


-----------------------------------

lil_li

Mon May 12, 2003 10:58 pm


reply

-----------------------------------

it's like falling down then it will make a pattern of some sorte .... like they did with the movie matrix... except that was 3d and have human shapes... i just want the word "MATRIX" shown up


-----------------------------------

beedub

Tue May 13, 2003 4:52 pm



-----------------------------------

this may help... colourback (7)
cls
colour (green)

var ch : string (1)

loop
 
    var x : int
    randint (x, 1, 25)
    locate (x, 1)
    put x
    var y : int
    randint (y, 1, 25)
    locate (y, 2)
    put y
    var z : int
    randint (z, 1, 25)
    locate (z, 3)
    put z
    var a : int
    randint (a, 1, 25)
    locate (a, 4)
    put a
    var b : int
    randint (b, 1, 25)
    locate (b, 5)
    put b
    var c : int
    randint (c, 1, 25)
    locate (c, 6)
    put c
    var d : int
    randint (d, 1, 25)
    locate (d, 7)
    put d
    var e : int
    randint (e, 1, 25)
    locate (e, 8)
    put e
    var f : int
    randint (f, 1, 25)
    locate (f, 9)
    put f
    var g : int
    randint (g, 1, 25)
    locate (g, 10)
    put g
    var h : int
    randint (h, 1, 25)
    locate (h, 11)
    put h
    var i : int
    randint (i, 1, 25)
    locate (i, 12)
    put i
    var j : int
    randint (j, 1, 25)
    locate (j, 13)
    put j
    var k : int
    randint (k, 1, 25)
    locate (k, 14)
    put k
    var l : int
    randint (l, 1, 25)
    locate (l, 15)
    put l
    var m : int
    randint (m, 1, 25)
    locate (m, 16)
    put m
    var n : int
    randint (n, 1, 25)
    locate (n, 17)
    put n
    var o : int
    randint (o, 1, 25)
    locate (o, 18)
    put o 
    var p : int
    randint (p, 1, 25)
    locate (p, 19)
    put p
    var q : int
    randint (q, 1, 25)
    locate (q, 20)
    put q
    var r : int
    randint (r, 1, 25)
    locate (r, 21)
    put r
    var s : int
    randint (s, 1, 25)
    locate (s, 22)
    put s
    var t : int
    randint (t, 1, 25)
    locate (t, 23)
    put t
    var u : int
    randint (u, 1, 25)
    locate (u, 24)
    put u
    var v : int
    randint (v, 1, 25)
    locate (v, 25)
    put v
    var w : int
    randint (w, 1, 25)
    locate (w, 26)
    put w
    var x1 : int
    randint (x1, 1, 25)
    locate (x1, 1)
    put x1
    var y1 : int
    randint (y1, 1, 25)
    locate (y1, 2)
    put y1
    var z1 : int
    randint (z1, 1, 25)
    locate (z1, 3)
    put z1
    var a1 : int
    randint (a1, 1, 25)
    locate (a1, 4)
    put a1
    var b1 : int
    randint (b1, 1, 25)
    locate (b1, 5)
    put b1
    var c1 : int
    randint (c1, 1, 25)
    locate (c1, 6)
    put c1
    var d1 : int
    randint (d1, 1, 25)
    locate (d1, 7)
    put d1
    var e1 : int
    randint (e1, 1, 25)
    locate (e1, 8)
    put e1
    var f1 : int
    randint (f1, 1, 25)
    locate (f1, 9)
    put f1
    var g1 : int
    randint (g1, 1, 25)
    locate (g1, 10)
    put g1
    var h1 : int
    randint (h1, 1, 25)
    locate (h1, 11)
    put h1
    var i1 : int
    randint (i1, 1, 25)
    locate (i1, 12)
    put i1
    var j1 : int
    randint (j1, 1, 25)
    locate (j1, 13)
    put j1
    var k1 : int
    randint (k1, 1, 25)
    locate (k1, 14)
    put k1
    var l1 : int
    randint (l1, 1, 25)
    locate (l1, 15)
    put l1
    var m1 : int
    randint (m1, 1, 25)
    locate (m1, 16)
    put m1
    var n1 : int
    randint (n1, 1, 25)
    locate (n1, 17)
    put n1
    var o1 : int
    randint (o1, 1, 25)
    locate (o1, 18)
    put o1
    var p1 : int
    randint (p1, 1, 25)
    locate (p1, 19)
    put p1
    var q1 : int
    randint (q1, 1, 25)
    locate (q1, 20)
    put q1
    var r1 : int
    randint (r1, 1, 25)
    locate (r1, 21)
    put r1
    var s1 : int
    randint (s1, 1, 25)
    locate (s1, 22)
    put s1
    var t1 : int
    randint (t1, 1, 25)
    locate (t1, 23)
    put t1
    var u1 : int
    randint (u1, 1, 25)
    locate (u1, 24)
    put u1
    var v1 : int
    randint (v1, 1, 25)
    locate (v1, 25)
    put v1
    var w1 : int
    randint (w1, 1, 25)
    locate (w1, 26)
    put w1
    delay (32)
    exit when count = hasch 
end loopi know this isnt exactly what you wanted but its a start


-----------------------------------

beedub

Tue May 13, 2003 4:53 pm



-----------------------------------

but what you could do is... at the end... make a delay and then put the words.. or image you want in there..


-----------------------------------

beedub

Tue May 13, 2003 4:54 pm



-----------------------------------

oh and i didnt do that code just for you.. my bro wanted to see if i could do it.. like a week ago...


-----------------------------------

beedub

Tue May 13, 2003 5:09 pm



-----------------------------------

but also catalyst's looks alot better... but mine is good for acyually making the words appear at the end.. :)


-----------------------------------

Martin

Tue May 13, 2003 5:13 pm



-----------------------------------

You do realise that was 4 posts in a row by you...


-----------------------------------

nate

Tue May 13, 2003 5:17 pm



-----------------------------------

ur matrix sucks cause there is like 3/4 of just black background 

use:

setscreen ("graphics:position;100,300")
or something like that


-Nate


-----------------------------------

beedub

Tue May 13, 2003 5:27 pm



-----------------------------------

yes i do know that was 4 posts... i am srry... some times i get carried away... and yes i do know my matrix sux... i am 12... i made the matrix scene on a 220;440 scene... it takes a long time to do..especially for me.. i have short hands lol ;).. they hurt after a while.. srry i made it then put it on a program so the one that you want is this... setscreen ("graphics:220;400") 
colourback (7) 
cls 
colour (green) 

var ch : string (1) 
loop 
    var x : int 
    randint (x, 1, 25) 
    locate (x, 1) 
    put x 
    var y : int 
    randint (y, 1, 25) 
    locate (y, 2) 
    put y 
    var z : int 
    randint (z, 1, 25) 
    locate (z, 3) 
    put z 
    var a : int 
    randint (a, 1, 25) 
    locate (a, 4) 
    put a 
    var b : int 
    randint (b, 1, 25) 
    locate (b, 5) 
    put b 
    var c : int 
    randint (c, 1, 25) 
    locate (c, 6) 
    put c 
    var d : int 
    randint (d, 1, 25) 
    locate (d, 7) 
    put d 
    var e : int 
    randint (e, 1, 25) 
    locate (e, 8) 
    put e 
    var f : int 
    randint (f, 1, 25) 
    locate (f, 9) 
    put f 
    var g : int 
    randint (g, 1, 25) 
    locate (g, 10) 
    put g 
    var h : int 
    randint (h, 1, 25) 
    locate (h, 11) 
    put h 
    var i : int 
    randint (i, 1, 25) 
    locate (i, 12) 
    put i 
    var j : int 
    randint (j, 1, 25) 
    locate (j, 13) 
    put j 
    var k : int 
    randint (k, 1, 25) 
    locate (k, 14) 
    put k 
    var l : int 
    randint (l, 1, 25) 
    locate (l, 15) 
    put l 
    var m : int 
    randint (m, 1, 25) 
    locate (m, 16) 
    put m 
    var n : int 
    randint (n, 1, 25) 
    locate (n, 17) 
    put n 
    var o : int 
    randint (o, 1, 25) 
    locate (o, 18) 
    put o 
    var p : int 
    randint (p, 1, 25) 
    locate (p, 19) 
    put p 
    var q : int 
    randint (q, 1, 25) 
    locate (q, 20) 
    put q 
    var r : int 
    randint (r, 1, 25) 
    locate (r, 21) 
    put r 
    var s : int 
    randint (s, 1, 25) 
    locate (s, 22) 
    put s 
    var t : int 
    randint (t, 1, 25) 
    locate (t, 23) 
    put t 
    var u : int 
    randint (u, 1, 25) 
    locate (u, 24) 
    put u 
    var v : int 
    randint (v, 1, 25) 
    locate (v, 25) 
    put v 
    var w : int 
    randint (w, 1, 25) 
    locate (w, 26) 
    put w 
    var x1 : int 
    randint (x1, 1, 25) 
    locate (x1, 1) 
    put x1 
    var y1 : int 
    randint (y1, 1, 25) 
    locate (y1, 2) 
    put y1 
    var z1 : int 
    randint (z1, 1, 25) 
    locate (z1, 3) 
    put z1 
    var a1 : int 
    randint (a1, 1, 25) 
    locate (a1, 4) 
    put a1 
    var b1 : int 
    randint (b1, 1, 25) 
    locate (b1, 5) 
    put b1 
    var c1 : int 
    randint (c1, 1, 25) 
    locate (c1, 6) 
    put c1 
    var d1 : int 
    randint (d1, 1, 25) 
    locate (d1, 7) 
    put d1 
    var e1 : int 
    randint (e1, 1, 25) 
    locate (e1, 8) 
    put e1 
    var f1 : int 
    randint (f1, 1, 25) 
    locate (f1, 9) 
    put f1 
    var g1 : int 
    randint (g1, 1, 25) 
    locate (g1, 10) 
    put g1 
    var h1 : int 
    randint (h1, 1, 25) 
    locate (h1, 11) 
    put h1 
    var i1 : int 
    randint (i1, 1, 25) 
    locate (i1, 12) 
    put i1 
    var j1 : int 
    randint (j1, 1, 25) 
    locate (j1, 13) 
    put j1 
    var k1 : int 
    randint (k1, 1, 25) 
    locate (k1, 14) 
    put k1 
    var l1 : int 
    randint (l1, 1, 25) 
    locate (l1, 15) 
    put l1 
    var m1 : int 
    randint (m1, 1, 25) 
    locate (m1, 16) 
    put m1 
    var n1 : int 
    randint (n1, 1, 25) 
    locate (n1, 17) 
    put n1 
    var o1 : int 
    randint (o1, 1, 25) 
    locate (o1, 18) 
    put o1 
    var p1 : int 
    randint (p1, 1, 25) 
    locate (p1, 19) 
    put p1 
    var q1 : int 
    randint (q1, 1, 25) 
    locate (q1, 20) 
    put q1 
    var r1 : int 
    randint (r1, 1, 25) 
    locate (r1, 21) 
    put r1 
    var s1 : int 
    randint (s1, 1, 25) 
    locate (s1, 22) 
    put s1 
    var t1 : int 
    randint (t1, 1, 25) 
    locate (t1, 23) 
    put t1 
    var u1 : int 
    randint (u1, 1, 25) 
    locate (u1, 24) 
    put u1 
    var v1 : int 
    randint (v1, 1, 25) 
    locate (v1, 25) 
    put v1 
    var w1 : int 
    randint (w1, 1, 25) 
    locate (w1, 26) 
    put w1 
    delay (32) 
    exit when hasch 
end loop 



-----------------------------------

void

Tue May 13, 2003 6:05 pm



-----------------------------------

WOW....no offence or anything..im taking into account that you are new....but that was the WORST programming i have ever seen in my life...honestly you used too many variables an some pointless stuff...in like 5 seconds i remade it and i know its still pretty crappy..but thats because i tried to make it not so big

var w : int := Window.Open ("fullscreen")
var freak : string := "The matrix has you neo...."
setscreen ("nocursor")
colourback (7)
cls
colour (10)
var charac : int
var run_count : int := 0
loop
    for b : 1 .. 48
        for a : 1 .. maxcol
            randint (charac, 0, 1)
            locate (b, a)
            put charac
        end for
    end for
    run_count += 1
    exit when run_count = 30
end loop
delay (100)
colourback (7)
cls
for a : 1 .. length (freak)
    locate (3, a + 1)
    put freak (a), "_" ..
    delay (100)
end for

im pretty sure thats what you want...(unless you wanna mess around wit catalysts proggy...i tried to do that...but i couldnt get it to run properly...wateva...


-----------------------------------

ZeroKelvin

Tue May 13, 2003 6:43 pm



-----------------------------------

that's pretty good still, but i like catalyst's better
and btw matrix is out in like 2 days, can't wait to see it :lol:


-----------------------------------

beedub

Tue May 13, 2003 6:49 pm



-----------------------------------

void... i know its pretty crappy... i put that in my post... lol..i made it a couple weeks ago... when all i knew were variables , loops and randints..lol.. i could also.. do your's now.. but i had already done that,,, so i just copied and pasted... void what school you go to??


-----------------------------------

lil_li

Tue May 13, 2003 7:53 pm



-----------------------------------

testing hehehe


-----------------------------------

lil_li

Tue May 13, 2003 7:55 pm


TAKE A LOOK

-----------------------------------

OK... I THIK THIS IS THE FREAKING LONGEST CODE I EVER DONE THAT COULD BE DONE UNDER 200 LINES... OMG... ME SO STUPID... ANYWAYS.... 

I WAS THINKNIG DRAWING "FOOT BALL" AS IN TEXT FILE AND OUT PUT IT.. (OH DARN STUPID CAPITAL) 

so i was wondering, you ppl know how to make a real picture instead of words? ( i saw a guy drew a tank in matrix... really cool)
setscreen ("graphics:788,502")

var startx, starty, randx : int
var font : int := Font.New ("courier:15:bold")
var font2 : int := Font.New ("courier:15:bold")
var letter := "QWERTYUIOPLKJHGFDSAZMXNCBVQWERTYUIOPLKCHGFDSAZMXNCBVASFWERIYTYUINQWEQ"
var xchange : array 1 .. 14 of int
var count := 0


drawfillbox (0, 0, maxx, maxy, 7)

startx := 10


var x := 4

loop

    count += 1
    for rep : 1 .. 14
        randint (randx, 1, 788)
        xchange (rep) := randx
    end for

    x := 4

    randint (starty, maxy - 30, maxy)

    for repss : 1 .. 54
        x := x + 1

        Font.Draw (letter (x), startx, starty, font, 10)
        Font.Draw (letter (x + 2), startx + xchange (1), starty - 62, font, 10)
        Font.Draw (letter (x + 5), startx + xchange (2), starty - 18, font, 10)
        Font.Draw (letter (x + 1), startx + xchange (3), starty - 55, font, 10)
        Font.Draw (letter (x + 2), startx + xchange (4), starty - 20, font, 10)
        Font.Draw (letter (x - 2), startx + xchange (5), starty - 13, font, 10)
        Font.Draw (letter (x + 3), startx + xchange (6), starty - 37, font, 10)
        Font.Draw (letter (x + 1), startx + xchange (7), starty - 8, font, 10)
        Font.Draw (letter (x - 1), startx + xchange (8), starty - 13, font, 10)
        Font.Draw (letter (x - 3), startx + xchange (9), starty - 4, font, 10)
        Font.Draw (letter (x + 5), startx + xchange (10), starty - 10, font, 10)
        Font.Draw (letter (x + 5), startx + xchange (11), starty - 8, font, 10)
        Font.Draw (letter (x + 5), startx + xchange (12), starty - 42, font, 10)
        Font.Draw (letter (x + 4), startx + xchange (13), starty - 23, font, 10)
        Font.Draw (letter (x - 1), startx + xchange (14), starty - 10, font, 10)


        starty -= 11
        delay (15)


        Font.Draw (letter (x), startx, starty + 20, font, 2)
        Font.Draw (letter (x + 2), startx + xchange (1), starty + 20, font, 2)
        Font.Draw (letter (x + 5), startx + xchange (2), starty + 20, font, 2)
        Font.Draw (letter (x + 1), startx + xchange (3), starty + 20, font, 2)
        Font.Draw (letter (x + 2), startx + xchange (4), starty + 20, font, 2)
        Font.Draw (letter (x - 2), startx + xchange (5), starty + 20, font, 2)
        Font.Draw (letter (x + 3), startx + xchange (6), starty + 20, font, 2)
        Font.Draw (letter (x + 1), startx + xchange (7), starty + 20, font, 2)
        Font.Draw (letter (x - 1), startx + xchange (8), starty + 20, font, 2)
        Font.Draw (letter (x - 3), startx + xchange (9), starty + 20, font, 2)
        Font.Draw (letter (x + 5), startx + xchange (10), starty + 20, font, 2)
        Font.Draw (letter (x + 5), startx + xchange (11), starty + 20, font, 2)
        Font.Draw (letter (x + 5), startx + xchange (12), starty + 20, font, 2)
        Font.Draw (letter (x + 4), startx + xchange (13), starty + 20, font, 2)
        Font.Draw (letter (x - 1), startx + xchange (14), starty + 20, font, 2)


        Font.Draw (letter (x), startx, starty + 40, font, 120)
        Font.Draw (letter (x + 2), startx + xchange (1), starty + 40, font, 120)
        Font.Draw (letter (x + 5), startx + xchange (2), starty + 40, font, 120)
        Font.Draw (letter (x + 1), startx + xchange (3), starty + 40, font, 120)
        Font.Draw (letter (x + 2), startx + xchange (4), starty + 40, font, 120)
        Font.Draw (letter (x - 2), startx + xchange (5), starty + 40, font, 120)
        Font.Draw (letter (x + 3), startx + xchange (6), starty + 40, font, 120)
        Font.Draw (letter (x + 1), startx + xchange (7), starty + 40, font, 120)
        Font.Draw (letter (x - 1), startx + xchange (8), starty + 40, font, 120)
        Font.Draw (letter (x - 3), startx + xchange (9), starty + 40, font, 120)
        Font.Draw (letter (x + 5), startx + xchange (10), starty + 40, font, 120)
        Font.Draw (letter (x + 5), startx + xchange (11), starty + 40, font, 120)
        Font.Draw (letter (x + 5), startx + xchange (12), starty + 40, font, 120)
        Font.Draw (letter (x + 4), startx + xchange (13), starty + 40, font, 120)
        Font.Draw (letter (x - 1), startx + xchange (14), starty + 40, font, 120)


        Font.Draw (letter (x), startx, starty + 60, font, 192)
        Font.Draw (letter (x + 2), startx + xchange (1), starty + 60, font, 192)
        Font.Draw (letter (x + 5), startx + xchange (2), starty + 60, font, 192)
        Font.Draw (letter (x + 1), startx + xchange (3), starty + 60, font, 192)
        Font.Draw (letter (x + 2), startx + xchange (4), starty + 60, font, 192)
        Font.Draw (letter (x - 2), startx + xchange (5), starty + 60, font, 192)
        Font.Draw (letter (x + 3), startx + xchange (6), starty + 60, font, 192)
        Font.Draw (letter (x + 1), startx + xchange (7), starty + 60, font, 192)
        Font.Draw (letter (x - 1), startx + xchange (8), starty + 60, font, 192)
        Font.Draw (letter (x - 3), startx + xchange (9), starty + 60, font, 192)
        Font.Draw (letter (x + 5), startx + xchange (10), starty + 60, font, 192)
        Font.Draw (letter (x + 5), startx + xchange (11), starty + 60, font, 192)
        Font.Draw (letter (x + 5), startx + xchange (12), starty + 60, font, 192)
        Font.Draw (letter (x + 4), startx + xchange (13), starty + 60, font, 192)
        Font.Draw (letter (x - 1), startx + xchange (14), starty + 60, font, 192)
        delay (15)


        Font.Draw (letter (x), startx, starty + 80, font, 7)
        Font.Draw (letter (x + 2), startx + xchange (1), starty + 80, font, 7)
        Font.Draw (letter (x + 5), startx + xchange (2), starty + 80, font, 7)
        Font.Draw (letter (x + 1), startx + xchange (3), starty + 80, font, 7)
        Font.Draw (letter (x + 2), startx + xchange (4), starty + 80, font, 7)
        Font.Draw (letter (x - 2), startx + xchange (5), starty + 80, font, 7)
        Font.Draw (letter (x + 3), startx + xchange (6), starty + 80, font, 7)
        Font.Draw (letter (x + 1), startx + xchange (7), starty + 80, font, 7)
        Font.Draw (letter (x - 1), startx + xchange (8), starty + 80, font, 7)
        Font.Draw (letter (x - 3), startx + xchange (9), starty + 80, font, 7)
        Font.Draw (letter (x + 5), startx + xchange (10), starty + 80, font, 7)
        Font.Draw (letter (x + 5), startx + xchange (11), starty + 80, font, 7)
        Font.Draw (letter (x + 5), startx + xchange (12), starty + 80, font, 7)
        Font.Draw (letter (x + 4), startx + xchange (13), starty + 80, font, 7)
        Font.Draw (letter (x - 1), startx + xchange (14), starty + 80, font, 7)


        if count = 1 and starty