% File Writer for RPG
% by NotNemesis

var lv, hp, mp, a, d, ma, md, s, l : int % Player stats

%Order of stats in file : Level, HP, MP. Attack, Defence, Magic Attack, Magic Defence, Speed, Luck

lv := 1 % Level
hp := 10 % HP
mp := 5 % MP
a := 6 % Attack
d := 4 % Defence
ma := 3 % Magic Power
md := 3 % Magic Defence
s := 4 % Speed
randint (l, 1, 3) % Luck

procedure sv % Save procedure
    var file : int
    open : file, "rpgsave.txt", put

    loop
        exit when eof (file)
        get :  lv, hp, mp, a, d, ma, md, s, l % Getting vars
        put :  lv, hp, mp, a, d, ma, md, s, l % Writing vars
        close : file
    end loop
end sv

put "Saved!"