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

Shyfire

Fri Nov 19, 2004 10:29 am


etch a sketch

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



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

zomg

Fri Nov 19, 2004 10:58 am



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

lol thats awesome!

this takes me back... :P 
thanks for posting :)


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

MiX-MaztA-M8riX

Fri Nov 19, 2004 12:04 pm



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

Yo man, stop posting my freakin codes!  :x 

This kid sits beside me in Comp Sci class (Gr. 10) and keeps stealing my codes! No More Codes For You you Fag Boi.  :lol: 

Heres The Actual Code anywayz  :roll: 


setscreen ("graphics:400;400,nobuttonbar")

var font2 : int
font2 := Font.New ("Arial :20")
var keys : array char of boolean
var x, y : int := 100

colorback (grey)
cls

Draw.FillBox (0, 0, 60, maxy, red)
Draw.FillBox (maxx, 0, maxx - 60, maxy, red)
Draw.FillBox (0, maxy, maxx, maxy - 30, red)
Draw.FillBox (0, 0, maxx, 30, red)
Draw.FillOval (30, 30, 30, 30, brightred)
Draw.FillOval (370, 30, 30, 30, brightred)


loop

    Draw.Dot (x, y, 255)

    Input.KeyDown (keys)

    if keys (KEY_DOWN_ARROW)
            then
        y -= 1
        delay (10)

    elsif keys (KEY_UP_ARROW)
            then
        y += 1
        delay (10)

    elsif keys (KEY_LEFT_ARROW)
            then
        x -= 1
        delay (10)

    elsif keys (KEY_RIGHT_ARROW)
            then
        x += 1
        delay (10)

    elsif keys (KEY_ENTER)
            then
        Font.Draw ("Shake Shake!", maxx div 2 - 140, maxy div 2, font2, 10)
        delay (1000)
        Font.Draw ("Shake Shake!", maxx div 2 - 10, maxy div 2-50, font2, 10)
        delay (1000)
        cls
        Draw.FillBox (0, 0, 60, maxy, red)
        Draw.FillBox (maxx, 0, maxx - 60, maxy, red)
        Draw.FillBox (0, maxy, maxx, maxy - 30, red)
        Draw.FillBox (0, 0, maxx, 30, red)
        Draw.FillOval (30, 30, 30, 30, brightred)
        Draw.FillOval (370, 30, 30, 30, brightred)

    end if

end loop



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

zomg

Fri Nov 19, 2004 12:12 pm



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

:o lol fatboi ur a loser

jeez thats low :roll: 

o well nice program mix-watever  :)


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

MiX-MaztA-M8riX

Fri Nov 19, 2004 12:15 pm



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

lol thx  :oops: 

lol, Im the best in my class  8)  :lol:


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

zomg

Fri Nov 19, 2004 12:35 pm



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

is was too (not to brag but my class new nothing by grade 11)


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

MiX-MaztA-M8riX

Fri Nov 19, 2004 2:10 pm



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

lol thats cool, well any other opinions?  :lol:


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

Shyfire

Fri Nov 19, 2004 4:10 pm



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

didnt steal anyones code i had the basic idea and he copied me!!!!!!!!!!!!!!!!!!!!


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

Neo

Fri Nov 19, 2004 4:21 pm



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

Mix-whatever, I dont think it was possible to draw on the red plastic in the real etch-n-sketch.


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

zomg

Fri Nov 19, 2004 4:24 pm



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

didnt steal anyones code i had the basic idea and he copied me!!!!!!!!!!!!!!!!!!!!

well who ever wrote this program :?  its good but guys dont copy each other thats just stupid

come up with ur own ideas and we'll get along fine here...


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

Tony

Fri Nov 19, 2004 4:25 pm



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

fatboi and MiX-MaztA-M8riX, I suggest you settle this between yourself, else I'd just ban you both so that I wouldn't have to deal with this soap opera about plagiarism..


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

AsianSensation

Fri Nov 19, 2004 4:29 pm



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

Locked....for obvious reasons.