Procedure random() error.

I get this weird "parse error before ':=' " error on both line 64 & 75, and I have tried alot of different things but I cant fix it for some odd reason. Here's the code:
[code]
Procedure UserRoll; {Calculates the user's damage.}
begin
init;
enmyhp := 500;
randomize;
userrange := str + wpnstr * 2
random(userrange) := userdmg; {Line64}
userdmg := userdmg - enmydef;
enmyhp := enmyhp - userdmg;
end;

Procedure EnmyRoll; {Calculates the cpu's damage.}
begin
init;
userhp := 500;
randomize;
enmyrange := enmystr + enmywpnstr * 2;
random(enmyrange) := enmydmg; {Line75}
enmydmg := enmydmg - def;
userhp := userhp - enmydmg;
end;
[/code]

Its a procedure for the computer to generate a random number based on given variables. Thanks.
Sign In or Register to comment.

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories