CYOA Main

if(!D.toLowerCase().includes(`error`))
{Fi=I.toUpperCase();
Dl=D.split(`,`);
Ul=Dl.filter(x=>x==U+x.slice(U.length));
Iq=``;
Kl=[];

if(Ul.length==0)
{Pc=1;
Pl=1;
Q=`add`}
else
{Pc=parseInt(Ul[0].split(` `)[1]);
Pl=parseInt(Ul[0].split(` `)[2]);
Q=`edit`;
Iq=Dl.indexOf(Ul[0])};

Np=Pc;
Pp=Pl;

for(key in S[Pc])
{if(key!=`Prompt`)
{Kl.push(key)}};

if(Kl.includes(Fi))
{Np=S[Pc][Fi];
Pp=Pc;
M=`Read`}
else
{if(Fi.length>0)
{M=`Wrong`}
else
{M=`Read`}};

if(S.Back)
{if((I.split(` `)[0].toLowerCase()==`go`&&I.split(` `)[1]?.toLowerCase()==`back`)||I.split(` `)[0].toLowerCase()==`back`)
{M=`Back`;
Np=Pl;
Pp=Pc}};

if(S.Reset)
{if(I.split(` `)[0].toLowerCase()==`reset`)
{M=`Reset`;
Np=1;
Pp=1}};

if(I.split(` `)[0].toLowerCase()==`rules`)
{M=`Rules`}

`${Q}quote?token=${T}&data=${Q==`edit`?`${Iq}%20,${U}%20${Np}%20${Pp}`:`,${U}%20${Np}%20${Pp}`} ${Np} ${Pp} ${M}`}
else
{`Nope 0 0 Error`}