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

LittleRy

Thu Sep 24, 2009 6:54 pm


have varibles in place of line draw points

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

this is the code i got. and my problem is half way down, but other wise it works, if i take out the, draw.line, line
sorry to bug you guys a again.
____________________________________
var slope : real
var x : real
var b : real

var x1 :real
var y1 : real

var x2 : real
var y2 : real

var x3 : real
var y3 : real

put "make a line"
put "enter x and y cordnates for two points"
loop
    var reply1 : string (1)
    var reply2 : string (1)
    put "what is X1?"
    get x1
    put "what is Y1?"
    get y1
    put "what is X2?"
    get x2
    put "what is Y2?"
    get y2
    slope:=y2-y1/x2-x1
    b:=(slope*x1)-y1
    put "the equation is y=",slope,"x+",b
    Draw.Line(x1,y1,x1,x2,2)