Programming C, C++, Java, PHP, Ruby, Turing, VB
Computer Science Canada 
Programming C, C++, Java, PHP, Ruby, Turing, VB  

Username:   Password: 
 RegisterRegister   
 some text testing
Index -> Programming, Turing -> Turing Help
View previous topic Printable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic
Author Message
santabruzer




PostPosted: Sat Jan 17, 2004 11:20 pm   Post subject: some text testing

well i dunnu.. i wonder how to make this better.. so that it will display ... "faster"
code:
var ptext : string
var mx, my, mb : int
var font := Font.New ("courier:12")
setscreen ("offscreenonly")
ptext := "Santabruzer"
type loc :
    record
        x, y : int
        letter : string
    end record
var text : array 1 .. length (ptext) of loc
loop
    for decreasing i : length (ptext) .. 1
        mousewhere (mx, my, mb)
        text (i).x := mx + i * 20
        text (i).y := my + 20
        text (i).letter := ptext (i)
        for f : 1 .. 5
            Font.Draw (text (i).letter, text (i).x - f, text (i).y - (f div 2), font, 24 + f)
        end for
        Font.Draw (text (i).letter, text (i).x, text (i).y, font, 7)
        delay (5)
    end for
    View.Update
    cls
end loop

Sponsor
Sponsor
Sponsor
sponsor
Boarder16




PostPosted: Sat Jan 17, 2004 11:22 pm   Post subject: (No subject)

whoa! Very Happy nice work dude, i dunno about any suggestions.. but the text looks to "stiff"... if it were more free flowing it'd be cooler.. but nice work! Razz
santabruzer




PostPosted: Sat Jan 17, 2004 11:23 pm   Post subject: (No subject)

saw it on a website.. decided it was easy enough to make.. plust i can probably make a tutorial on record with this example.. Razz
AsianSensation




PostPosted: Sun Jan 18, 2004 4:28 pm   Post subject: (No subject)

instead if clearing the screen, draw a white box that covers the words, that should increase efficiency a bit. Also, take out any delays, that will also make it "flow" better.

Btw, dodge had already made a tutorial with records, so if you want to make another and challenge the "whatdotcolor warrior" go right on ahead.
Andy




PostPosted: Sun Jan 18, 2004 6:17 pm   Post subject: (No subject)

challange... pshhh go rite ahead Twisted Evil Twisted Evil
santabruzer




PostPosted: Sun Jan 18, 2004 6:43 pm   Post subject: (No subject)

nah screw it.. it's been done.. ... i swear it wasn't there two weeks ago.. Razz ... i'll just keep on being the record warrior in my mind Very Happy
Andy




PostPosted: Sun Jan 18, 2004 7:26 pm   Post subject: (No subject)

uhh dude... look at the date on that... it's been their for at least 2 months
Display posts from previous:   
   Index -> Programming, Turing -> Turing Help
View previous topic Tell A FriendPrintable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic

Page 1 of 1  [ 7 Posts ]
Jump to:   


Style:  
Search: