Skip to content

Instantly share code, notes, and snippets.

@UmGeek

UmGeek/sexshop-anime-int.sc

Last active July 6, 2018 00:16
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save UmGeek/2dbe86992a501df3c4ec58cc7a9e8cb4 to your computer and use it in GitHub Desktop.
Save UmGeek/2dbe86992a501df3c4ec58cc7a9e8cb4 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
sexshop-anime-int.sc
SCRIPT_START
{
NOP
WAIT 2000
LVAR_INT scplayer dialog_1_status hPed[4] int_a int_b int_c dialog_no ini_npcs_models ini_language ini_pages
LVAR_FLOAT x y z axis_z axis_x alt_z alt_x screenX screenY resX resY
LVAR_TEXT_LABEL string_a
CONST_INT Int_SexShop 3
CONST_FLOAT SexShop_X -103.89
CONST_FLOAT SexShop_Y -17.32
CONST_FLOAT SexShop_Z 1000.72
IF NOT READ_INT_FROM_INI_FILE "cleo\Sexshop-Anime.ini" "Configs" "Disabled Mod" int_a
int_a = 0
WRITE_INT_TO_INI_FILE int_a "cleo\Sexshop-Anime.ini" "Configs" "Disabled Mod"
ENDIF
IF (int_a = 0)
//////////////////////////////////////////////////////////////////////////////////////////////////
IF NOT READ_INT_FROM_INI_FILE "cleo\Sexshop-Anime.ini" "Configs" "NPCs Models" ini_npcs_models
ini_npcs_models = 172
WRITE_INT_TO_INI_FILE ini_npcs_models "cleo\Sexshop-Anime.ini" "Configs" "NPCs Models"
ENDIF
IF NOT READ_INT_FROM_INI_FILE "cleo\Sexshop-Anime.ini" "Configs" "Language" ini_language
ini_language = 1
WRITE_INT_TO_INI_FILE ini_language "cleo\Sexshop-Anime.ini" "Configs" "Language"
ENDIF
IF NOT READ_FLOAT_FROM_INI_FILE "cleo\Sexshop-Anime.ini" "Configs" "Screen Width" resX
resX = 640.0
WRITE_FLOAT_TO_INI_FILE resX "cleo\Sexshop-Anime.ini" "Configs" "Screen Width"
ENDIF
IF NOT READ_FLOAT_FROM_INI_FILE "cleo\Sexshop-Anime.ini" "Configs" "Screen Height" resY
resY = 480.0
WRITE_FLOAT_TO_INI_FILE resY "cleo\Sexshop-Anime.ini" "Configs" "Screen Height"
ENDIF
IF NOT READ_INT_FROM_INI_FILE "cleo\Sexshop-Anime.ini" "Configs" "Pages Num" ini_pages
ini_pages = 12
ENDIF
ini_pages += 1
//////////////////////////////////////////////////////////////////////////////////////////////////
SWITCH (ini_language)
CASE 1
ADD_TEXT_LABEL SEXSHO1 "~p~Deseja ver uma de nossas revistas? (Y/N)"
ADD_TEXT_LABEL SEXSHO2 "~p~Volte sempre!"
BREAK
CASE 2
ADD_TEXT_LABEL SEXSHO1 "~p~Desea ver una de nuestras revistas? (Y/N)"
ADD_TEXT_LABEL SEXSHO2 "~p~Vuelva siempre!"
BREAK
DEFAULT
ADD_TEXT_LABEL SEXSHO1 "~p~Would you like to see one of our magazines? (Y/N)"
ADD_TEXT_LABEL SEXSHO2 "~p~Check back often!"
BREAK
ENDSWITCH
//////////////////////////////////////////////////////////////////////////////////////////////////
GET_PLAYER_CHAR 0 scplayer
Main_Loop:
WAIT 0
IF IS_PLAYER_PLAYING 0
GET_AREA_VISIBLE int_a
GET_CHAR_AREA_VISIBLE scplayer int_b
IF (int_a = Int_SexShop)
AND (int_b = Int_SexShop)
IF LOCATE_CHAR_ANY_MEANS_2D scplayer SexShop_X SexShop_Y 40.0 40.0 FALSE
dialog_no = 0
CLEO_CALL Create_New_Ped 0 ( ini_npcs_models,-103.83,-24.21,1000.72,357.18 ) ( hPed[0] )
CLEO_CALL Create_New_Ped 0 ( ini_npcs_models,-104.74,-8.910,1000.72,179.54 ) ( hPed[1] )
CLEO_CALL Create_New_Ped 0 ( ini_npcs_models,-107.21,-8.910,1000.72,182.05 ) ( hPed[2] )
WHILE LOCATE_CHAR_ANY_MEANS_2D scplayer SexShop_X SexShop_Y 40.0 40.0 FALSE
dialog_1_status = 0
REPEAT 3 int_a
IF DOES_CHAR_EXIST hPed[int_a]
IF NOT IS_CHAR_DEAD hPed[int_a]
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS hPed[int_a] 0.0 2.0 0.0 x y z
IF LOCATE_CHAR_ANY_MEANS_3D scplayer x y z 2.5, 2.5, 2.5, FALSE
TASK_LOOK_AT_CHAR hPed[int_a] scplayer 600
IF (dialog_1_status = 0)
TASK_LOOK_AT_CHAR scplayer hPed[int_a] 600
dialog_1_status = 7
ENDIF
ENDIF
IF (dialog_no = 0)
DRAW_SPHERE x y z 0.75
IF LOCATE_CHAR_ANY_MEANS_3D scplayer x y z 0.75, 0.75, 1.5, FALSE
PRINT_NOW SEXSHO1 100 0
IF IS_BUTTON_PRESSED 0 10
dialog_no = 1
ENDIF
STORE_SCORE 0 int_c
IF IS_BUTTON_PRESSED 0 11
AND (int_c > 3)
ADD_SCORE 0 -3
dialog_no = 1
LOAD_TEXTURE_DICTIONARY SEXMAG
GENERATE_RANDOM_INT_IN_RANGE 0 ini_pages int_a
STRING_FORMAT string_a "%i" int_a
LOAD_SPRITE 1 $string_a
USE_TEXT_COMMANDS 1
SET_PLAYER_CONTROL 0 FALSE
int_c = 255
WHILE NOT IS_BUTTON_PRESSED 0 10
WAIT 0
screenX = resX / 2.0
screenY = resY / 2.0
DRAW_RECT screenX screenY resX resY 0 0 0 200
DRAW_SPRITE 1 screenX screenY screenX resY 255 255 255 255
IF (int_c > 0)
int_c --
DRAW_RECT screenX screenY resX resY 0 0 0 int_c
ENDIF
ENDWHILE
SET_PLAYER_CONTROL 0 TRUE
USE_TEXT_COMMANDS 0
REMOVE_TEXTURE_DICTIONARY
PRINT_NOW SEXSHO2 1500 0
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
ENDREPEAT
IF IS_CURRENT_CHAR_WEAPON scplayer 0
IF IS_BUTTON_PRESSED 0 6
ATTACH_CAMERA_TO_CHAR scplayer 0.0 0.50 0.75 0.0 90.0 0.0 0.0 2
axis_z = -30.0
axis_x = 0.0
alt_z = 0.0
SET_PLAYER_CONTROL 0 FALSE
WHILE IS_BUTTON_PRESSED 0 6
IF NOT IS_KEY_PRESSED VK_UP
AND NOT IS_KEY_PRESSED VK_DOWN
axis_z += alt_z
ENDIF
ATTACH_CAMERA_TO_CHAR scplayer 0.0 0.50 0.75 axis_x 90.0 axis_z 0.0 2
IF (axis_z >= 10.0)
alt_z = -0.1
ENDIF
IF (axis_z <= -30.0)
alt_z = 0.1
ENDIF
IF IS_KEY_PRESSED VK_LEFT
IF (axis_x > -30.0)
axis_x -= 0.55
ENDIF
ENDIF
IF IS_KEY_PRESSED VK_RIGHT
IF (axis_x < 30.0)
axis_x += 0.55
ENDIF
ENDIF
IF IS_KEY_PRESSED VK_UP
IF (axis_z < 15.0)
axis_z += 0.55
ENDIF
ENDIF
IF IS_KEY_PRESSED VK_DOWN
IF (axis_z > -30.0)
axis_z -= 0.55
ENDIF
ENDIF
WAIT 0
ENDWHILE
SET_PLAYER_CONTROL 0 TRUE
ATTACH_CAMERA_TO_CHAR scplayer 0.0 -1.50 1.0 0.0 0.0 0.0 1.0 2
WAIT 10
RESTORE_CAMERA
ENDIF
ENDIF
WAIT 4
ENDWHILE
REPEAT 3 int_a
IF DOES_CHAR_EXIST hPed[int_a]
DELETE_CHAR hPed[int_a]
ENDIF
ENDREPEAT
ENDIF
ENDIF
ENDIF
GOTO Main_Loop
ENDIF
TERMINATE_THIS_CUSTOM_SCRIPT
}
{
LVAR_INT mod
LVAR_FLOAT x y z a
LVAR_INT hPed
Create_New_Ped:
IF NOT HAS_MODEL_LOADED mod
REQUEST_MODEL mod
LOAD_ALL_MODELS_NOW
ENDIF
CREATE_CHAR PEDTYPE_MEDIC mod x y z hPed
SET_CHAR_HEADING hPed a
MARK_MODEL_AS_NO_LONGER_NEEDED mod
CLEO_RETURN 0 hPed
}
SCRIPT_END
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment