IMG

 
IMG
IMG   IMG
  Welcome to GTAForums! Be sure to check out the Grand Theft Auto V Forum.

You are not registered! (If you are, click here to login) Registering is fast, free and easy and allows you to instantly reply to any topic on GTAForums.
Why wait? Click here to register your own unique username and become part of the ever-growing community!


( Log In | Register | Revalidate Validation E-mail )
Quick Log-In:
  IMG
       
>
Forum Rules GTA Modification Forums

Please post mod releases in the Mod Showroom

GTAGarage.com
free mod hosting from GTANet, simply login with your GTAForums account details

GTAModding.com
GTANet's modding wiki

GTA Modding Chatroom
provided by irc.gtanet.com (Don't have an IRC client? Click here)


  Reply to this topicStart new topicStart Poll

 CLEO sex mod

 
mandel99  
Posted: Thursday, Jun 11 2009, 11:12
Quote Post


Player Hater
Group Icon
Group: Members
Joined: Jul 8, 2008

cz.gif

XXXXX




Hi, briefly giving Cleo Scripts I managed to get adjusted BC7MOD script, but I want to make this adjustment as their own script but not to me can someone advise me?
Sorry for my very bad english blush.gif
Part of the script BC7MOD:
CODE
:GTAF_28064
wait 0
if
89DE:   not actor $PLAYER_ACTOR entering_car
else_jump @BC7_1868
03BF: set_player $PLAYER_CHAR ignored_by_everyone 1
wait 0
0665: get_actor 24@(25@,16i) model_to $PED_MODEL
wait 0
015D: set_gamespeed 1.0
Player.CanMove($PLAYER_CHAR) = False
wait 0
04ED: load_animation "BLOWJOBZ"
04ED: load_animation "MISC"
Model.Load($PED_MODEL)
038B: load_requested_models

:GTAF_28156
wait 0
03E6: remove_text_box
Actor.LockInCurrentPosition(24@(25@,16i)) = False
if and
04EE:   animation "BLOWJOBZ" loaded
04EE:   animation "MISC" loaded
  Model.Available($PED_MODEL)
else_jump @GTAF_28156
wait 0
fade 0 1000
wait 900
Actor.PutAt(24@(25@,16i), 0, 0, 0)
Actor.Angle($PLAYER_ACTOR) = 90.0
04C4: store_coords_to $TEMPVAR_FLOAT_1 $TEMPVAR_FLOAT_2 $TEMPVAR_FLOAT_3 from_actor $PLAYER_ACTOR with_offset 0.0 1.22 -0.3
$PED = Actor.Create(CivMale, $PED_MODEL, $TEMPVAR_FLOAT_1, $TEMPVAR_FLOAT_2, $TEMPVAR_FLOAT_3)
Actor.Angle($PED) = 270.0
wait 400
fade 1 800
wait 700
Camera.SetBehindPlayer
Player.SetDrunkVisuals($PLAYER_CHAR, 25)
$KKDP = 6500
Player.CanMove($PLAYER_CHAR) = False
0605: actor $PLAYER_ACTOR perform_animation_sequence "SCRATCHBALLS_01" IFP_file "MISC" 4.0 loop 1 0 0 0 time 1000 // versionA
wait 1100
03C3: set_timer_to $KKDP type 1 GXT 'KKDP' // global_variable
0605: actor $PLAYER_ACTOR perform_animation_sequence "BJ_COUCH_LOOP_P" IFP_file "BLOWJOBZ" 4.0 loop 1 0 0 0 time 6000 // versionA
0605: actor $PED perform_animation_sequence "BJ_COUCH_LOOP_W" IFP_file "BLOWJOBZ" 4.0 loop 1 0 0 0 time 6000 // versionA
wait 6000
Actor.RemoveReferences($PED)
0605: actor $PLAYER_ACTOR perform_animation_sequence "SCRATCHBALLS_01" IFP_file "MISC" 4.0 loop 1 0 0 0 time 1000 // versionA
wait 1000
04EF: release_animation "BLOWJOBZ"
04EF: release_animation "MISC"
Actor.RemoveReferences($PED)
Actor.Health($PLAYER_ACTOR) = 250
Marker.Disable($TEMPM)
Player.SetDrunkVisuals($PLAYER_CHAR, 0)
014F: stop_timer $KKDP
Camera.SetBehindPlayer
Player.CanMove($PLAYER_CHAR) = True
03BF: set_player $PLAYER_CHAR ignored_by_everyone 0
jump @BC7_1868
0665: get_actor 24@(25@,16i) model_to $PED_MODEL
wait 0
Model.Load($PED_MODEL)

My edit:
CODE
:GTAF_28064
wait 0
if
89DE:   not actor $PLAYER_ACTOR entering_car
jf @BC7_1868
03BF: set_player $PLAYER_CHAR ignored_by_everyone 1
wait 0
0665: get_actor 24@(25@,16i) model_to $PED_MODEL
wait 0
015D: set_gamespeed 1.0
Player.CanMove($PLAYER_CHAR) = False
wait 0
04ED: load_animation "SEX"
04ED: load_animation "MISC"
Model.Load($PED_MODEL)
038B: load_requested_models

:GTAF_28156
wait 0
03E6: remove_text_box
Actor.LockInCurrentPosition(24@(25@,16i)) = False
if and
04EE:   animation "SEX" loaded
04EE:   animation "MISC" loaded
  Model.Available($PED_MODEL)
jf @GTAF_28156
wait 0
fade 0 1000
wait 900
Actor.PutAt(24@(25@,16i), 0, 0, 0)
Actor.Angle($PLAYER_ACTOR) = 90.0
04C4: store_coords_to $TEMPVAR_FLOAT_1 $TEMPVAR_FLOAT_2 $TEMPVAR_FLOAT_3 from_actor $PLAYER_ACTOR with_offset 0.0 1.22 -0.3
$PED = Actor.Create(CivMale, $PED_MODEL, $TEMPVAR_FLOAT_1, $TEMPVAR_FLOAT_2, $TEMPVAR_FLOAT_3)
Actor.Angle($PED) = 270.0
wait 400
fade 1 800
wait 700
$KKDP = 40000
Player.CanMove($PLAYER_CHAR) = True
0605: actor $PLAYER_ACTOR perform_animation_sequence "SCRATCHBALLS_01" IFP_file "MISC" 4.0 loop 1 0 0 0 time 2000 // versionA
wait 1000
03C3: set_timer_to $KKDP type 1 GXT 'KKDP' // global_variable
0605: actor $PLAYER_ACTOR perform_animation_sequence "SEX_1_P" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
0605: actor $PED perform_animation_sequence "SEX_1_W" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
wait 10000
0605: actor $PLAYER_ACTOR perform_animation_sequence "SEX_1TO2_P" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
0605: actor $PED perform_animation_sequence "SEX_1TO2_W" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
wait 800
0605: actor $PLAYER_ACTOR perform_animation_sequence "SEX_2_P" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
0605: actor $PED perform_animation_sequence "SEX_2_W" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
wait 10000      
0605: actor $PLAYER_ACTOR perform_animation_sequence "SEX_2TO3_P" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
0605: actor $PED perform_animation_sequence "SEX_2TO3_W" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA    
wait 800
0605: actor $PLAYER_ACTOR perform_animation_sequence "SEX_3_P" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
0605: actor $PED perform_animation_sequence "SEX_3_W" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
wait 10000
0605: actor $PLAYER_ACTOR perform_animation_sequence "SEX_3TO1_P" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
0605: actor $PED perform_animation_sequence "SEX_3TO1_W" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
wait 800
0605: actor $PLAYER_ACTOR perform_animation_sequence "SEX_1_P" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
0605: actor $PED perform_animation_sequence "SEX_1_W" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
wait 8000
0605: actor $PLAYER_ACTOR perform_animation_sequence "SEX_1_CUM_P" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
0605: actor $PED perform_animation_sequence "SEX_1_CUM_W" IFP_file "SEX" 4.0 loop 1 0 0 0 time 0 // versionA
wait 7500
Actor.RemoveReferences($PED)
0605: actor $PLAYER_ACTOR perform_animation_sequence "SCRATCHBALLS_01" IFP_file "MISC" 4.0 loop 1 0 0 0 time 2000 // versionA
wait 1000
04EF: release_animation "SEX"
04EF: release_animation "MISC"
Actor.RemoveReferences($PED)
Actor.Health($PLAYER_ACTOR) = 250
Marker.Disable($TEMPM)
014F: stop_timer $KKDP
Player.CanMove($PLAYER_CHAR) = True
03BF: set_player $PLAYER_CHAR ignored_by_everyone 0
jump @BC7_1868
0665: get_actor 24@(25@,16i) model_to $PED_MODEL
wait 0
Model.Load($PED_MODEL)

PM
  Top
 

 
Girish  
Posted: Thursday, Jun 11 2009, 11:29
Quote Post



Group Icon
Group: Moderators
Joined: Apr 20, 2006

ia.gif

Member Award




Please note that the San Andreas forum is only for discussion of unmodded copies of the game. We have separate forums for modding.

Moved to Editing Discussion > Mission Coding.
Users WebsitePMMSN
  Top
 

 
mandel99  
Posted: Thursday, Jun 11 2009, 11:34
Quote Post


Player Hater
Group Icon
Group: Members
Joined: Jul 8, 2008

cz.gif

XXXXX



QUOTE (girishb @ Jun 11 2009, 11:29)
Please note that the San Andreas forum is only for discussion of unmodded copies of the game. We have separate forums for modding.

Moved to Editing Discussion > Mission Coding.

thx for info my fail...
PM
  Top
 

 
Deji  
Posted: Thursday, Jun 11 2009, 11:44
Quote Post


Coding like a Rockstar!
Group Icon
Group: Members
Joined: Dec 24, 2007

ja.gif

XXXXX



What do you want to do, exactly?
Users WebsitePM
  Top
 

 
mandel99  
Posted: Thursday, Jun 11 2009, 12:21
Quote Post


Player Hater
Group Icon
Group: Members
Joined: Jul 8, 2008

cz.gif

XXXXX



QUOTE (Deji @ Jun 11 2009, 11:44)
What do you want to do, exactly?

Create my functional CLEO script. This works on the code from BC7MOD
PM
  Top
 

 
PatrickW  
Posted: Thursday, Jun 11 2009, 14:57
Quote Post


GTA Juggernaut
Group Icon
Group: Moderators
Joined: Jan 7, 2004

nl.gif

Member Award




What version of SA do you have, possibly these animations aren't available in v2.0.
Users WebsitePM
  Top
 

 
angeloelibz24  
Posted: Thursday, Jun 11 2009, 15:00
Quote Post


Just Your Average GTA Addict
Group Icon
Group: Members
Joined: Sep 27, 2007

ph.gif

XXXXX



QUOTE (PatrickW @ Jun 11 2009, 14:57)
What version of SA do you have, possibly these animations aren't available in v2.0.

Or the Mature-rated version of the game. The animations are only available in the AO-rated one or those that don't have the "cold coffee" patch.
Users WebsitePMMSNYahoo
  Top
 

 
mandel99  
Posted: Thursday, Jun 11 2009, 15:44
Quote Post


Player Hater
Group Icon
Group: Members
Joined: Jul 8, 2008

cz.gif

XXXXX



QUOTE (angeloelibz24 @ Jun 11 2009, 15:00)
QUOTE (PatrickW @ Jun 11 2009, 14:57)
What version of SA do you have, possibly these animations aren't available in v2.0.

Or the Mature-rated version of the game. The animations are only available in the AO-rated one or those that don't have the "cold coffee" patch.

I have a version with Hot coffe, which supports the animation script works I try:
http://www.sendspace.com/file/dpmv2j
go to the ped and press F6, select the last option, and press the spacebar
Cleo but I want to create a script that will only have sex script.
PM
  Top
 

 
ZAZ  
Posted: Thursday, Jun 11 2009, 16:23
Quote Post


Kernlochbohrer
Group Icon
Group: Members
Joined: Jan 10, 2005

eu.gif

Member Award




QUOTE (mandel99 @ Jun 11 2009, 15:44)
QUOTE (angeloelibz24 @ Jun 11 2009, 15:00)
QUOTE (PatrickW @ Jun 11 2009, 14:57)
What version of SA do you have, possibly these animations aren't available in v2.0.

Or the Mature-rated version of the game. The animations are only available in the AO-rated one or those that don't have the "cold coffee" patch.

I have a version with Hot coffe, which supports the animation script works I try:
http://www.sendspace.com/file/dpmv2j
go to the ped and press F6, select the last option, and press the spacebar
Cleo but I want to create a script that will only have sex script.

Read in CLEO Script Tutorial: Additional Themes >> theme: Animations
how to use animations in cleo scripts.
But I can say in advance that the sex animations are not as easy usable as other animations.
They run in the original gfsex script with opcode 0614: in relation to the key_press and injects presetted animation times to play different animation speed.
Look into GFSEX script for the part which I posted below
If you wonna have a sex mod for gtasa so use google and search for Cleo-Girlxxx

CODE
:GFSEX_3337839
0871: init_jump_table 20@ total_jumps 8 default_jump 0 @GFSEX_3338208 jumps 0 @GFSEX_3337967 3 @GFSEX_3337998 4 @GFSEX_3338029 5 @GFSEX_3338060 6 @GFSEX_3338091 7 @GFSEX_3338122 8 @GFSEX_3338153
0872: jump_table_jumps 9 @GFSEX_3338184 -1 @GFSEX_3338208 -1 @GFSEX_3338208 -1 @GFSEX_3338208 -1 @GFSEX_3338208 -1 @GFSEX_3338208 -1 @GFSEX_3338208 -1 @GFSEX_3338208 -1 @GFSEX_3338208

:GFSEX_3337967
0007: 16@ = 0.035
08C3: clear 9@ bit 6
08C3: clear 9@ bit 7
0002: jump @GFSEX_3338208

:GFSEX_3337998
0007: 16@ = 0.045
08C3: clear 9@ bit 6
08C3: clear 9@ bit 7
0002: jump @GFSEX_3338208

:GFSEX_3338029
0007: 16@ = 0.05
08C3: clear 9@ bit 6
08C3: clear 9@ bit 7
0002: jump @GFSEX_3338208

:GFSEX_3338060
0007: 16@ = 0.055
08C3: clear 9@ bit 6
08C3: clear 9@ bit 7
0002: jump @GFSEX_3338208

:GFSEX_3338091
0007: 16@ = 0.055
08C3: clear 9@ bit 6
08C3: clear 9@ bit 7
0002: jump @GFSEX_3338208

:GFSEX_3338122
0007: 16@ = 0.08
08BD: set 9@ bit 6
08C3: clear 9@ bit 7
0002: jump @GFSEX_3338208

:GFSEX_3338153
0007: 16@ = 0.08
08BD: set 9@ bit 6
08C3: clear 9@ bit 7
0002: jump @GFSEX_3338208

:GFSEX_3338184
0007: 16@ = 0.09
08BD: set 9@ bit 7
0002: jump @GFSEX_3338208

:GFSEX_3338208
0051: return

:GFSEX_3338210
0871: init_jump_table 22@ total_jumps 3 default_jump 0 @GFSEX_3338642 jumps 0 @GFSEX_3338273 1 @GFSEX_3338396 2 @GFSEX_3338519 -1 @GFSEX_3338642 -1 @GFSEX_3338642 -1 @GFSEX_3338642 -1 @GFSEX_3338642

:GFSEX_3338273
00D6: if
0611:   actor $PLAYER_ACTOR performing_animation "SEX_1_P"
004D: jump_if_false @GFSEX_3338331
0612: set_actor $PLAYER_ACTOR animation "SEX_1_P" paused 0
0614: set_actor $PLAYER_ACTOR animation "SEX_1_P" progress_to $GF_Anim_Time // 0.0 to 1.0

:GFSEX_3338331
00D6: if
0611:   actor 24@ performing_animation "SEX_1_W"
004D: jump_if_false @GFSEX_3338389
0612: set_actor 24@ animation "SEX_1_W" paused 0
0614: set_actor 24@ animation "SEX_1_W" progress_to $GF_Anim_Time // 0.0 to 1.0

:GFSEX_3338389
0002: jump @GFSEX_3338642

:GFSEX_3338396
00D6: if
0611:   actor $PLAYER_ACTOR performing_animation "SEX_2_P"
004D: jump_if_false @GFSEX_3338454
0612: set_actor $PLAYER_ACTOR animation "SEX_2_P" paused 0
0614: set_actor $PLAYER_ACTOR animation "SEX_2_P" progress_to $GF_Anim_Time // 0.0 to 1.0

:GFSEX_3338454
00D6: if
0611:   actor 24@ performing_animation "SEX_2_W"
004D: jump_if_false @GFSEX_3338512
0612: set_actor 24@ animation "SEX_2_W" paused 0
0614: set_actor 24@ animation "SEX_2_W" progress_to $GF_Anim_Time // 0.0 to 1.0

:GFSEX_3338512
0002: jump @GFSEX_3338642

:GFSEX_3338519
00D6: if
0611:   actor $PLAYER_ACTOR performing_animation "SEX_3_P"
004D: jump_if_false @GFSEX_3338577
0612: set_actor $PLAYER_ACTOR animation "SEX_3_P" paused 0
0614: set_actor $PLAYER_ACTOR animation "SEX_3_P" progress_to $GF_Anim_Time // 0.0 to 1.0

:GFSEX_3338577
00D6: if
0611:   actor 24@ performing_animation "SEX_3_W"
004D: jump_if_false @GFSEX_3338635
0612: set_actor 24@ animation "SEX_3_W" paused 0
0614: set_actor 24@ animation "SEX_3_W" progress_to $GF_Anim_Time // 0.0 to 1.0

:GFSEX_3338635
0002: jump @GFSEX_3338642

:GFSEX_3338642
00D6: if
08B7:   test 9@ bit 5
004D: jump_if_false @GFSEX_3338675
0067: $GF_Anim_Time -= 16@ // (float)
0002: jump @GFSEX_3338683

:GFSEX_3338675
005F: $GF_Anim_Time += 16@ // (float)

:GFSEX_3338683
00D6: if
0032:   0.0 >= $GF_Anim_Time
004D: jump_if_false @GFSEX_3338728
0005: $GF_Anim_Time = 0.01
08C3: clear 9@ bit 5
0050: gosub @GFSEX_3338803

:GFSEX_3338728
00D6: if
0030:   $GF_Anim_Time >= 1.0
004D: jump_if_false @GFSEX_3338773
0005: $GF_Anim_Time = 0.99
08BD: set 9@ bit 5
0050: gosub @GFSEX_3338803

:GFSEX_3338773
00D6: if
0042:   $GF_Anim_Time == 0.5
004D: jump_if_false @GFSEX_3338801
0050: gosub @GFSEX_3338803

:GFSEX_3338801
0051: return
Users WebsitePM
  Top
 

 
angeloelibz24  
Posted: Thursday, Jun 11 2009, 16:31
Quote Post


Just Your Average GTA Addict
Group Icon
Group: Members
Joined: Sep 27, 2007

ph.gif

XXXXX



QUOTE (ZAZ @ Jun 11 2009, 16:23)
Look into GFSEX script for the part which I posted below
If you wonna have a sex mod for gtasa so use google and search for Cleo-Girlxxx

It is found in ZAZ's CLEO mod site, fyi.

As for the BC7MOD, it's a pretty good CLEO mod to use, but I don't like the part where you can have sex with the "ped closest to you". That would mean ANY ped.

This post has been edited by angeloelibz24 on Thursday, Jun 11 2009, 16:33
Users WebsitePMMSNYahoo
  Top
 

 
trickstar34  
Posted: Thursday, Jun 11 2009, 19:19
Quote Post


ATM, Money
Group Icon
Group: BUSTED!
Joined: Dec 14, 2008

us.gif

XXXXX



QUOTE (angeloelibz24 @ Jun 11 2009, 16:31)
QUOTE (ZAZ @ Jun 11 2009, 16:23)
Look into GFSEX script for the part which I posted below
If you wonna have a sex mod for gtasa so use google and search for Cleo-Girlxxx

It is found in ZAZ's CLEO mod site, fyi.

As for the BC7MOD, it's a pretty good CLEO mod to use, but I don't like the part where you can have sex with the "ped closest to you". That would mean ANY ped.

lol, if it s a guy CJ is simply coming out of the closet. lol.gif
PMYahooPlayStation Network
  Top
 

 

0 User(s) are reading this topic (0 Guests and 0 Anonymous Users)

0 Members:

Topic Options Reply to this topicStart new topicStart Poll
Search topic for posted by (exact match)



 
IMG IMG