Sexout OOXX获得更多经验

xingjingliangrui

只是想问一下怎么修改Spunk里面的script哪条数据会增加OOXX时获得的经验值，已经修改一个晚上了，还是没有找到相应的数据，大概推测是 spunkfucheckmyxp这条数据，但是都是变量，代码苦手，祈祷大神指点。

红楼馆

这个script SpunkFuCalcXPFactor 用GECK改

xingjingliangrui

红楼馆 发表于 2016-2-3 19:14
这个script SpunkFuCalcXPFactor 用GECK改

GECK加载不上怎么解决？

红楼馆

xingjingliangrui 发表于 2016-2-3 23:06
GECK加载不上怎么解决？

加载的时候 先确保没有勾选任何东西 然后找到sexspunk 勾选后再激活

xingjingliangrui

红楼馆 发表于 2016-2-4 19:54
加载的时候 先确保没有勾选任何东西 然后找到sexspunk 勾选后再激活

已经加载上了，但是和之前一样，需要修改的数据都是script里面的，全都是代码%n ，%i，%if，变量，代码真心看不懂
float fMyXP
float fTheirXP
float fXPFactor
int iCount
array_var thisact
array_var ar_roles
Begin _Function {iOrgFlag}
let ar_roles := call SpunkFuGetRoles
let fMyXP := call SpunkFuCheckMyXPThisAct iOrgFlag ar_roles
let iCount := NX_GETEVFL "Spunk:Act:Count"
if 1 == iCount
if fMyXP == 0
  SetFunctionValue 0.6
else
  let fXPFactor := log10 (fMyXP + 1)
  SetFunctionValue fXPFactor
endif
let ar_roles := ar_null
return
endif
let thisact := call SpunkFuFindAct
if eval 0 == ar_size thisact
PrintD "SpunkFuCalcXPFactor: act not found"
SetFunctionValue 1
let ar_roles := thisact := ar_null
return
endif
let fTheirXP := call SpunkFuCheckOtherXPThisAct thisact ar_roles
if fTheirXP == 0 || fMyXP == 0
PrintD "SpunkFuCalcXPFactor: theirs is " + $fTheirXp + ", mine is " + $fMyXP
SetFunctionValue 1
let ar_roles := thisact := ar_null
return
endif
let fXPFactor := fTheirXP / fMyXP
if fXPFactor > 3
let fXPFactor := 3
elseif fXPFactor < 0.33
let fXPFactor := 0.33
endif
PrintD "SpunkFuCalcXPFactor: mine is " + $fTheirXP + ", mine is " + $fMyXP + ", factor is " + $fXPFactor
let thisact := ar_roles := ar_null
SetFunctionValue fXPFactor

红楼馆

xingjingliangrui 发表于 2016-2-4 21:33
已经加载上了，但是和之前一样，需要修改的数据都是script里面的，全都是代码%n ，%i，%if，变量，代码真 ...

let fXPFactor := log10 (fMyXP + 1) 这一行

坏人片子

LZ修改成功了吗？能不能做个修改好的MOD放个下载

xingjingliangrui

坏人片子 发表于 2016-2-5 20:57
LZ修改成功了吗？能不能做个修改好的MOD放个下载

如果我成功的话，会放出下载的，就是不知道怎么改数据

xingjingliangrui

红楼馆 发表于 2016-2-5 17:13
let fXPFactor := log10 (fMyXP + 1) 这一行

let fXPFactor := log10 (fMyXP + 50)结果还是一样，经验还是+1

xingjingliangrui

红楼馆 发表于 2016-2-5 17:13
let fXPFactor := log10 (fMyXP + 1) 这一行

这个脚本里面经验获取调用的数据是spunkfucheckmyxpthisact里面的，代码如下
scn SpunkFuCheckMyXPThisAct
; checks xp for all roles an actor is performing

int iOrgFlag ; if 1, you only want roles that can lead to orgasm
array_var ar_myRoles

ref rActor
array_var entry
string_var sv_role
string_var nxkey
int iXP

Begin Function {iOrgFlag ar_myRoles}

let rActor := GetSelf
DebugPrint "SpunkFuCheckMyXPThisAct called on %n, %i" rActor rActor
foreach entry <- ar_myRoles
        let sv_role := entry["value"]
        if iOrgFlag
                if eval -1 < ar_find sv_role SpunkVARZ.ar_orglessroles
                        DebugPrint "SpunkFuCheckMyXPThisAct: '%z' is orgless" sv_role
                        continue
                endif
        endif
        let nxkey := "SO:XP:Role:" + $sv_role
        DebugPrint "SpunkFuCheckMyXPThisAct: checking '%z'" nxkey
        let iXP += (NX_GetEVFl $nxkey)
loop
DebugPrint "SpunkFuCheckMyXPThisAct: total xp is %.0f" iXP
let entry := ar_null
sv_destruct sv_role nxkey
SetFunctionValue iXP

这可以的

ssssssssssssssssssssssssssssssssssss

Aqerfdgh

可惜权限不够

c1007205329

感谢楼主分享！

s2175

感谢楼主分享！

diolatp

感谢楼主分享！

不灭小强123

1111111111111111111111111111111111111111111

ZWX313619

问下楼主，sexout只有女角色才生效么。用男角色不行，有对话但是不动啊。还需要什么么，求教