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

leu_raz

Wed Jan 07, 2004 11:19 am


Need Help with drag command!

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

Hy i need help with the drag command.I have my ISP due in about one week and my project is that i am hired by a grade 1 teacher and i am to test the ability of kids to put 5 blocks in order from the smallest to the largest.My question is:How do you make the blocks move?But move not leaving tracks behind.???And my other question is how does the computer know when all the blocks are in the right order?That's it thank you very much if you cna help... :idea:


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

shorthair

Wed Jan 07, 2004 11:29 am



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

WHAT TH EHELL ARE YOU DOING SPAMMING THIS FORUM ,WHY DO YOU NEED 2 IDENTICLE TOPICS , If this was a mistake then i can understand but if not this will not help get your question answered


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

shorthair

Wed Jan 07, 2004 11:35 am



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

i have a feeling you are doing the same project as marioman88 , il help help you both out on his topic , there is no need for 3 topics  about the exact same thing


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

icedesi

Wed Jan 07, 2004 7:10 pm



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

Ez, when you make ur loops, create a box that is the  color of the background, itll mask the trails.


setscreen ('offscreenonly')
setscreen ('graphics:vga')
for x: 190..199
drawfillbox (x,195,x+25,206,red)
delay (400)
drawfillbox (x,195,x+25,206,white) % or Color of background
View.Update
end for


Aiite? k, Good! :) As for the other one, im thinkin. :?


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

Skizzarz

Wed Jan 07, 2004 8:37 pm



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

umm... do u mean kinda like when you move the mouse, the shape follows? cuz i can help u there....just reply fast...

oh yay 24 bits now! Almost 3 bytes! lol


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

Skizzarz

Wed Jan 07, 2004 8:38 pm



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

im so stupid... 24/8 IS 3.... duh and to think im in gr 11.....


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

leu_raz

Thu Jan 08, 2004 4:46 pm



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

Thanks for the help till now.It has been pretty efficient.To mask the trails i already knew that but here it doesn't work;(.This is my code till now:
%Declare Variables
var c := 10
var d := 10
var x, y, b : int
var e := 60
var f := 60
var answer : string
var g := 150
var h := 100
var i := 400
var j := 200
%Welcome Note
colorback (blue)
Text.Color (white)
put "" : 20, "Hello and welcome to THE TEST"
put " You must drag the boxes in their specified place."
put "The perfect score can be taken if you arrange the boxes..."
put "from the smallest to the largest"
put "Welcome to the test!You must put each box in it's predefined place."
put "If you want to continue input next."
put "If you wish to quit just say esc."
get answer
for p : 0 .. 1
    if answer = "next" then
        cls
        colorback (101)
        Text.Color (105)
        put "" ..
        put "Well put the boxes in the right order"
    elsif answer = "esc" then
        exit
    end if
end for

%BOXES
drawbox (150, 30, 180, 60, black)
drawfillbox (10, 10, 50, 50, blue)
drawfillbox (60, 60, 120, 120, red)
drawfillbox (150, 100, 250, 200, black)
drawfillbox (400, 200, 440, 240, green)

loop
    mousewhere (x, y, b)
    if x >= c and x = d and y = e and x = f and y = g and x = h and y = i and x = j and y