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

chibitenshi_03

Thu Jan 15, 2004 10:04 pm


help ASAP! don't know how to use the click and drag line?

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

How do i make so that the line doesn't erase?

var x, y, btnNumber, btnUpDown, buttons : int
var nx, ny : int
loop
Mouse.ButtonWait ("down", x, y, btnNumber, btnUpDown)
nx := x
ny := y
loop
Draw.Line (x, y, nx, ny, 0) 
exit when Mouse.ButtonMoved ("up")
Mouse.Where (nx, ny, buttons)
Draw.Line (x, y, nx, ny, 1) 
end loop
Mouse.ButtonWait ("up", nx, ny, btnNumber, btnUpDown)
Draw.Line (x, y, nx, ny, 2) 
end loop


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

KukuriChan

Thu Jan 15, 2004 10:10 pm



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

Hey Chibi_Tenshi! I think you'll know who this is. ;)
 

Anyways, try doing this.
%make a temporary drawing of the area

temppic := Pic.New (x, y, x2, y2)