GTAMP

Code: Select all

http://projectcerbera.com/gta/2/tutorials/scripting

Code: Select all

PLAYER_PED p1 = (135.4, 128.3, 255.0) 8 45

COUNTER neverends = 1

// Cooldown Counters

COUNTER magic_address
COUNTER magic_number = 1906784

COUNTER timer = 0
COUNTER cycles_hide = 500        // cycles until cooldown

COUNTER observed_pointer = 1972 // = 7B4
COUNTER observed_address
COUNTER observed

COUNTER wanted_pointer = 1620  // = 654h
COUNTER wanted_address
COUNTER wanted_level

COUNTER heads_pointer = 1132  // = 46C
COUNTER heads_address
COUNTER heads_var

LEVELSTART

SET magic_address = ( p1 + magic_number )
SET wanted_address = ( magic_address + wanted_pointer )
SET observed_address = ( magic_address + observed_pointer )
SET heads_address = ( magic_address + heads_pointer )

WHILE_EXEC ( neverends = 1 )

CHANGE_GANG_CHAR_RESPECT(wanted_address, wanted_level,101)     // Wanted level (0 to 6)
  
  IF ( wanted_level > 1 )
     CHANGE_GANG_CHAR_RESPECT(observed_address, observed,101)          // observed variable (0 or 1) 
     CHANGE_GANG_CHAR_RESPECT(heads_address, heads_var,101)            // Oscillating heads (3 or 5)   3 = oscillating, 5 = no oscillating
     IF ( (observed = 0) AND (heads_var = 5) )
        ++timer
        IF( timer = cycles_hide )
            ALTER_WANTED_LEVEL (p1, 1)
            SET timer = 0
        ENDIF
     ELSE
         CHANGE_GANG_CHAR_RESPECT(observed_address, observed,101)      // double check
         IF ( observed = 1 )
            SET timer = 0
         ENDIF
     ENDIF
  ELSE
      IF ( NOT ( timer = 0 ) )
         SET timer = 0
      ENDIF
  ENDIF


ENDWHILE

LEVELEND

Code: Select all

SAVED_COUNTER flag_on_mission = 0   //  Put this counter only if you haven't one of mission flag in your script

COUNTER player_score
COUNTER save_score = 100           //  The amount the player needs to save the game
COUNTER save_cost = -100           //  The save game cost

COUNTER vocal_value	           //  61 = save successful;   62 = not enough money
COUNTER voice_add = 6168620     //  0x5E202C

COUNTER save_delay = 120          //  Delay before enabling the trigger again
COUNTER delay_count = 0           //  Delay counter

//  Adjust the trigger area to the building you are saving the game. In this example, you are saving on a 1x1 entrance.
//  Remember that the player will spawn at coordinates (x, y+1, z) when loading the save
THREAD_TRIGGER thr_savepoint_1 = THREAD_WAIT_FOR_CHAR_IN_AREA (p1, 128.5, 136.0, 2.0, 1.00, 1.00, savepoint_1:)

savepoint_1:
 
 //  If the player isn't playing a mission
 IF ( flag_on_mission = 0 )

    STORE_SCORE (p1, player_score)
    ++player_score
    
    //  Check if the player has score enough to save the game
    IF ( player_score > save_score )

       EXEC

           ADD_SCORE ( p1, save_cost )  //  Pay the save
           DISPLAY_BRIEF (1812)         //  "Your status is saved!"

           SET vocal_value = 61              //  "HALLELUJAH, ANOTHER SOUL SAVED!"
           CHANGE_GANG_CHAR_RESPECT (voice_add,vocal_value,114)       //  Play sound

       ENDEXEC

       SAVE_GAME ()


    ELSE

    //  The player does not have enough money

    EXEC

        DISPLAY_BRIEF (1995)    //  "Get lost, ya bum! It costs $[insert the save cost in brief 1995 in .gxt] to save the state of play here!"

        SET vocal_value = 62              //  "DAMNATION, NO DONATION, NO SALVATION!"
        CHANGE_GANG_CHAR_RESPECT (voice_add,vocal_value,114)       //  Play sound

    ENDEXEC

    ENDIF


 ELSE

     //  The player is playing a mission
    IF ( flag_on_mission = 1 )
       DISPLAY_BRIEF (1811)    //  "No no no! You cannot save your state of play while you are on a job. Get back to work!"
    ENDIF

 ENDIF
 
 //  Now wait some time before enabling the save trigger again
 SET delay_count = (save_delay + 0)

 WHILE_EXEC ( NOT ( delay_count = 0 ) )
    --delay_count
 ENDWHILE
 
 ENABLE_THREAD_TRIGGER (thr_savepoint_1)    //  enable it again

RETURN


LEVELSTART

//  The rest of the code

LEVELEND