$${
if(ex);
log("[&6ExBuild] &4OFF");
unset(ex);
keyup(forward)
keyup(sneak)
gui(INVENTORY)
wait(100ms)
gui()
stop;
else;
log("[&6ExBuild] &2ON");
set(ex);

PROMPT(#distancia3,$$?,"Qual o tamanho da rua region? 100x100=1 60x60=2")
PROMPT(#ib,$$?,"Qual bloco voce vai usar? ID")
PROMPT(#altura2,$$?,"Qual vai ser a altura da sua parede?")
#distancia2=%#distancia3%-1
#distancia1=%#distancia2%-5

//blocos
#blocos3=%#distancia3%*4
#blocos2=%#distancia3%*2
#blocos=%#blocos3%-8
#altura=%#blocos%*%#altura2%
log("&6[ExBuild] &fVoce irá gastar &c%#blocos% &fblocos por altura.")
log("&6[ExBuild] &fVoce irá gastar &c%#altura% &fblocos ao total.")
#d=250
#posfim = %XPOS%+%#distancia2%
#posfim2 = %ZPOS%-%#distancia2%
#posfim3 = %XPOS%-0
#posfim4 = %ZPOS%+0

set(#bc,"")

do;
    do(2)
        look(,90)
        wait(500ms)
        keydown(jump)
        wait(250ms)
        pick(%#ib%)
        key(use)
        keyup(jump)
        inc(#bc)
    loop
    look(EAST)
    keydown(forward)
    keydown(sneak)
    do;
        look(,80)
        pick(%#ib%)
        key(use)
        inc(#bc)
        wait(%#d%ms)
        pick(%#ib%)
        key(use)
        inc(#bc)
    until(%XPOS%=%#posfim%)
    wait(%#d%ms)
    pick(%#ib%)
    key(use)
    inc(#bc)
    log(Chegou)
    keyup(forward)
    keyup(sneak)
    wait(500ms)
    gui(INVENTORY)
    wait(100ms)
    gui()
    wait(1)
    LOOK(NORTH)
    wait(1)

    /////////////////

    keydown(forward)
    keydown(sneak)
    do;
        look(,80)
        pick(%#ib%)
        key(use)
        inc(#bc)
        wait(%#d%ms)
        pick(%#ib%)
        key(use)
        inc(#bc)
    until(%ZPOS%=%#posfim2%)
    wait(%#d%ms)
    pick(%#ib%)
    key(use)
    inc(#bc)
    log(Chegou)
    keyup(forward)
    keyup(sneak)
    wait(500ms)
    gui(INVENTORY)
    wait(100ms)
    gui()
    wait(1)
    LOOK(WEST)
    wait(1)

    /////////////////

    keydown(forward)
    keydown(sneak)
    do;
        look(,80)
        pick(%#ib%)
        key(use)
        inc(#bc)
        wait(%#d%ms)
        pick(%#ib%)
        key(use)
        inc(#bc)
    until(%XPOS%=%#posfim3%)
    wait(%#d%ms)
    pick(%#ib%)
    key(use)
    inc(#bc)
    log(Chegou)
    keyup(forward)
    keyup(sneak)
    wait(500ms)
    gui(INVENTORY)
    wait(100ms)
    gui()
    wait(1)
    LOOK(SOUTH)
    wait(1)

    /////////////////

    keydown(forward)
    keydown(sneak)
    do;
        look(,80)
        pick(%#ib%)
        key(use)
        inc(#bc)
        wait(%#d%ms)
        pick(%#ib%)
        key(use)
        inc(#bc)
    until(%ZPOS%=%#posfim4%)
    wait(%#d%ms)
    pick(%#ib%)
    key(use)
    inc(#bc)
    log(Chegou)
    keyup(forward)
    keyup(sneak)
    wait(500ms)
    gui(INVENTORY)
    wait(100ms)
    gui()
    wait(1)
    log(termeinei)
loop;

ENDIF;
}$$