|
@@ -1,6 +1,5 @@
|
|
|
-
|
|
|
-
|
|
|
# sex
|
|
|
+
|
|
|
if $ARGS[0] = 'start':
|
|
|
sexstart = 1
|
|
|
sexvar = rand(3,6)
|
|
@@ -63,9 +62,12 @@ if $ARGS[0] = 'minet':
|
|
|
orgasm += 1
|
|
|
'You have an orgasm.'
|
|
|
end
|
|
|
- if sexvar = 1:'<br>He indicates that he will cum soon.'
|
|
|
- if sexvar > 0:xgt 'sex', 'var'
|
|
|
- if sexvar = 0:gs 'sex', 'end'
|
|
|
+ if sexvar > 0:
|
|
|
+ xgt 'sex', 'var'
|
|
|
+ else
|
|
|
+ '<br>He indicates that he will cum soon.'
|
|
|
+ gs 'sex', 'end'
|
|
|
+ end
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'kuni':
|
|
@@ -93,9 +95,12 @@ if $ARGS[0] = 'kuni':
|
|
|
orgasm += 1
|
|
|
'You have an orgasm.'
|
|
|
end
|
|
|
- if sexvar = 1:'<br>He indicates that he will cum soon.'
|
|
|
- if sexvar > 0:xgt 'sex', 'var'
|
|
|
- if sexvar = 0:gs 'sex', 'end'
|
|
|
+ if sexvar > 0:
|
|
|
+ xgt 'sex', 'var'
|
|
|
+ else
|
|
|
+ '<br>He indicates that he will cum soon.'
|
|
|
+ gs 'sex', 'end'
|
|
|
+ end
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'vag':
|
|
@@ -126,9 +131,12 @@ if $ARGS[0] = 'vag':
|
|
|
orgasm += 1
|
|
|
'You have an orgasm.'
|
|
|
end
|
|
|
- if sexvar = 1:'<br>He indicates that he will cum soon.'
|
|
|
- if sexvar > 0:cumprecheck = 1 & gs 'cum_manage' & xgt 'sex', 'var'
|
|
|
- if sexvar = 0:gs 'sex', 'end'
|
|
|
+ if sexvar > 0:
|
|
|
+ xgt 'sex', 'var'
|
|
|
+ else
|
|
|
+ '<br>He indicates that he will cum soon.'
|
|
|
+ gs 'sex', 'end'
|
|
|
+ end
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'nae':
|
|
@@ -159,9 +167,12 @@ if $ARGS[0] = 'nae':
|
|
|
orgasm += 1
|
|
|
'You have an orgasm.'
|
|
|
end
|
|
|
- if sexvar = 1:'<br>He indicates that he will cum soon.'
|
|
|
- if sexvar > 0:cumprecheck = 1 & gs 'cum_manage' & xgt 'sex', 'var'
|
|
|
- if sexvar = 0:gs 'sex', 'end'
|
|
|
+ if sexvar > 0:
|
|
|
+ xgt 'sex', 'var'
|
|
|
+ else
|
|
|
+ '<br>He indicates that he will cum soon.'
|
|
|
+ gs 'sex', 'end'
|
|
|
+ end
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'rak':
|
|
@@ -191,9 +202,12 @@ if $ARGS[0] = 'rak':
|
|
|
orgasm += 1
|
|
|
'You have an orgasm.'
|
|
|
end
|
|
|
- if sexvar = 1:'<br>He indicates that he will cum soon.'
|
|
|
- if sexvar > 0:cumprecheck = 1 & gs 'cum_manage' & xgt 'sex', 'var'
|
|
|
- if sexvar = 0:gs 'sex', 'end'
|
|
|
+ if sexvar > 0:
|
|
|
+ xgt 'sex', 'var'
|
|
|
+ else
|
|
|
+ '<br>He indicates that he will cum soon.'
|
|
|
+ gs 'sex', 'end'
|
|
|
+ end
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'bok':
|
|
@@ -224,9 +238,12 @@ if $ARGS[0] = 'bok':
|
|
|
orgasm += 1
|
|
|
'You have an orgasm.'
|
|
|
end
|
|
|
- if sexvar = 1:'<br>He indicates that he will cum soon.'
|
|
|
- if sexvar > 0:cumprecheck = 1 & gs 'cum_manage' & xgt 'sex', 'var'
|
|
|
- if sexvar = 0:gs 'sex', 'end'
|
|
|
+ if sexvar > 0:
|
|
|
+ xgt 'sex', 'var'
|
|
|
+ else
|
|
|
+ '<br>He indicates that he will cum soon.'
|
|
|
+ gs 'sex', 'end'
|
|
|
+ end
|
|
|
end
|
|
|
|
|
|
|
|
@@ -258,9 +275,12 @@ if $ARGS[0] = 'anal':
|
|
|
orgasm += 1
|
|
|
'You have an orgasm.'
|
|
|
end
|
|
|
- if sexvar = 1:'<br>He indicates that he will cum soon.'
|
|
|
- if sexvar > 0:xgt 'sex', 'var'
|
|
|
- if sexvar = 0:gs 'sex', 'end'
|
|
|
+ if sexvar > 0:
|
|
|
+ xgt 'sex', 'var'
|
|
|
+ else
|
|
|
+ '<br>He indicates that he will cum soon.'
|
|
|
+ gs 'sex', 'end'
|
|
|
+ end
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'end':
|