#pragma optimize("Bismillahirrahmanirrahim")
//█▀█─█──█──█▀█─█─█
//█▄█─█──█──█▄█─█■█
//█─█─█▄─█▄─█─█─█─█
//Allahuekber
//ahmet23 orz...
//FatihSultanMehmedHan
//YavuzSultanSelimHan
//AbdulHamidHan
//Sani buyuk Osman Pasa Plevneden cikmam diyor.
#define author tolbi
#include<bits/stdc++.h>
using namespace std;
template<typename T> vector<int32_t> normalize(vector<T> &rt){vector<int32_t> arr(rt.size());for (int i = 0; i < rt.size(); i++){arr[i]=rt[i];}return arr;}
#define endl '\n'
#define int long long
#define vint(x) vector<int> x
#define cinarr(x) for (auto &it : x) cin>>it;
#define coutarr(x) for (auto &it : x) cout<<it<<" ";cout<<endl;
#define sortarr(x) sort(x.begin(), x.end())
#define sortrarr(x) sort(x.rbegin(), x.rend())
#define rev(x) reverse(x.begin(), x.end())
#define deci(x) int x;cin>>x;
#define decstr(x) string x;cin>>x;
#define tol(bi) (1LL<<((int)(bi)))
#define lsb(x) (x&-x)
const int MOD = 1e9+7;
const int64_t INF = 1e15;
mt19937 ayahya(chrono::high_resolution_clock().now().time_since_epoch().count());
#include "dungeons.h"
vector<int32_t> s,p,w,l;
int n;
vector<vector<int>> st;
vector<vector<int>> val;
vector<vector<int>> mava;
const int LOG = 60;
void init(int32_t _n, vector<int32_t> _s, vector<int32_t> _p, vector<int32_t> _w, vector<int32_t> _l) {
n=_n,s=_s,p=_p,w=_w,l=_l;
st.resize(n+1,vector<int>(LOG,-1));
val.resize(n+1,vector<int>(LOG,-1));
mava.resize(n+1,vector<int>(LOG,-1));
for (int node = 0; node < n; node++){
st[node][0]=w[node];
mava[node][0]=s[node];
val[node][0]=s[node];
}
for (int bit = 1; bit < LOG; bit++){
for (int node = 0; node < n; node++){
if (st[node][bit-1]==-1) continue;
st[node][bit]=st[st[node][bit-1]][bit-1];
if (st[node][bit]==-1) continue;
val[node][bit]=val[node][bit-1]+val[st[node][bit-1]][bit-1];
mava[node][bit]=max(mava[node][bit-1],mava[st[node][bit-1]][bit-1]);
if (val[node][bit]>INF){
val[node][bit]=st[node][bit]=mava[node][bit]=-1;
}
}
}
}
int simul(int x, int z){
for (int bit = LOG-1; bit >= 0; bit--){
if (st[x][bit]==-1) continue;
if (z<mava[x][bit]) continue;
z+=val[x][bit];
x=st[x][bit];
}
if (x==n) return z;
if (z>=s[x]){
z+=s[x];
x=w[x];
}
else {
z+=p[x];
x=l[x];
}
return simul(x,z);
}
int64_t simulate(int32_t x, int32_t z) {
int ans = simul(x,z);
return ans;
}
