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

Username:   Password: 
 RegisterRegister   
 Updated Grass with house!
Index -> Programming, Turing -> Turing Submissions
View previous topic Printable versionDownload TopicRate TopicSubscribe to this topicPrivate MessagesRefresh page View next topic
Author Message
Triple Five




PostPosted: Mon Jan 19, 2004 6:13 pm   Post subject: Updated Grass with house!

code:
View.Set("graphics:650;500")
%background
drawfillbox(0,0,650,500,56)
%Grass
var x,y,half:int
process grass(minx,maxx,miny,maxy:int)
    for i:0..20000000
        randint(x,minx,maxx)
        randint(y,miny,maxy)
        half:=maxy-miny
        if y<miny+(half div 3) then
        drawline(x,y,x+1,y+5,119)
        drawline(x,y,x+2,y+5,215)
    end if        if y<miny+(half div 3*2+5) and y>miny+(half div 3-5) then
        drawline(x,y,x+1,y+4,120)
        drawline(x,y,x+2,y+4,215)
    end if
    end for
end grass
fork grass(-2,maxx,0,115)

%House
var pic : int
drawfillbox (24, 247, 273, 84, 114)
drawbox (24, 247, 273, 84, 114)
drawfillbox (278, 80, 608, 389, 114)
drawbox (278, 80, 608, 389, 114)
drawline (273, 84, 279, 81, 7)
drawfillbox (277, 82, 270, 389, 7)
drawbox (277, 82, 270, 389, 7)
pic := Pic.New (26,325,274,244)
drawline (25, 247, 13, 247, 7)
drawline (13, 247, 71, 364, 7)
drawline (71, 364, 270, 364, 7)
drawline (270, 364, 270, 247, 7)
drawline (270, 247, 14, 247, 7)
drawline (609, 389, 618, 389, 7)
drawline (618, 389, 584, 458, 7)
drawline (584, 458, 281, 458, 7)
drawline (270, 389, 258, 389, 7)
drawline (258, 389, 292, 458, 7)
drawline (281, 458, 291, 458, 56)
drawline (258, 389, 616, 389, 7)
drawfillbox (291, 372, 362, 281, 7)
drawbox (291, 372, 362, 281, 7)
drawfillbox (499, 372, 570, 278, 7)
drawbox (499, 372, 570, 278, 7)
drawfillbox (303, 187, 346, 91, 7)
drawbox (303, 187, 346, 91, 7)
drawfillbox (522, 188, 565, 89, 7)
drawbox (522, 188, 565, 89, 7)
drawfillbox (299, 365, 354, 290, 77)
drawbox (299, 365, 354, 290, 77)
drawfillbox (508, 367, 562, 285, 77)
drawbox (508, 367, 562, 285, 77)
drawfillbox (307, 182, 342, 96, 77)
drawbox (307, 182, 342, 96, 77)
drawfillbox (527, 184, 559, 95, 77)
drawbox (527, 184, 559, 95, 77)
drawfillbox (202, 233, 261, 90, 7)
drawbox (202, 233, 261, 90, 7)
drawfillbox (208, 226, 254, 96, 34)
drawbox (208, 226, 254, 96, 34)
drawfillbox (215, 228, 216, 96, 7)
drawbox (215, 228, 216, 96, 7)
drawfillbox (228, 228, 229, 96, 7)
drawbox (228, 228, 229, 96, 7)
drawfillbox (240, 229, 241, 95, 7)
drawbox (240, 229, 241, 95, 7)
drawfillbox (206, 204, 258, 201, 7)
drawbox (206, 204, 258, 201, 7)
drawfillbox (204, 179, 258, 176, 7)
drawbox (204, 179, 258, 176, 7)
drawfillbox (204, 153, 257, 149, 7)
drawbox (204, 153, 257, 149, 7)
drawfillbox (204, 130, 256, 125, 7)
drawbox (204, 130, 256, 125, 7)
drawfillbox (206, 110, 258, 107, 7)
drawbox (206, 110, 258, 107, 7)
drawfillbox (33, 84, 196, 184, 26)
drawbox (33, 84, 196, 184, 26)
drawfillbox (404, 81, 463, 188, 7)
drawbox (404, 81, 463, 188, 7)
drawfillbox (409, 184, 415, 84, 14)
drawbox (409, 184, 415, 84, 14)
drawfillbox (420, 181, 429, 176, 14)
drawbox (420, 181, 429, 176, 14)
drawfillbox (436, 184, 441, 85, 14)
drawbox (436, 184, 441, 85, 14)
drawfillbox (447, 182, 456, 177, 14)
drawbox (447, 182, 456, 177, 14)
drawfillbox (419, 164, 460, 160, 14)
drawbox (419, 164, 460, 160, 14)
drawfillbox (422, 153, 428, 129, 14)
drawbox (422, 153, 428, 129, 14)
drawfillbox (449, 154, 456, 129, 14)
drawbox (449, 154, 456, 129, 14)
drawfillbox (421, 122, 461, 119, 14)
drawbox (421, 122, 461, 119, 14)
drawfillbox (421, 112, 428, 95, 14)
drawbox (421, 112, 428, 95, 14)
drawfillbox (446, 113, 454, 94, 14)
drawbox (446, 113, 454, 94, 14)
drawfillbox (419, 90, 459, 84, 14)
drawbox (419, 90, 459, 84, 14)
drawfilloval (411, 141, -5, 5, 7)
drawoval (411, 141, -5, 5, 7)
drawline (410, 140, 413, 140, 8)
drawline (411, 142, 412, 138, 8)
drawfillbox (380, 80, 384, 212, 92)
drawbox (380, 80, 384, 212, 92)
drawfillbox (364, 223, 499, 211, 92)
drawbox (364, 223, 499, 211, 92)
drawfillbox (485, 211, 492, 80, 92)
drawbox (485, 211, 492, 80, 92)
drawfillbox (380, 210, 376, 80, 92)
drawbox (380, 210, 376, 80, 92)
drawline (364, 224, 416, 250, 7)
drawline (416, 250, 449, 250, 7)
drawline (449, 250, 499, 224, 7)
drawline (365, 226, 498, 226, 7)
drawfill(260,250,grey,black)
drawline (609, 389, 618, 389, 7)
drawline (618, 389, 584, 458, 7)
drawline (584, 458, 281, 458, 7)
drawline (270, 389, 258, 389, 7)
drawline (258, 389, 292, 458, 7)
drawline (281, 458, 291, 458, 56)
drawline (258, 389, 616, 389, 7)
drawfill(265,392,grey,black)
drawline (364, 224, 416, 250, 7)
drawline (416, 250, 449, 250, 7)
drawline (449, 250, 499, 224, 7)
drawline (365, 226, 498, 226, 7)
drawfill(380,230,black,black)


The house was done using a program called pic 2 code!

i wonder if delta made a newer version! Thinking
Sponsor
Sponsor
Sponsor
sponsor
shorthair




PostPosted: Mon Jan 19, 2004 6:25 pm   Post subject: (No subject)

Thats awsome , you rock my world , its a big improvement Claping
sport




PostPosted: Mon Jan 19, 2004 7:08 pm   Post subject: (No subject)

It's huge improvement. But you should start the part of the screen that is being colored by being green and not blue that it look nicer.
MyPistolsIn3D




PostPosted: Thu Apr 29, 2004 1:15 pm   Post subject: cool

Cool stuff man.
Quote:
The house was done using a program called pic 2 code!
what does that mean though? You can convert pics to code?
Paul




PostPosted: Thu Apr 29, 2004 2:04 pm   Post subject: (No subject)

yea man, theres always delta's pic~2~code lol.
MyPistolsIn3D




PostPosted: Thu Apr 29, 2004 2:49 pm   Post subject: (No subject)

huh?
Paul




PostPosted: Thu Apr 29, 2004 3:51 pm   Post subject: (No subject)

Oy....
Delta = a user (the flash mod)
pic~2~code = a program
http://www.compsci.ca/v2/viewtopic.php?t=3009
recneps




PostPosted: Thu Apr 29, 2004 6:02 pm   Post subject: (No subject)

pic 2 code reads the colours and positions in a pic and makes code out of it for you.
Its designed for convenience.
Display posts from previous:   
   Index -> Programming, Turing -> Turing Submissions
View previous topic Tell A FriendPrintable versionDownload TopicRate TopicSubscribe to this topicPrivate MessagesRefresh page View next topic

Page 1 of 1  [ 8 Posts ]
Jump to:   


Style:  
Search: