TEST

`StopScript() {
Send, {F2}
}

BUY_condition() {
global
return (area[1] ~= "BUY")
}

SELL_condition() {
global
return (area[1] ~= "SELL")
}

longPosition:= 0
shortPosition := 0
loop {
loop{
read_areas()
} until (BUY_condition() || SELL_condition() )

if(BUY_condition() && longPosition <> 1) {
    if(shortPosition = 1) {
        click(point.a)
        shortPosition:= 0
        click(point.c)
    }
    else {
        click(point.a)
        longPosition := 1
        click(point.c)
    }
}

else if(SELL_condition() && shortPosition <> 1 ) {
    if(longPosition = 1) {
        click(point.b)
        longPosition := 0
        click(point.c)
    }
    else {
        click(point.b)
        shortPosition := 1
        click(point.c)
    }
}

}`