Mich1103's scripting thread

[mich1103]

This will be where i'll ask my question !
(i don't have question now ...) 


I add level and xp in my shop script
how can i detect if Xp is higher to maxXp ?

[DarkCrusade]

if (xp >= maxxp) then

[zyxstand]

...oh god

i'm usually for helping people, but when the questions are so elementary, i feel like they need to do a bit of research on their own.

mich: how much programming have you done in soldat scripting?

[mich1103]

@Dark Crusade : Thanks !

@zyxstand : You're asking me how many script i did ?

[zyxstand]

that's one way of putting it... i'm just asking because your question seemed very basic for a programmer...

[mich1103]

@zyxstand : I only have 13 years old and im not native english speaker so i learn scripting very slowly ^^

[zyxstand]

@zyxstand : I only have 13 years old and im not native english speaker so i learn scripting very slowly ^^

i started programming when I was 11.  what language do you speak (French?).
I recommend that you learn programming in another language first. it's hard to program in soldat without knowing the basics.
Try starting with QBASIC. this can help you get some basic programming skills.
READ THIS to help you get started.  QBASIC is very old, but so simple that you can learn programming easily!

[mich1103]

I'm not at homw now so i'll learn this language later !
But how can i detect if a player is level 10 and higher ?
like:

Code: [Select]

Onplayerrespawn
begin
If soldier[ID].level >= 10
then begin GiveBonus(ID,3)
end;
 end;

[DarkCrusade]

First of all understand what an integer is.

[mich1103]

I got a problem with AppOnIdles
because there is no ID in AppOnIdles my script wont work ...

I want to put this in apponidle to make that if a player is lvl 25 and higher and that at each second he got 2% of life ! How can i do this ?

Code: [Select]

if soldier[ID].level >=25
then begin 
   DoDamage(ID,-3);
end;

[DarkCrusade]

Stop wasting our time here. You don't know the basics of programming. Not even simple stuff like if..else.. 

As you seem to be struggling with the use of Google here is a little help: Link

Work through a tutorial and if you have questions afterwards you may ask here again.

[mich1103]

Im learning now !
but its hard cause i dont understand all ... (im French) ...

I think i know the basic now !
@Dark Crusade : you can ask me question if u want !

[DarkCrusade]

So tell me what this script does: Link

[mich1103]

Code: [Select]

const
  MaxRange = 195;

type
  PlayerStats=Record
  RugerKills:Byte;
  end;

var
  Player:Array[1..32] of PlayerStats;

Procedure TriggerRuger(Killer,Victim:Byte); //i don't understand this procedure ...
var
  X1,Y1,X2,Y2:Single;
  i,j,Team:Byte;
  k:Integer;
begin
  GetPlayerXY(Victim,X1,Y1);
  Team := GetPlayerStat(Victim,'Team');
  repeat
    j := j + 1;
    for i := 1 to 32 do if (GetPlayerStat(i,'Active') = true) AND (GetPlayerStat(i,'Team') <> Team) AND (GetPlayerStat(i,'Alive') = true) then begin
      GetPlayerXY(i,X2,Y2);
      if (Distance(X1,Y1,X2,Y2) <= MaxRange) then begin
        CreateBullet(X2,Y2,0,0,0,5,Killer);
DoDamageBy(i,Killer,20);
k := k + 1;
      end;
    end;
  until(j = Player[Killer].RugerKills);
  WriteConsole(Killer,'You''ve hit ' + IntToStr(k) + ' targets.', $FFFFFF);
end;

Procedure OnPlayerKill(Killer,Victim:Byte; Weapon:String); //add 1 ruger kill to player
begin
  if (Weapon = 'RUGER') then begin
    Player[Killer].RugerKills := Player[Killer].RugerKills + 1;   
    TriggerRuger(Killer,Victim);
  end;
end;

Procedure OnJoinGame(ID,Team:Byte); //put that player did 0 ruger kill
begin
  Player[ID].RugerKills := 0;
end;

Procedure ActivateServer(); //write on the server console that the server started !
begin
  WriteLn('*** SERVER STARTED ***');
end;

[DarkCrusade]

Fine, you were able to click on my link and paste the code here..

[mich1103]

i know the pascal syntax but the problem is with the soldat scripting !
there is no tutorial about wath i want ...

[DarkCrusade]

Link

\o/

[zyxstand]

Fine, you were able to click on my link and paste the code here..

lmao

DC, i think we should cease helping people with too basic questions.  Give them a link to a tutorial or whatnot, and let them do the rest... even though it's hard to let questions go by (and not share your knowledge), it does waste our time - and we don't even get paid

[mich1103]

I did the script by another way !
did you guys have an idea of skills that i should add to my server ?

[DarkCrusade]

Derp derp don't think about adding advanced things like skills when you don't understand how Soldat coding works.

@zxy: I always feel the urge to help and I have (right now) enough time to response, so why should I refrain?