wait 2s
set #i 0     //некая переменная, которая будет пользоваться ниже

if 1331, 304 0  //в любой непонятной ситуации ставь ддор (эта часть для 2+ прохождения цикла), используется координата черного квадратика справа от надписи Words of ancient ones.
  wait 10s     //если не зашел в квест из слеера, жди отката ддора и ставь его, дабы оказаться у входа
  move 682, 440
  right 682, 440
  send {num_1}   //ddoor
  wait 500
  send {num_1}
  wait 500
  send {num_1}
  wait 500
  send_down s 100   
  wait 500
  move 701, 330
  wait 500
  left 701, 330
  wait 500
  move 682, 440
  left 682, 440
  wait 1000

  goto slayerddoorout 
end_if

move 682, 440 
 
send_down w 5000   //это старт от входа
send_down a 250
send_down w 2000
send {Spacebar}
send_down w 3000
send_down a 470
send_down w 350
  wait 1s
if 77, 85 0
  move 682, 440
  right_down 682, 440
  send_down a 350
  right_up 682, 440
end_if 
send q      //диалог с первым
  wait 500
send e
  wait 1s
send {Enter}
  wait 1s
send {Enter}
  wait 1s
send {Enter}
  wait 1s
right 682, 440
send_down d 1030
send_down w 1000
send_down a 140
send_down w 1300
send q    //диалог со вторым
wait 500
send e
wait 1s
send {Enter}
wait 1s
send {Enter}
wait 1s
send {Enter}
wait 1s
right 682, 440
send_down d 500
send_down w 2300
send_down a 425
send_down w 1850

send q  //диалог с 3
wait 500
send e
wait 1s
send {Enter}
wait 1s
send {Enter}
wait 1s
send {Enter}
wait 1s
right 682, 440 

:ddoor
send {num_1}   //ddoor
wait 500
send {num_1}
wait 500
send {num_1}
wait 500

send_down s 100
wait 500
move 701, 330
wait 500
left 701, 330
wait 500
move 682, 440
left 682, 440
wait 1000

send_down d 1000  //развернуться к выходу и выйти
send_down w 1000
wait 500
move 701, 330
send e
wait 500
send {Enter}
wait 2000
:slayerddoorout
send_down a 1200
wait 4s     

if 1331, 304 0  //в любой непонятной ситуации ставь ддор (это если по какой-то причине основной ддор не сработал, либо не получилось в него войти)
  goto startreset
  else
    move 682, 440
    right 682, 440
    wait 15s
    goto ddoor
end_if

:startreset    //раздел сброса и реентера
send_down w 2300
wait  500
send q
wait 500
send e
wait 500
move 336, 198        //reset
left 336, 198
wait 500
left 336, 198
wait 500
move 631, 471
wait 500
left 631, 471
wait 500

:openquest
wait 500
send q
wait 500
send e
wait 500

move 332, 301      //choose ee
left 332, 301
wait 500
left 332, 301
wait 500
move 90, 555
left 90, 555
wait 500

wait 4s         
if 1331, 304 0    //проверка на случай если из-за лага не вошлось в квест
  if i = 0
    set #i 1
    goto openquest
  end_if
end_if
wait 1s