This is my code in watcom pascal, its sort of like trubo but ok
so that i need my code to do it make it have a variable in there, that will be added and when the words are all taken up, it opened a new page(the winning screen)
i already got the lossing screen
mistakes:=0;
while (mistakes<>6) do
begin
poscursor (22,44);
prompt("Enter a Letter: ",letter);
if (move="TheDarkKnight") then
begin
if (letter="T") or (letter="t") then
begin
poscursor(12,50);
writeln(letter);
poscursor(16,68);
writeln(letter);
end
else if (letter="H") or (letter="h") then
begin
poscursor (12,55);
writeln (letter);
poscursor(16,63);
writeln(letter);
end
else if (letter="E") or (letter="e") then
begin
poscursor(12,60);
writeln (letter);
end
else if (letter="D") or (letter="d") then
begin
poscursor (14,48);
writeln (letter);
end
else if (letter="A") or (letter="a") then
begin
poscursor (14,53);
writeln (letter);
end
else if (letter="R") or (letter="r") then
begin
poscursor (14,58);
writeln (letter);
end
else if (letter="K") or (letter="k") then
begin
poscursor (14,63);
writeln (letter);
poscursor(16,43);
writeln(letter);
end
else if (letter="N") or (letter="n") then
begin
poscursor(16,48);
writeln (letter);
end
else if (letter="I") or (letter="i") then
begin
poscursor (16,53);
writeln (letter);
end
else if (letter="G") or (letter="g") then
begin
poscursor (16,58);
writeln (letter);
end
else
begin
mistakes:=mistakes+1;
multmist:=mistakes*5;
poscursor (18,47+(multmist));
writeln(letter);