;------------------------------------------------- ;○○ dialogue. Please write name, some keywords etcaetera. ; ; ;------------------------------------------------- ;------------------------------------------------- ;eraMegaten dialogue file. (exclusive) ;Please replace-all X1 and X2 for the character's internal number (the one from CSV). Y1 are used to check assistant's number. ;However, please write single digit numbers as, for example, '04' instead of 4. ;Lines that use PRINTFORM/FORMW/FORML should have a normal (halfwidth) space after the PRINT command to work ;However, these are all deprecated in favor of KSTR WSTR NSTR system - they all use the K number to list them. ;KSTR - "PRINTFORML" ;WSTR - "PRINTFORMW" ;NSTR - "PRINTFORM" ;The purpose of t%HIS_HER(MASTER)% is so the game can call the more generic responses if there's nothing written for a specific character. ;Just copypaste the ' KSTR:(K++) = ' lines if you need more than one. ; ;Feel free to comment out entire blocks of text, but technically, only the CFLAG:XXX = part needs to be commented out. Just start the line with a colon. ;Conversely, some parts like ending are commented out by default, so remove the colon to eneable them. ;Feel free to ask around and check out the readmes, the jp devs have some of them. ;------------------------------------------------- ;------------------------------------------------- ;Again, to make file work, replace-all 9001 to the character's number. ;It can also be changed to PUBXXX for personality types. ;------------------------------------------------- ;_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/# ; ; Module :EVENT_K9001_ASSI.ERB ; Facility :Type:Dialogue ; ; Modification Data: ; Edit Date Author Reason ; 001 20XX/XX/XX Jガン Creation ; 002 20XX/XX/XX Adric Translation ;_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/# ;About license. ; ・Elementary permissions. (Please mark permitted actions with "○" and forbidden with "×".) ; +----+----+----------------------------------------+ ; |No. |Perm|License type | ; +----+----+----------------------------------------+ ; | 1| ○ | Bug correction | ; +----+----+----------------------------------------+ ; | 2| ○ | Typo, omission correction | ; +----+----+----------------------------------------+ ; | 3| ○ | Reposting as part of batch-update patch| ; +----+----+----------------------------------------+ ; | 4| ○ | Addition of new dialogue | ; +----+----+----------------------------------------+ ; | 5| ○ | Modification of existing content | ; +----+----+----------------------------------------+ ; | 6| ○ | Free redistribution of modified content| ; +----+----+----------------------------------------+ ; | 7| ○ | Reprint of content | ; +----+----+----------------------------------------+ ; Consult japanese version for content before translation. ;-------------------------------------------------- ;Selector function. ;-------------------------------------------------- ;If the following block is uncommented, the dialogue will be added to list on first training. ;If there is already another dialogue with the same character, you will be able to choose between them. ;In such a case, you will have to select a number and append _(chosen number) it to all the fuctions. ;Example： EVENTTRAIN_K9001 → EVENTTRAIN_K9001_12 ;-------------------------------------------------- ;@セレクト口上説明_K9001,ARG = 0 ;SIF ARG == 1 ; RETURN 0 ;;Name ;PRINTFORML Short name for dialogue ;;Description ;PRINTFORML Brief description. ;-------------------------------------------------- ;EVENTTRAIN function（9001 should be substituted for character number） ;The before-training dialogue makes use of CFLAG 201-219. ;-------------------------------------------------- @EVENTTRAIN_K9001 CALL 口上変数初期化 ;-------------------------------------------------- ;Extra-mode setup can be done with CFLAG:220. t%HIS_HER(MASTER)% will fire off before first training and never again. ;You can use it for first-training choices of your wish. ;Consider something like below as a sample. ;-------------------------------------------------- ;IF CFLAG:220 == 0 ; PRINTL Shift to virgin mode? ; PRINTL [0] Yes ; PRINTL [1] No ; $INPUT_LOOP ; INPUT ; IF RESULT == 0 ; PRINTFORMW ―Character changed to virgin― ; TALENT:TARGET:0 = 1 ; ABL:TARGET:4 = 0 ; EXP:TARGET:0 = 0 ; ELSEIF RESULT == 1 ; PRINTFORMW ―Proceeding with ordinary training― ; ELSE ; GOTO INPUT_LOOP ; ENDIF ; CFLAG:220 = 1 ;ENDIF ;-------------------------------------------------- ;If you wish for character to respond to someone particular present (master or assistant), use with below part. (Y1 for that character's number), then define it somewhere else. ;-------------------------------------------------- ;IF NO:MASTER == Y1 ; CALL EVENTTRAIN_PY1_K9001 ; RETURN 0 ;ENDIF ;IF ASSI > 0 && ASSIPLAY ; IF NO:ASSI == Y1 ; CALL EVENTTRAIN_PY1_K9001 ; RETURN 0 ; ENDIF ;ENDIF ;-------------------------------------------------- ;Uncomment t%HIS_HER(MASTER)% part, so responding to someone for first training counts as 'first training done' ;For multiple, use syntax like SIF NO:ASSI == Y1 || NO:ASSI == Z1 ... ;-------------------------------------------------- ;IF CFLAG:201 == 0 && ASSI > 0 ; SIF NO:ASSI == Y1 ; CFLAG:201 =1 ;ENDIF ;------------------------------------------------- ;Training start text (shown once) CFLAG201 ;------------------------------------------------- DRAWLINE ;On first training ever IF CFLAG:201 == 0 && TALENT:恋慕 == 0 WSTR:(K++) = [Well? We're here, just like you wanted.] WSTR:(K++) = [Wait, what are you doing?] KSTR:(K++) = %CALLNAME:MASTER% locked the door behind them wordlessly. KSTR:(K++) = %CALLNAME:MASTER% had managed to convince %CALLNAME:TARGET% to follow %HIM_HER(TARGET)% into a hotel room. KSTR:(K++) = %HE_SHE(MASTER)% had "something important" %HE_SHE(MASTER)% wanted %HIS_HER(TARGET)% to do, was all %HE_SHE(MASTER)% had to say to trick her. KSTR:(K++) = The sneer %CALLNAME:MASTER% had on %HIS_HER(MASTER)% face was enough for %CALLNAME:TARGET% to guess %HIS_HER(MASTER)% intentions. KSTR:(K++) = KSTR:(K++) = %CALLNAME:TARGET% narrowed %HIS_HER(TARGET)% eyes in disgust and rage. KSTR:(K++) = [You... I knew we couldn't trust you Society scum!] KSTR:(K++) = %CALLNAME:MASTER% could barely follow %HIS_HER(TARGET)% movements as %HE_SHE(TARGET)% whipped out %HIS_HER(TARGET)% twin pistols. KSTR:(K++) = KSTR:(K++) = Now was the moment of truth. KSTR:(K++) = KSTR:(K++) = Click! Click! KSTR:(K++) = WSTR:(K++) = [?] KSTR:(K++) = KSTR:(K++) = Click! Click! Click! KSTR:(K++) = WSTR:(K++) = [???] KSTR:(K++) = KSTR:(K++) = ClickClickClickClickClick! KSTR:(K++) = WSTR:(K++) = [?!?$*@!] KSTR:(K++) = KSTR:(K++) = %CALLNAME:MASTER% felt the cold sweat soak into the clothing on %HIS_HER(MASTER)% back. KSTR:(K++) = KSTR:(K++) = It worked. KSTR:(K++) = KSTR:(K++) = The room they were in was a prototype, made by the Phantom Society. KSTR:(K++) = Having discerned that the Taimanin had the potential to be troublesome enemies, KSTR:(K++) = they invested resources into obtaining technology that would counter their source of power. KSTR:(K++) = In return for being allowed to keep %CALLNAME:TARGET% as a slave, %HE_SHE(MASTER)% was to test t%HIS_HER(MASTER)% technology. KSTR:(K++) = The [Taima Particles], that allowed them to use their abilities, was absorbed into... KSTR:(K++) = Well, %CALLNAME:MASTER% didn't pay attention to the technical aspects. KSTR:(K++) = KSTR:(K++) = What was important, is that it worked, and the Society did not screw %CALLNAME:MASTER% over. KSTR:(K++) = KSTR:(K++) = In front of %HIM_HER(TARGET)% now, without [Taima Particles], was just an ordinary girl. KSTR:(K++) = Even %HIS_HER(TARGET)% special weaponry did not work. KSTR:(K++) = %CALLNAME:MASTER% could not hold back %HIS_HER(MASTER)% debased grin as %HE_SHE(MASTER)% informed %CALLNAME:TARGET% of these facts. KSTR:(K++) = WSTR:(K++) = [You... kuh!] KSTR:(K++) = KSTR:(K++) = %CALLNAME:TARGET% lept at %CALLNAME:MASTER%, but %HE_SHE(MASTER)% wouldn't lose in strength against a powerless girl, KSTR:(K++) = no matter how well trained %HE_SHE(TARGET)% was. KSTR:(K++) = KSTR:(K++) = %CALLNAME:MASTER% pushed the screaming girl back onto the bed and begun %HIS_HER(MASTER)% misdeeds... CFLAG:201 = 1 GOTO 表示 ;Surrender Mark LV1 ELSEIF CFLAG:201 < 2 && MARK:2 == 1 KSTR:(K++) = CFLAG:201 = 2 GOTO 表示 ;Surrender Mark LV2 ELSEIF CFLAG:201 < 3 && MARK:2 == 2 KSTR:(K++) = CFLAG:201 = 3 GOTO 表示 ;Surrender Mark LV3 ELSEIF CFLAG:201 < 4 && MARK:2 == 3 && (TALENT:3 == 0 && TALENT:4 == 0 && TALENT:5 == 0 && TALENT:6 == 0 && TALENT:7 == 0 && TALENT:8 == 0) KSTR:(K++) = CFLAG:201 = 4 GOTO 表示 ;Fallen ELSEIF CFLAG:201 < 5 && (TALENT:3 || TALENT:4 || TALENT:5) ;Love IF TALENT:3 IF CFLAG:未調教陥落 == 1 ;Love stage gained without training WSTR:(K++) = [Ah.] KSTR:(K++) = %CALLNAME:TARGET%, while lost in %HIS_HER(TARGET)% thoughts, grabbed %CALLNAME:MASTER%'s hand just as they were parting for the day. WSTR:(K++) = (Wh.. why did I just do that?) KSTR:(K++) = Hastily, %HE_SHE(TARGET)% tries to pull away, but %CALLNAME:MASTER% moves closer to %HIS_HER(TARGET)%, %HIS_HER(MASTER)% arms wrapping around her. WSTR:(K++) = (Ahhhh...) WSTR:(K++) = (I guess... t%HIS_HER(MASTER)% is what love feels like, huh?) WSTR:(K++) = (Nothing as half-hearted as with Tatsurou.) WSTR:(K++) = ( t%HIS_HER(MASTER)% feels a lot more comfortable, like there's a warm fire in my belly.) WSTR:(K++) = (Ehe~ heartsymbol I think I like this. I like t%HIS_HER(MASTER)% a lot.) KSTR:(K++) = %CALLNAME:MASTER% and %CALLNAME:TARGET% spend a long moment in each other's arms. KSTR:(K++) = %CALLNAME:MASTER% then presses the initiative, leading the blushing %CALLNAME:TARGET% into a nearby hotel... ELSE KSTR:(K++) = [%CALLNAME:MASTER%... heartsymbol] WSTR:(K++) = At the end of their most recent outing, %CALLNAME:TARGET% bats %HIS_HER(TARGET)% eyes at %HIM_HER(TARGET)%. WSTR:(K++) = Only an idiot would miss %HIS_HER(TARGET)% obvious hinting, but %CALLNAME:MASTER% plays dumb. KSTR:(K++) = [Wh- don't pretend! Idiot! Dummy!] WSTR:(K++) = %CALLNAME:TARGET% stamps %HIS_HER(TARGET)% foot in a huff. KSTR:(K++) = [You know, don't you! Don't make it say it! It's embarassing, so... ] WSTR:(K++) = %CALLNAME:MASTER% laughs, and pats %HIS_HER(TARGET)% head. KSTR:(K++) = [Kuhh... ] WSTR:(K++) = Despite %HIS_HER(TARGET)% frustration, %CALLNAME:TARGET% can't help but blush fiercely. WSTR:(K++) = WSTR:(K++) = %CALLNAME:MASTER% can't help but find %HIS_HER(TARGET)% adorable, and whisks %HIS_HER(TARGET)% away to a more private location... ENDIF ;Lust ELSEIF TALENT:4 WSTR:(K++) = ;Submission ELSEIF TALENT:5 WSTR:(K++) = ENDIF ;Ordinary IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:201 = 5 GOTO 表示 ENDIF ;------------------------------------------------- ;Simple assistant dialogue on 2nd+ training（Replace 9001 with character and Y1 with assistant's number) CFLAG203 ;For multiple characters, copypaste the code and change the flag number to CFLAG:204, then CFLAG:205 ;------------------------------------------------- ;Assistant check, use normal training start dialogue IF ASSI < 0 CALL EVENTTRAIN_SECOND_K9001 ;Assistant Y1 present ;ELSEIF NO:ASSI == Y1 ;First time ; IF CFLAG:203 == 0 ;Fallen＋First Fallen dialogue was generated before ; IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && CFLAG:201 >= 5 ; WSTR:(K++) = ;Otherwise ; ELSE ; KSTR:(K++) = ; ENDIF ; CFLAG:203 = 1 ;Second onward ; ELSEIF CFLAG:203 < 2 || FLAG:7 ==2 ;Fallen ; IF TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8 ; WSTR:(K++) = ;Otherwise ; ELSE ; KSTR:(K++) = ; ENDIF ; CFLAG:203 = 2 ; ENDIF ;If no assistant with specific dialogue, use generic training start. ELSE CALL EVENTTRAIN_SECOND_K9001 ENDIF $表示 CALL 口上変数表示 ;Defer to anot%HIS_HER(TARGET)% dialogue in case nothing above generated a text to be displayed. IF RESULT == 0 TRYCCALLFORM EVENTTRAIN_ZZZ CATCH ENDCATCH ENDIF ;------------------------------------------------- ;Training start function (every time after the first one was shown.) ;------------------------------------------------- @EVENTTRAIN_SECOND_K9001 ;Hate Mark LV3 IF MARK:3 == 3 && (CFLAG:202 < 4 || FLAG:7 == 2) KSTR:(K++) = It only took half a moment, and nearly caught %CALLNAME:MASTER% by surprise. KSTR:(K++) = %CALLNAME:MASTER%, sensing danger, ducked back behind the entrance of the hotel room, KSTR:(K++) = butter knives whizzing through the air, embedding themselves into the door. KSTR:(K++) = ... where did %HE_SHE(TARGET)% get those? KSTR:(K++) = %CALLNAME:MASTER% made a mental note to double check %CALLNAME:TARGET%'s daily rations and increase security. KSTR:(K++) = In the meantime, though... %CALLNAME:MASTER% walks back into the room, KSTR:(K++) = assuming a cold expression to mirror %CALLNAME:TARGET%'s steely glare. KSTR:(K++) = %CALLNAME:MASTER% decided %HE_SHE(MASTER)% would be be merciless today. CFLAG:202 = 4 ;Without Surrender Mark ELSEIF MARK:2 == 0 && (CFLAG:202 < 1 || FLAG:7 == 2) WSTR:(K++) = [ this won't work, you know. Are you stupid or something?] WSTR:(K++) = [The other Taimanin are looking for me, and you'll pay!] WSTR:(K++) = [How much of a brainless monkey do you have to be to think that you'll be able to get away with this?] KSTR:(K++) = KSTR:(K++) = %CALLNAME:MASTER% smirks to %HIM_HER(TARGET)%self. It's been a while since he's heard such classic lines, and decided to reward %HIM_HER(TARGET)%. KSTR:(K++) = Cooly, %HE_SHE(MASTER)% informs %HIS_HER(TARGET)% of certain facts. KSTR:(K++) = The Taimanin were short-handed to begin with. KSTR:(K++) = When %CALLNAME:MASTER% rescued %HIS_HER(TARGET)% in Okinawa, they had left %CALLNAME:TARGET% for dead. KSTR:(K++) = They simply did not have the manpower to spend on %HIM_HER(TARGET)%. KSTR:(K++) = In short, no one was coming for %HIM_HER(TARGET)%. KSTR:(K++) = Perhaps %HIS_HER(TARGET)% friends would, but they did not even know if %HE_SHE(TARGET)% was dead or alive. KSTR:(K++) = KSTR:(K++) = The colour drained from %CALLNAME:TARGET%'s face as the %CALLNAME:MASTER%'s words sunk into %HIM_HER(TARGET)%. WSTR:(K++) = [No... no! I'm sure they'll find me! They'll find me, you pervert!] KSTR:(K++) = KSTR:(K++) = %CALLNAME:MASTER% gave a careless shrug, and shoved %HIS_HER(TARGET)% back onto the bed. KSTR:(K++) = It's fine if %CALLNAME:TARGET% wanted to fantasize about %HIS_HER(TARGET)% situation. KSTR:(K++) = But %CALLNAME:MASTER% planned to drag %HIS_HER(TARGET)% back into reality, kicking and screaming if need be. CFLAG:202 = 1 ;Surrender Mark LV1 ELSEIF MARK:2 == 1 && (CFLAG:202 < 2 || FLAG:7 == 2) WSTR:(K++) = [Kuh... ] KSTR:(K++) = A tray of food was strewn onto the floor. KSTR:(K++) = A small, illogical, act of rebellion from the girl who was trying to escape %HIS_HER(TARGET)% situation. KSTR:(K++) = [ t%HIS_HER(MASTER)% is humiliating... ] KSTR:(K++) = [But I know what %HE_SHE(MASTER)% wants.] KSTR:(K++) = [I can't give it to %HIM_HER(TARGET)%.] KSTR:(K++) = [I WON'T give %HIM_HER(TARGET)% what %HE_SHE(MASTER)% wants.] KSTR:(K++) = %CALLNAME:TARGET% sat on the bed, hugging %HIS_HER(TARGET)% knees as %HE_SHE(TARGET)% whispered to %HIM_HER(TARGET)%self. KSTR:(K++) = Despite %HIS_HER(TARGET)% resolve, %HIS_HER(TARGET)% fraying mental strength strains itself when %HE_SHE(TARGET)% hears KSTR:(K++) = the key enter the doorknob. KSTR:(K++) = %CALLNAME:MASTER% had arrived for another training session. CFLAG:202 = 2 ;Surrender Mark LV2 ELSEIF MARK:2 == 2 && (CFLAG:202 < 3 || FLAG:7 == 2) KSTR:(K++) = %CALLNAME:TARGET% was already on the bed when %CALLNAME:MASTER% stepped in. KSTR:(K++) = %HE_SHE(TARGET)% faced away from %HIM_HER(TARGET)%, a forlorn expression on %HIS_HER(TARGET)% face. KSTR:(K++) = Completely naked, as %CALLNAME:MASTER% had drilled into %HIS_HER(TARGET)% from earlier training sessions, KSTR:(K++) = %HE_SHE(TARGET)% uselessly tried to cover %HIS_HER(TARGET)% private areas with %HIS_HER(TARGET)% hands. WSTR:(K++) = [... it's pointless, you know. You're just wasting your time.] WSTR:(K++) = [I-I am Taimanin! I'm never going to break, no matter what you do to me!] KSTR:(K++) = KSTR:(K++) = %CALLNAME:MASTER% couldn't help but snort a little. KSTR:(K++) = %CALLNAME:TARGET% had already broken, and it was %HIS_HER(MASTER)% full intention to completely tear %HIS_HER(TARGET)% down. KSTR:(K++) = %CALLNAME:MASTER% took a menacing step towards %HIM_HER(TARGET)%, and opened %HIS_HER(MASTER)% hands. KSTR:(K++) = Even that was enough to make %CALLNAME:TARGET% flinch and squeak in fear... CFLAG:202 = 3 ;Surrender Mark LV3＋not Fallen yet ELSEIF MARK:2 == 3 && (TALENT:3 == 0 && TALENT:4 == 0 && TALENT:5 == 0 && TALENT:6 == 0 && TALENT:7 == 0 && TALENT:8 == 0) && (CFLAG:202 < 4 || FLAG:7 == 2) KSTR:(K++) = %CALLNAME:TARGET% was used to it, at t%HIS_HER(MASTER)% point. KSTR:(K++) = %HE_SHE(TARGET)% hated %HIM_HER(TARGET)%self for it, but was helpless to resist. KSTR:(K++) = %HE_SHE(TARGET)% shuddered, as %HE_SHE(TARGET)% heard the familiar sounds of footsteps echoing past the locked doorway. KSTR:(K++) = Dread pooled in %HIS_HER(TARGET)% stomach, as %HE_SHE(TARGET)% felt %HIS_HER(TARGET)% mouth go dry when the doorknob turned. KSTR:(K++) = %HE_SHE(TARGET)% could not even bear to look up at %HIM_HER(TARGET)% as %HE_SHE(MASTER)% loomed over %HIM_HER(TARGET)%. KSTR:(K++) = Worse of all, the moistening in privates was unbearable. KSTR:(K++) = It reminded %HIS_HER(TARGET)% how close %HE_SHE(TARGET)% was to giving in and falling into the abyss of pleasure. KSTR:(K++) = Still, as %CALLNAME:MASTER% touched %HIM_HER(TARGET)%, leaving a blazing trail of lust on %HIS_HER(TARGET)% skin, KSTR:(K++) = %CALLNAME:TARGET% mustered all the will %HE_SHE(TARGET)% could manage, looking up and glaring at %HIM_HER(TARGET)%. WSTR:(K++) = [Do your worst, you pervert.] CFLAG:202 = 4 ;Fallen ELSEIF CFLAG:202 < 5 || FLAG:7 == 2 ;Affection, Love IF TALENT:3 || TALENT:6 ;Random variation - use the same one for all if you have just one IF RAND:3 == 0 KSTR:(K++) = [%CALLNAME:MASTER% ~ %UNICODE(0x2661)%] WSTR:(K++) = As soon as %CALLNAME:MASTER% enters the room, %CALLNAME:TARGET% pads towards %HIM_HER(TARGET)% and clings onto %HIS_HER(MASTER)% arm. WSTR:(K++) = [I've missed you. You're gone for way too long these days! Don't leave me feeling lonely, now.] WSTR:(K++) = %CALLNAME:MASTER% smiles wryly, thinking how remarkable it was that this wild tiger was now WSTR:(K++) = behaving like a housecat. KSTR:(K++) = [Chu~%UNICODE(0x2661)% Chu~%UNICODE(0x2661)% Chuuuuuuu~%UNICODE(0x2661)%] WSTR:(K++) = %CALLNAME:TARGET% plants kiss after kiss on %CALLNAME:MASTER%'s lips, snapping %HIM_HER(TARGET)% out of %HIS_HER(MASTER)% reflections. KSTR:(K++) = [What, now that you're %HIM_HER(TARGET)%e, you're just going to ignore me? Don't be cruel~] ELSEIF RAND:2 == 0 WSTR:(K++) = %CALLNAME:MASTER% enters %HIS_HER(MASTER)% home, calling out as %HE_SHE(MASTER)% does. WSTR:(K++) = Instantly, an acrid smell hits %HIM_HER(TARGET)%. WSTR:(K++) = %HE_SHE(MASTER)% drops into a combat stance. Surely this was the work of an enemy Summoner! WSTR:(K++) = KSTR:(K++) = [Ah? You're home! Good timing. I had some free time, so I made dinner for you!] WSTR:(K++) = WSTR:(K++) = %CALLNAME:MASTER% stares at %CALLNAME:TARGET%, who peeks around the corner, grinning confidently. WSTR:(K++) = WSTR:(K++) = ... Oh. WSTR:(K++) = WSTR:(K++) = %CALLNAME:TARGET% may have had the best of intentions, but the sight of %HIS_HER(TARGET)% in %HIS_HER(TARGET)% apron WSTR:(K++) = was enough to make %CALLNAME:MASTER% have other more wicked designs. WSTR:(K++) = ... of course, %HE_SHE(MASTER)% would have to discreetly get rid of the black matter in the kitchen later. WSTR:(K++) = ... maybe a Slime would eat it? ELSE KSTR:(K++) = As %CALLNAME:MASTER% enters the local cafe, %HE_SHE(MASTER)% almost bumps into %CALLNAME:TARGET%. KSTR:(K++) = %HIS_HER(TARGET)% surprise quickly gives way to a brilliant smile. KSTR:(K++) = Twisting the corners of %HIS_HER(TARGET)% eyes upwards with glee, KSTR:(K++) = %CALLNAME:TARGET% playfully punches %CALLNAME:MASTER% in the arm. WSTR:(K++) = [What~? Are you stalking me now? Or it this meeting destiny, or fate?] KSTR:(K++) = Leaning forward, %HE_SHE(TARGET)% gives %CALLNAME:MASTER% a coy look. WSTR:(K++) = [Since you're here, let's go do something! I know a place with better food!] KSTR:(K++) = WSTR:(K++) = [What? Of course it's your treat! Now come on, let's go, let's go!] KSTR:(K++) = ... KSTR:(K++) = .. KSTR:(K++) = . KSTR:(K++) = At the end of their date, %CALLNAME:MASTER% and %CALLNAME:TARGET% find themselves in front of a hotel. KSTR:(K++) = It didn't take much convincing to escort %HIS_HER(TARGET)% in... ENDIF ;Lust, Whore ELSEIF TALENT:4 || TALENT:7 ;Random variation - use the same one for all if you have just one IF RAND:3 == 0 KSTR:(K++) = %CALLNAME:MASTER% wakes up from %HIS_HER(MASTER)% nap due to an uncomfortably wet feeling on %HIS_HER(MASTER)% pants. KSTR:(K++) = %CALLNAME:TARGET%'s drooling face greeted %HIM_HER(TARGET)%. KSTR:(K++) = Flushed with lust, %HE_SHE(TARGET)% was padding at %HIS_HER(MASTER)% zipper, trying to undo it without much success. KSTR:(K++) = %HIS_HER(MASTER)% pants were soaked. Surely that wasn't all saliva? KSTR:(K++) = %HE_SHE(TARGET)% must have been straddling %HIM_HER(TARGET)% in %HIS_HER(MASTER)% sleep. WSTR:(K++) = [Ha... ha... ] KSTR:(K++) = Panting like a dog, %CALLNAME:TARGET% was so drowned in desire %HE_SHE(TARGET)% couldn't even form words. WSTR:(K++) = %CALLNAME:MASTER% pondered %HIS_HER(MASTER)% next move, and stuck %HIS_HER(MASTER)% finger into %HIS_HER(TARGET)% mouth. KSTR:(K++) = [Ahhhnnnn... ] WSTR:(K++) = The sight of %HIS_HER(TARGET)% viscous tongue filled %CALLNAME:MASTER% with %HIS_HER(MASTER)% own craving, and %HE_SHE(MASTER)% pushed %HIS_HER(TARGET)% down... ELSEIF RAND:2 == 0 WSTR:(K++) = [Hahn... ha... ! ] KSTR:(K++) = %CALLNAME:MASTER% entered the room only to be greeted with the sight of %CALLNAME:TARGET% frozen in place. KSTR:(K++) = %HE_SHE(TARGET)% was naked, %HIS_HER(TARGET)% hands furiously relieving %HIS_HER(TARGET)% %HIM_HER(TARGET)%self. WSTR:(K++) = [Hahnhhhhhh~!] KSTR:(K++) = Despite %HIM_HER(TARGET)%self, %HE_SHE(TARGET)% arched forward, unable to stop %HIM_HER(TARGET)%self from spraying fluids all over the bed. WSTR:(K++) = [Hnng! Ha! Hmnnnnn!] KSTR:(K++) = A mixture of embarrassment and desire clouded %HIS_HER(TARGET)% features as %HE_SHE(TARGET)% came over and over again. KSTR:(K++) = %HIS_HER(TARGET)% flushed face gazed at %CALLNAME:MASTER% with longing, stoking a fire in %CALLNAME:MASTER%. KSTR:(K++) = %HE_SHE(MASTER)% couldn't help but begin to take %HIS_HER(MASTER)% clothing off. %HE_SHE(MASTER)% would give %HIS_HER(TARGET)% exactly what %HE_SHE(TARGET)% wanted. ELSE KSTR:(K++) = %CALLNAME:MASTER% looks up from %HIS_HER(MASTER)% desk as %HE_SHE(MASTER)% hears a knock on the door. KSTR:(K++) = Opening it, %HE_SHE(MASTER)% sees %CALLNAME:TARGET% in front of %HIM_HER(TARGET)%. KSTR:(K++) = %HE_SHE(TARGET)% is completely naked, %HIS_HER(TARGET)% thighs dripping with want. KSTR:(K++) = %HIS_HER(TARGET)% fingers are pleasuring %HIM_HER(TARGET)%self, a hand playing with %HIS_HER(TARGET)% perky nipples, KSTR:(K++) = and another pinching on %HIS_HER(TARGET)% clit. KSTR:(K++) = Wordlessly, %HE_SHE(TARGET)% stares at %HIM_HER(TARGET)%, %HIS_HER(TARGET)% tongue peeking out slightly as %HE_SHE(TARGET)% pants with lust. KSTR:(K++) = Nothing needed to be said. %CALLNAME:MASTER% drags %HIS_HER(TARGET)% into the room and locks the door behind them... ENDIF ;Submission, Slave ELSEIF TALENT:5 || TALENT:8 ;Random variation - use the same one for all if you have just one IF RAND:3 == 0 KSTR:(K++) = %CALLNAME:MASTER% enters the training room for the second time in a short span. KSTR:(K++) = The first time, %HE_SHE(MASTER)% only entered to deliver a piece of clothing to %CALLNAME:TARGET% with simple instructions. KSTR:(K++) = Now, after a few minutes, %HE_SHE(MASTER)% is greeted by the sight of %CALLNAME:TARGET% in a micro-bikini. KSTR:(K++) = %HE_SHE(TARGET)% trembles in shame, but knows better than to try to cover %HIM_HER(TARGET)%self. KSTR:(K++) = %CALLNAME:MASTER% leers at %HIM_HER(TARGET)%, and tells %HIS_HER(TARGET)% to proceed. KSTR:(K++) = Slowly, %CALLNAME:TARGET% turns around, bends over, and raises %HIS_HER(TARGET)% ass for inspection. KSTR:(K++) = The thin line of fabric barely covers anything at all, and %CALLNAME:TARGET% shivers in full awareness of the fact. KSTR:(K++) = %CALLNAME:MASTER% smiles, and steps forward to begin the training seriously... ELSEIF RAND:2 == 0 WSTR:(K++) = [... kh.] KSTR:(K++) = That small whimper was the only protest %CALLNAME:TARGET% could raise. WSTR:(K++) = Slowly, %CALLNAME:TARGET% bows %HIS_HER(TARGET)% head deeply, and as instructed, repeats %HIM_HER(TARGET)%self for the countless time. WSTR:(K++) = [I... am yours, master. Do with my body as you please.] WSTR:(K++) = [Whatever you wish, I will fufill. I am but a fleshtoy for your pleasure.] KSTR:(K++) = KSTR:(K++) = Did %HE_SHE(TARGET)% feel any shame from thisat all? Or was %HE_SHE(TARGET)% broken beyond shame at thispoint? KSTR:(K++) = %CALLNAME:MASTER% pondered such thoughts to %HIM_HER(TARGET)%self as %HE_SHE(MASTER)% stepped forward to molest %HIM_HER(TARGET)%... ELSE WSTR:(K++) = ENDIF ENDIF ;Otherwise, use ordinary IF !口上有無確認(0) ;Random variation - use the same one for all if you have just one IF RAND:3 == 0 KSTR:(K++) = As usual, %CALLNAME:TARGET% did not look happy to see %CALLNAME:MASTER%. KSTR:(K++) = Being confined in the hotel room did nothing to help %HIS_HER(TARGET)% mood. WSTR:(K++) = [Bastard. Pervert! When are you going to let me out!] KSTR:(K++) = Ignoring the usual torrent of abuse, %CALLNAME:MASTER% begins to take %HIS_HER(MASTER)% clothing off. KSTR:(K++) = thisact was a signal to the start of a training sesssion, KSTR:(K++) = a fact that %CALLNAME:TARGET% was beginning to accept. KSTR:(K++) = KSTR:(K++) = %CALLNAME:TARGET% bit %HIS_HER(TARGET)% lower lip and swallowed %HIS_HER(TARGET)% useless protests as %CALLNAME:MASTER% approached %HIM_HER(TARGET)%... ELSEIF RAND:2 == 0 KSTR:(K++) = ELSE KSTR:(K++) = ENDIF ENDIF CFLAG:202 = 5 ENDIF ;------------------------------------------------- ;EVENTEND function（9001 should be replaced as character number） ;Text to be displayed after finishing training. ;------------------------------------------------- @EVENTEND_K9001 CALL 口上変数初期化 ;-------------------------------------------------- ;Call a finishing text for a particular character/assistant. (Replace Y1 with character's number) ;-------------------------------------------------- ;IF NO:MASTER == Y1 ; CALL EVENTEND_PY1_K9001 ; RETURN 0 ;ENDIF ;IF ASSI > 0 && ASSIPLAY ; SIF NO:ASSI == Y1 ; CALL EVENTEND_PY1_K9001 ; RETURN 0 ;ENDIF ;-------------------------------------------------- ;Text to be displayed after finishing training. ;-------------------------------------------------- DRAWLINE ;Hate Mark LV3 IF MARK:3 == 3 && (CFLAG:217 < 1 || FLAG:7 == 2) KSTR:(K++) = CFLAG:217 = 1 ;Surrender Mark up to LV1 ELSEIF MARK:2 <= 1 && (CFLAG:219 < 1 || FLAG:7 == 2) KSTR:(K++) = After an intense period of training, %CALLNAME:TARGET% lay on the bed, panting and trembling. WSTR:(K++) = (How much longer... no. I have to be strong.) KSTR:(K++) = KSTR:(K++) = %CALLNAME:TARGET% was keenly aware, however, KSTR:(K++) = that %HIS_HER(TARGET)% body had begun to give way to %CALLNAME:MASTER%'s skills. WSTR:(K++) = (I have to be strong... Tatsurou... ) CFLAG:219 = 1 ;Surrender Mark LV2 ELSEIF MARK:2 == 2 KSTR:(K++) = %CALLNAME:TARGET% laid on the bed, face down. KSTR:(K++) = %HIS_HER(TARGET)% drool stained the pillow, and the bed was damp with various bodily fluids. WSTR:(K++) = [Kuhhhh... ] KSTR:(K++) = %CALLNAME:MASTER% ignored %HIS_HER(TARGET)% crying as %HE_SHE(MASTER)% cleaned %HIM_HER(TARGET)%self off. KSTR:(K++) = %HE_SHE(TARGET)% could no longer even muster the energy to scream in despair, KSTR:(K++) = as %CALLNAME:MASTER% left the whimpering %CALLNAME:TARGET% behind %HIM_HER(TARGET)% as %HE_SHE(MASTER)% left. CFLAG:219 = 2 ;Surrender Mark LV3＋not Fallen yet ELSEIF MARK:2 == 3 && (TALENT:3 == 0 && TALENT:4 == 0 && TALENT:5 == 0 && TALENT:6 == 0 && TALENT:7 == 0 && TALENT:8 == 0) WSTR:(K++) = [... please... ] WSTR:(K++) = [... just... I'll do anything... ] KSTR:(K++) = Well, that was a first from %HIM_HER(TARGET)%. KSTR:(K++) = %CALLNAME:MASTER% had heard %CALLNAME:TARGET% begging for mercy many times, at thispoint. KSTR:(K++) = However, thiswas the first that %HE_SHE(MASTER)% had seen from %HIM_HER(TARGET)%. KSTR:(K++) = The light had entirely left %HIS_HER(TARGET)% eyes, and %HE_SHE(TARGET)% clung onto %HIM_HER(TARGET)% with %HIS_HER(TARGET)% naked body, KSTR:(K++) = slick with sweat, cum, and other fluids. KSTR:(K++) = Slowly, %HE_SHE(TARGET)% lifted up %HIS_HER(TARGET)% head, and with despair clouding %HIS_HER(TARGET)% expression and tone... KSTR:(K++) = WSTR:(K++) = [... I want it. Give it to me. I-I'll do anything.] WSTR:(K++) = [Lord! Master! Whatever you wish! P-please, just... !] KSTR:(K++) = KSTR:(K++) = %CALLNAME:MASTER% remained silent, locking onto %HIS_HER(TARGET)% with a stony gaze. KSTR:(K++) = %HE_SHE(TARGET)% knew exactly what %HE_SHE(MASTER)% wanted from %HIM_HER(TARGET)%. KSTR:(K++) = KSTR:(K++) = Choking back a sob, %CALLNAME:TARGET% squeezed tears from the corners of %HIS_HER(TARGET)% eyes, KSTR:(K++) = as %HE_SHE(TARGET)% assumed a naked dogeza position on the bed. KSTR:(K++) = WSTR:(K++) = [... please.] KSTR:(K++) = KSTR:(K++) = %CALLNAME:MASTER% closed %HIS_HER(MASTER)% eyes, and took a moment to reflect on the current situation. KSTR:(K++) = Perfect. CFLAG:219 = 3 ;Fallen＋Stamina below 500 (end due to exhaustion) ELSEIF BASE:0 < 500 && (CFLAG:218 < 1 || FLAG:7 == 2) ;Affection, Love IF TALENT:3 || TALENT:6 WSTR:(K++) = [Ha... ha... ha....] KSTR:(K++) = %CALLNAME:TARGET% laid on the bed, a blissful expression playing out on %HIS_HER(TARGET)% glazed face. WSTR:(K++) = [You... you're too much, you know? How do you expect me to keep up like this... ] KSTR:(K++) = %CALLNAME:MASTER% laughs, sitting up from the bed and leaning over to kiss %HIS_HER(TARGET)% forehead. KSTR:(K++) = %HE_SHE(MASTER)% knew better than anyone the stamina of a Taimanin, and knew %HE_SHE(TARGET)% would be back to normal mere hours. KSTR:(K++) = At that time, %HE_SHE(MASTER)% might just decide to utterly exhaust %HIS_HER(TARGET)% once again... ;Lust, Whore ELSEIF TALENT:4 || TALENT:7 WSTR:(K++) = [%CALLNAME:MASTER%! Ha! Ha! Ha!] KSTR:(K++) = The sounds of slapping flesh on flesh echoed throughout the room. WSTR:(K++) = [AHHHHHHhhnnn~ %UNICODE(0x2661)%] KSTR:(K++) = At one last orgasm, %CALLNAME:TARGET%'s eyes rolled backwards and %HE_SHE(TARGET)% folded like paper doll onto the bed. KSTR:(K++) = %HIS_HER(TARGET)% cunt twitched endlessly as %HE_SHE(TARGET)% uncontrollably sprayed fluid everywhere. KSTR:(K++) = Carving pleasure into %HIS_HER(TARGET)% like this, however, was the point of these training sessions. KSTR:(K++) = It wasn't the first time, nor would it be the last... ;Submission, Slave ELSEIF TALENT:5 || TALENT:8 KSTR:(K++) = The room was silent except for the quiet panting of %CALLNAME:TARGET%. KSTR:(K++) = Despite being made to come over and over again, %CALLNAME:TARGET% was, as trained, KSTR:(K++) = bent over and made to present %HIM_HER(TARGET)%self for furt%HIS_HER(TARGET)% use. KSTR:(K++) = %HE_SHE(TARGET)% was just an object and a slave, after all, KSTR:(K++) = and %HIS_HER(TARGET)% own physical state meant nothing to the pleasure of %HIS_HER(TARGET)% master. KSTR:(K++) = KSTR:(K++) = %CALLNAME:MASTER% decides that is enough for the session, and slaps %HIS_HER(TARGET)% ass. KSTR:(K++) = With a muted scream, %CALLNAME:TARGET% caves in to %HIS_HER(TARGET)% exhaustion, leaking bodily fluids all over the bed. KSTR:(K++) = The last thing %HIS_HER(TARGET)% fading consciousness sees is the shadow of %HIS_HER(TARGET)% master leaving the room... ENDIF ;Ordinary IF !口上有無確認(0) WSTR:(K++) = [That's all then? You tired or something?] KSTR:(K++) = %CALLNAME:TARGET% adopts a mocking tone with all the bravado %HE_SHE(TARGET)% can muster. KSTR:(K++) = %CALLNAME:MASTER% feels a twinge of annoyance, but that is the limits of what %HE_SHE(MASTER)% manage at the moment. KSTR:(K++) = ... %CALLNAME:MASTER% vows in %HIS_HER(MASTER)% heart to make %HIS_HER(TARGET)% regret showing that attitude to %HIM_HER(TARGET)%. KSTR:(K++) = ... next time, for sure. ENDIF CFLAG:218 = 1 ;Fallen ELSEIF CFLAG:219 < 4 || FLAG:7 == 2 ;Affection, Love IF TALENT:3 || TALENT:6 KSTR:(K++) = [Chu~%UNICODE(0x2661)% Chu~%UNICODE(0x2661)% Chuuuuuuu~%UNICODE(0x2661)%] WSTR:(K++) = %CALLNAME:TARGET% plants kiss after kiss onto %CALLNAME:MASTER%, clinging onto %HIS_HER(MASTER)% arm. KSTR:(K++) = [Don't tell me we're done already! thisisn't nearly enough for me!] WSTR:(K++) = %CALLNAME:MASTER% smiles and pats %HIS_HER(TARGET)% head, assuring %HIM_HER(TARGET)% %HE_SHE(MASTER)% would make time for %HIS_HER(TARGET)% again. KSTR:(K++) = [Well... that's okay then. Don't forget about me, okay?] WSTR:(K++) = As if to plant a reminder in %HIS_HER(MASTER)% head, %CALLNAME:TARGET% delivers a passionate farewell kiss... ;Lust, Whore ELSEIF TALENT:4 || TALENT:7 WSTR:(K++) = As %CALLNAME:MASTER% makes to leave, %CALLNAME:TARGET% clings onto %HIM_HER(TARGET)%. WSTR:(K++) = Grasping onto %HIS_HER(MASTER)% hand, %HE_SHE(TARGET)% pushes it onto %HIS_HER(TARGET)% privates, WSTR:(K++) = where %CALLNAME:MASTER% can feel an unusual amount of moistness soaking through %HIS_HER(TARGET)% underwear. WSTR:(K++) = With a seductive smile on %HIS_HER(TARGET)% lips, %CALLNAME:TARGET% whispers into %CALLNAME:MASTER%'s ear. KSTR:(K++) = [Come back soon, okay?] WSTR:(K++) = %CALLNAME:MASTER% has to go, but vows in %HIS_HER(MASTER)% heart to return as soon as %HE_SHE(MASTER)% is able. ;Submission, Slave ELSEIF TALENT:5 || TALENT:8 KSTR:(K++) = %CALLNAME:MASTER% decides %HE_SHE(MASTER)% is done for now, and prepares to move out. WSTR:(K++) = [If we're done here, master... ] KSTR:(K++) = %CALLNAME:TARGET% bows deeply, exposing the back of %HIS_HER(TARGET)% neck and raising %HIS_HER(TARGET)% ass, as %HE_SHE(TARGET)% was trained to do. KSTR:(K++) = Tempted, %CALLNAME:MASTER% gives %HIS_HER(TARGET)% ass a slap and a squeeze as %HE_SHE(MASTER)% leaves, KSTR:(K++) = causing %CALLNAME:TARGET% to squeak in %HIS_HER(MASTER)% passing. ENDIF ;Ordinary IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:219 = 4 ENDIF CALL 口上変数表示 ;Defer to another dialogue in case nothing above generated a text to be displayed. IF RESULT == 0 TRYCCALLFORM EVENTEND_ZZZ CATCH ENDCATCH ENDIF ;-------------------------------------------------- ;@KOJO_MESSAGE_COM function（9001 - charanumber） ;Outputs text when executing a training command. ;-------------------------------------------------- @KOJO_MESSAGE_COM_K9001 ;Uncomment if training through an assistant should skip dialogue. ;SIF ASSI > 0 && ASSIPLAY ; RETURN 0 ;Grab a description and skip dialogue if ballgagged. IF TEQUIP:20 && SELECTCOM != 107 CALL TRAIN_MESSAGE RETURN 0 ENDIF ;Skip text if out of reasonable bounds IF SELECTCOM < 0 || SELECTCOM > 699 RETURN 0 ENDIF ;-------------------------------------------------- ;Use to call specific dialogue for specific Y1 assistant/master. ;-------------------------------------------------- ;IF NO:MASTER == Y1 ; CALL KOJO_MESSAGE_COM_PY1_K9001 ; RETURN 0 ;ENDIF ;IF ASSI > 0 && ASSIPLAY ; IF NO:ASSI == Y1 ; CALL KOJO_MESSAGE_COM_PY1_K9001 ; RETURN 0 ; ENDIF ;ENDIF ;------------------------------------------------- ;Initialize function ;------------------------------------------------- CALL 口上変数初期化 CALLFORM COMTYPE_{SELECTCOM} ;------------------------------------------------- ;Checking for whet%HIS_HER(TARGET)% activity was performed before is stored in CFLAG 300～500 ;------------------------------------------------- IF 0 == 1 ;================================================= ;Caress type commands (some actions will fork to respective tentacles - SHOKUSHU_PLAY) ;================================================= ELSEIF RESULT == COMTYPE("愛撫系") SIF TEQUIP:25 > 0 && ( SELECTCOM == 0 || SELECTCOM == 5 || SELECTCOM == 6 || SELECTCOM == 7 || SELECTCOM == 8 || SELECTCOM == 12 || SELECTCOM == 13 || SELECTCOM == 15 ) GOTO SHOKUSHU_PLAY SELECTCASE SELECTCOM ;------------------------------------------------- ;0, Caress ;------------------------------------------------- CASE 0 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:300 == 0 KSTR:(K++) = %CALLNAME:MASTER% runs %HIS_HER(MASTER)% hands down %CALLNAME:TARGET%'s body... WSTR:(K++) = [Urg... gross. I can't believe I have to put up with this...] KSTR:(K++) = Digust is evident on %CALLNAME:TARGET%'s face. KSTR:(K++) = %CALLNAME:MASTER% resolves %HIM_HER(TARGET)%self to make %HIS_HER(TARGET)% change %HIS_HER(TARGET)% tune... CFLAG:300 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:300 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = As %CALLNAME:MASTER% moves closer to %CALLNAME:TARGET%, %HE_SHE(TARGET)% realizes %HIS_HER(MASTER)% intent. KSTR:(K++) = Blushing, %HE_SHE(TARGET)% awkwardly opens up %HIS_HER(TARGET)% arms, as if unsure of where to put %HIS_HER(TARGET)% hands. WSTR:(K++) = [Hnn... b-be gentle, okay! I've never done thisbefore... ] KSTR:(K++) = %CALLNAME:MASTER% begins with a hug and a kiss on %HIS_HER(TARGET)% neck, making %CALLNAME:TARGET% squeak in surprise... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [%CALLNAME:MASTER%...] KSTR:(K++) = %CALLNAME:TARGET% gazes at %CALLNAME:MASTER% with a wanting look in %HIS_HER(TARGET)% eyes. KSTR:(K++) = As %CALLNAME:MASTER% moves %HIS_HER(MASTER)% hand to molest %HIS_HER(TARGET)% privates, KSTR:(K++) = %CALLNAME:TARGET% lets out an unabashed moan... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = Expressionless, %CALLNAME:MASTER% simply opened %HIS_HER(MASTER)% hands towards %CALLNAME:TARGET%, KSTR:(K++) = as if %HE_SHE(MASTER)% were inviting %HIS_HER(TARGET)% for a hug. WSTR:(K++) = [... as you wish.] KSTR:(K++) = %CALLNAME:TARGET%'s crestfallen face went unnoticed, as %HE_SHE(TARGET)% stepped forward into %CALLNAME:MASTER%'s embrace. KSTR:(K++) = %CALLNAME:MASTER%'s hands quickly zoomed onto %HIS_HER(TARGET)% ass, and furt%HIS_HER(TARGET)% groped %HIS_HER(TARGET)% body... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:300 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:300 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = Upon recieving the command, %CALLNAME:TARGET% breaks into a choked sob. KSTR:(K++) = The taste of helplessness was bitter in %HIS_HER(TARGET)% mouth. KSTR:(K++) = %HE_SHE(TARGET)% hated it, but knew deep in %HIS_HER(TARGET)% heart there was no escape. KSTR:(K++) = It was all %HE_SHE(TARGET)% could do to hold back %HIS_HER(TARGET)% wail as %CALLNAME:MASTER%'s hands closed in on %HIM_HER(TARGET)%... CFLAG:300 = 3 ENDIF ;Otherwise IF (CFLAG:300 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% runs %HIS_HER(MASTER)% hands up and down %CALLNAME:TARGET%'s body as %HE_SHE(MASTER)% pleases. WSTR:(K++) = [Hnng... mm... haan... ] KSTR:(K++) = Ignoring whatever complaints %HE_SHE(TARGET)% might have, KSTR:(K++) = %CALLNAME:MASTER% continues, planting kisses and licking to %HIS_HER(MASTER)% satisfaction... CFLAG:300 = 2 ENDIF ENDIF ;------------------------------------------------- ;1, Cunnilingus ;------------------------------------------------- CASE 1 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:301 == 0 KSTR:(K++) = %CALLNAME:TARGET% laid on the bed, staring at %CALLNAME:MASTER% with fear and confusion. KSTR:(K++) = Suddenly, %CALLNAME:MASTER% grabbed %HIS_HER(TARGET)% thighs and spread them open, licking around %HIS_HER(TARGET)% honeypot and into %HIS_HER(TARGET)% depths... WSTR:(K++) = [What are you- No, that's dirty! Stop! St- ahhh~ ] CFLAG:301 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:301 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [You want to lick t-there again? Pervert! It's, dirty, don't you know!] KSTR:(K++) = %CALLNAME:TARGET% blushed and looked away in protest. KSTR:(K++) = Still, %HE_SHE(TARGET)% didn't resist as %CALLNAME:MASTER% spread %HIS_HER(TARGET)% legs and went down to work. WSTR:(K++) = [Hnn... gnn... ahhhn... ] ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = %CALLNAME:MASTER% moved in front of %CALLNAME:TARGET% and laid %HIS_HER(MASTER)% hands on %HIS_HER(TARGET)% thighs. KSTR:(K++) = %CALLNAME:TARGET% easily read %HIS_HER(MASTER)% intentions, and felt %HIS_HER(TARGET)% privates moisten in anticipation. KSTR:(K++) = With wet eyes, %CALLNAME:TARGET% gazed at %CALLNAME:MASTER% passionately. WSTR:(K++) = [Please... don't make me wait any more... ] KSTR:(K++) = %CALLNAME:MASTER% obliges %HIS_HER(TARGET)% without hesitation... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = Upon command, %CALLNAME:TARGET% spreads %HIS_HER(TARGET)% legs open. KSTR:(K++) = Despite %HIS_HER(TARGET)% great embarrassment, %CALLNAME:MASTER% decides still it isn't quite enough. KSTR:(K++) = %HE_SHE(MASTER)% furt%HIS_HER(TARGET)% orders %HIS_HER(TARGET)% to spread %HIS_HER(TARGET)% pussylips open. KSTR:(K++) = Understanding that hesitation meant punishment, %CALLNAME:TARGET% quickly complied. KSTR:(K++) = Satisfied, %CALLNAME:MASTER% decided to reward %HIS_HER(TARGET)% by partaking in %HIS_HER(TARGET)% honeypot... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:301 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:301 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:301 = 3 ENDIF ;Otherwise IF (CFLAG:301 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% spreads %CALLNAME:TARGET%'s legs open. KSTR:(K++) = %HE_SHE(MASTER)% takes a moment to observe %HIS_HER(TARGET)% womanhood, which could only be described as beautiful. KSTR:(K++) = Unable to resist the inviting sight, %CALLNAME:MASTER% moves in for a taste... CFLAG:301 = 2 ENDIF ENDIF ;------------------------------------------------- ;3,Fingering ;------------------------------------------------- CASE 3 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:303 == 0 KSTR:(K++) = %CALLNAME:MASTER% approaches %CALLNAME:TARGET% with a sharp look in %HIS_HER(MASTER)% eye. WSTR:(K++) = [What are you- stop! Don't touch me there!] KSTR:(K++) = Despite %CALLNAME:TARGET%'s resistance, %CALLNAME:MASTER%'s fingers slip into %HIS_HER(TARGET)% cunt with practiced ease. KSTR:(K++) = It was also helpful that %HIS_HER(TARGET)% oozing slit was already slick and inviting. WSTR:(K++) = [Ha! Kuh! Hnnnnn~ ] KSTR:(K++) = %CALLNAME:TARGET%'s protests quickly gave way to helplessness, KSTR:(K++) = pleasure sapping %HIS_HER(TARGET)% strength to resist... CFLAG:303 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:303 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = %CALLNAME:MASTER%'s fingers enter %CALLNAME:TARGET%'s opening, eliciting a lustful moan from %HIM_HER(TARGET)%. WSTR:(K++) = [I love... ahn~ %UNICODE(0x2661)%] WSTR:(K++) = [I love it when you do that %UNICODE(0x2661)%%UNICODE(0x2661)%%UNICODE(0x2661)%] KSTR:(K++) = %CALLNAME:TARGET% hugs onto %CALLNAME:MASTER% even as %HE_SHE(MASTER)% pleasures %HIM_HER(TARGET)%, KSTR:(K++) = as begging for more... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = %CALLNAME:TARGET% hugs onto %CALLNAME:MASTER%'s arm, grabbing %HIS_HER(MASTER)% hand and moving it towards %HIS_HER(TARGET)% womanhood. KSTR:(K++) = %HIS_HER(MASTER)% fingers touch onto %HIS_HER(TARGET)% moistness, as if %HIS_HER(TARGET)% lustful and wet gaze wasn't obvious enough. WSTR:(K++) = [Hey... I want to feel you inside of of me... ] KSTR:(K++) = %CALLNAME:TARGET% whispers suggestively into %CALLNAME:MASTER%'s ear. KSTR:(K++) = %CALLNAME:MASTER% is already convinced, and %HIS_HER(MASTER)% fingers move to draw a laboured gasp from %HIM_HER(TARGET)%... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [Hnn... Kh... Gnhh... ] KSTR:(K++) = %CALLNAME:TARGET% couldn't help but put out stifled moans as %CALLNAME:MASTER%'s dextrous fingers violate %HIM_HER(TARGET)%. KSTR:(K++) = Any temptation to resist had long been snuffed out, KSTR:(K++) = and %CALLNAME:TARGET% could do nothing but distract %HIM_HER(TARGET)%self from %HIS_HER(TARGET)% despair with pleasure... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:303 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:303 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:303 = 3 ENDIF ;Otherwise IF (CFLAG:303 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER%'s fingers plunge in and out of %CALLNAME:TARGET% mercilessly. WSTR:(K++) = [Haa- slow down! No, stop it! Just- ahnnn~ ] KSTR:(K++) = %CALLNAME:TARGET% shields %HIS_HER(TARGET)% expression from view with %HIS_HER(TARGET)% forearms, KSTR:(K++) = desperate to conceal %HIS_HER(TARGET)% rising desire... CFLAG:303 = 2 ENDIF ENDIF ;------------------------------------------------- ;4,Rim Job ;------------------------------------------------- CASE 4 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:304 == 0 KSTR:(K++) = %CALLNAME:MASTER% casually requests that %CALLNAME:TARGET% bends over. WSTR:(K++) = [... why do I have to... fine. ] KSTR:(K++) = %CALLNAME:TARGET% relents with some grumbling. Probably, %HE_SHE(TARGET)% doesn't expect anything different from the norm. KSTR:(K++) = %CALLNAME:MASTER% had initially intended to taste %HIS_HER(TARGET)% slit, but then %HIS_HER(TARGET)% cute asshole caught %HIS_HER(MASTER)% attention. KSTR:(K++) = Deciding to change %HIS_HER(MASTER)% target, %CALLNAME:MASTER% sticks %HIS_HER(MASTER)% tongue into %HIS_HER(TARGET)% tender hole. WSTR:(K++) = [Kyah! What are you doing! That's dirty! Gross! Noooooo~ ] CFLAG:304 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:304 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [It doesn't feel good, you know. I don't even feel anything from it.] WSTR:(K++) = [I- I get that you're into this, but it's just gross, you know?] WSTR:(K++) = [S- so you don't have to force yourself... ] KSTR:(K++) = %CALLNAME:MASTER% ignores %CALLNAME:TARGET%'s gripes as %HE_SHE(MASTER)% runs %HIS_HER(MASTER)% tongue around the rim of %HIS_HER(TARGET)% asshole. KSTR:(K++) = Despite %HIS_HER(TARGET)% whining, %CALLNAME:MASTER% can't help but notice %HIS_HER(TARGET)% breathing growing into panting... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = %CALLNAME:MASTER% fully intended to develop %CALLNAME:TARGET%'s asshole. KSTR:(K++) = That was an unavoidable step in %HIS_HER(TARGET)% overall growth as a slave. KSTR:(K++) = Though, it was certainly a big plus that %HIS_HER(TARGET)% pink fuckhole was still youthful and beautiful. WSTR:(K++) = [W-what are you waiting for? Hurry up and stick it in already... ] KSTR:(K++) = Whoops. %CALLNAME:MASTER% caught %HIM_HER(TARGET)%self lost in thought. KSTR:(K++) = %CALLNAME:MASTER% proceeds to dive into %HIS_HER(TARGET)% sensitive ass... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [You want to... what?] KSTR:(K++) = Despite having been subject to all manner of humiliation and abuse, KSTR:(K++) = thisone was a uniquely new low for %CALLNAME:TARGET%. KSTR:(K++) = %HE_SHE(TARGET)% quickly noted %CALLNAME:MASTER%'s negative reaction to %HIS_HER(TARGET)% stupefaction though, KSTR:(K++) = and bent over to spread %HIS_HER(TARGET)% cheeks. KSTR:(K++) = That attitude managed to sooth %CALLNAME:MASTER%'s annoyance, KSTR:(K++) = as %HE_SHE(MASTER)% begun to lick around the edge of %HIS_HER(TARGET)% fuckhole... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:304 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:304 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:304 = 3 ENDIF ;Otherwise IF (CFLAG:304 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% requests that %CALLNAME:TARGET% expose %HIS_HER(TARGET)% asshole. WSTR:(K++) = [Kuh... ] KSTR:(K++) = Knowing %HIS_HER(TARGET)% situation, and that %HE_SHE(TARGET)% has little choice, %HE_SHE(TARGET)% slowly complies. KSTR:(K++) = %CALLNAME:MASTER%, not satisfied with %HIS_HER(TARGET)% speed of deference, pinches %HIS_HER(TARGET)% butt painfully, KSTR:(K++) = before %HE_SHE(MASTER)% begins to dive %HIS_HER(MASTER)% tongue into %HIS_HER(TARGET)% tender ass. WSTR:(K++) = [Hyah!] KSTR:(K++) = That clenching action just made %HIS_HER(TARGET)% squeeze tighter for %HIM_HER(TARGET)%. CFLAG:304 = 2 ENDIF ENDIF ;------------------------------------------------- ;5,Anal Caress ;------------------------------------------------- CASE 5 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:305 == 0 KSTR:(K++) = %CALLNAME:MASTER% moves closer to %CALLNAME:TARGET%, hugging %HIS_HER(TARGET)% in a light embrace. KSTR:(K++) = %HE_SHE(TARGET)% freezes in surprise, which quickly transitions into reddening cheeks. WSTR:(K++) = [Huh? What? Huhhh-?] KSTR:(K++) = And then %CALLNAME:MASTER% slips %HIS_HER(MASTER)% fingers into %HIS_HER(TARGET)% asshole. WSTR:(K++) = [Hyah! Did you just- Hyaaah!] KSTR:(K++) = Despite %HIS_HER(TARGET)% confusion and shock, KSTR:(K++) = %CALLNAME:MASTER%'s skilled fingers play relentlessly inside %HIM_HER(TARGET)%, hugging onto %HIS_HER(TARGET)% to prevent escape... CFLAG:305 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:305 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [Ha.. ha... ha... ] KSTR:(K++) = While on the bed, %CALLNAME:MASTER% spoons %CALLNAME:TARGET% lovingly. KSTR:(K++) = Dancing %HIS_HER(MASTER)% fingers closer to %HIS_HER(TARGET)% loins, KSTR:(K++) = %CALLNAME:TARGET% gazes into %HIS_HER(MASTER)% eyes with wet anticipation. KSTR:(K++) = As %CALLNAME:MASTER%'s fingers penetrate into %CALLNAME:TARGET%'s ass, KSTR:(K++) = %CALLNAME:TARGET% stiffens in surprise. KSTR:(K++) = %HE_SHE(TARGET)% quickly recovers, however, and buries %HIM_HER(TARGET)%self into %CALLNAME:MASTER%'s chest, KSTR:(K++) = even as %HE_SHE(MASTER)% molests %HIM_HER(TARGET)%... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = %CALLNAME:TARGET% presents %HIS_HER(TARGET)% ass in anticpation. KSTR:(K++) = %HE_SHE(TARGET)% even sways it slightly, not even trying to be subtle. KSTR:(K++) = Looking back at %CALLNAME:MASTER% over %HIS_HER(TARGET)% shoulder, %HE_SHE(TARGET)% leers at %HIM_HER(TARGET)% lustily. WSTR:(K++) = [Hora... what ever are we going to be doing on the bed?] KSTR:(K++) = KSTR:(K++) = %HIS_HER(TARGET)% attempts at seduction only annoy %CALLNAME:MASTER%. KSTR:(K++) = KSTR:(K++) = %HIS_HER(MASTER)% fingers run over %HIS_HER(TARGET)% slit, drawing an excited shiver. KSTR:(K++) = And then, they plunge mercilessly into %HIS_HER(TARGET)% asshole. WSTR:(K++) = [Hie!] KSTR:(K++) = %CALLNAME:TARGET%'s surprised yelp quickly turns into moans, KSTR:(K++) = as %CALLNAME:MASTER% leans over %HIS_HER(TARGET)% to continue %HIS_HER(MASTER)% anal assault... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = %CALLNAME:TARGET% stands absolutely still. KSTR:(K++) = %HE_SHE(TARGET)% is forbidden to move, yet alone speak, KSTR:(K++) = or even make any kind of noise at all. KSTR:(K++) = Despite that, %CALLNAME:MASTER% cruelly runs %HIS_HER(MASTER)% fingers over %HIS_HER(TARGET)% body. KSTR:(K++) = %HE_SHE(MASTER)% stops %HIS_HER(MASTER)% hand at %HIS_HER(TARGET)% waist, for a moment, KSTR:(K++) = before %HE_SHE(MASTER)% dives it into %HIS_HER(TARGET)% asshole. WSTR:(K++) = [Hie!] KSTR:(K++) = ... oops. Looks like %CALLNAME:TARGET% has broken the rules. KSTR:(K++) = %HIS_HER(TARGET)% punishment was a particularly inventive twisting of %HIS_HER(MASTER)% fingers, KSTR:(K++) = while still inside %HIM_HER(TARGET)%... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:305 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:305 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:305 = 3 ENDIF ;Otherwise IF (CFLAG:305 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% slaps %CALLNAME:TARGET%'s ass, prompting %HIS_HER(TARGET)% to bend over. WSTR:(K++) = [.. ch!] KSTR:(K++) = That barely audible click of %HIS_HER(TARGET)% tongue was all the resistance %CALLNAME:TARGET% could afford, KSTR:(K++) = as %CALLNAME:MASTER% toyed %HIS_HER(MASTER)% fingers around the edge of %HIS_HER(TARGET)% asshole... CFLAG:305 = 2 ENDIF ENDIF ;------------------------------------------------- ;6,Breast Massage ;------------------------------------------------- CASE 6 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:306 == 0 KSTR:(K++) = %CALLNAME:MASTER% runs %HIS_HER(MASTER)% fingers along the underside of %CALLNAME:TARGET%'s small mound. KSTR:(K++) = %HIS_HER(TARGET)% breasts are the perfect size for %HIS_HER(MASTER)% taste, KSTR:(K++) = fitting perfectly inside the palm of %HIS_HER(MASTER)% hand. KSTR:(K++) = %HE_SHE(MASTER)% contemplates their beauty for a moment longer, then moves in for a squeeze. WSTR:(K++) = [Ha!] KSTR:(K++) = %CALLNAME:TARGET%'s expression twists into barely concealed disgust, KSTR:(K++) = as %CALLNAME:MASTER% satisfies %HIM_HER(TARGET)%self by fondling %HIM_HER(TARGET)%... CFLAG:306 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:306 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = %CALLNAME:MASTER% decides to take a breat%HIS_HER(TARGET)% for a moment. KSTR:(K++) = Sitting on the edge of the bed, %HE_SHE(MASTER)% leans backward. KSTR:(K++) = %CALLNAME:TARGET% has other plans, however. KSTR:(K++) = The Taimanin plops onto %HIS_HER(MASTER)% lap, looking over %HIS_HER(TARGET)% shoulder and grinning smugly at %HIM_HER(TARGET)%. WSTR:(K++) = [Oh... looks like someone is getting old. Take as long as you need to rest.] WSTR:(K++) = [I'll just be here enjoying myself~ ] KSTR:(K++) = Oh, now that was provocation if %CALLNAME:MASTER% had ever saw it. KSTR:(K++) = Mustering up %HIS_HER(MASTER)% strength, %CALLNAME:MASTER% tosses %HIS_HER(TARGET)% onto the bed and begins to grope at %HIS_HER(TARGET)% chest. WSTR:(K++) = [Kyah~! What is thisbeast going to do to me!] KSTR:(K++) = %CALLNAME:TARGET% laughs with amusement, and feels %HIS_HER(TARGET)% growing arousal with joy... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = %CALLNAME:TARGET% sits on %CALLNAME:MASTER%'s lap. KSTR:(K++) = %HIS_HER(TARGET)% breathing is laboured, as %HIS_HER(MASTER)% hands ceaselessly caress %HIM_HER(TARGET)%. KSTR:(K++) = Slowly, they make their way up %HIS_HER(TARGET)% body, sliding up %HIS_HER(TARGET)% curves and stroking %HIS_HER(TARGET)% nipples outwards. KSTR:(K++) = Every now and then %CALLNAME:MASTER% plants a kiss on %HIS_HER(TARGET)% neck, %HIS_HER(TARGET)% ear. KSTR:(K++) = Eventually, %CALLNAME:TARGET% beings to pant like a dog in heat. KSTR:(K++) = The sounds of %HIS_HER(TARGET)% moaning resound through the room... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = %CALLNAME:MASTER% instructs %CALLNAME:TARGET% to present %HIM_HER(TARGET)%self. WSTR:(K++) = [... understood.] KSTR:(K++) = Despite %HIS_HER(TARGET)% unwillingness, %CALLNAME:TARGET% sticks out %HIS_HER(TARGET)% chest and hides %HIS_HER(TARGET)% arms behind %HIS_HER(TARGET)% back. KSTR:(K++) = %HE_SHE(TARGET)% almost looks like %HE_SHE(TARGET)% is about to cry, KSTR:(K++) = as %CALLNAME:MASTER% begins to molest %HIS_HER(TARGET)% unprotected front. KSTR:(K++) = %HIS_HER(TARGET)% strained expression colours red with arousal after some time, though... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:306 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:306 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:306 = 3 ENDIF ;Otherwise IF (CFLAG:306 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% leans into %CALLNAME:TARGET% from behind, %HIS_HER(MASTER)% hands exploring %HIS_HER(TARGET)% body. KSTR:(K++) = Eventually %HIS_HER(MASTER)% hands wander to %HIS_HER(TARGET)% breasts, groping them relentlessly. WSTR:(K++) = [Hiie! Wait, stop! I'm sensitive there! Wai- hnnn... ] KSTR:(K++) = %CALLNAME:TARGET% fidgets restlessly under %CALLNAME:MASTER%'s merciless hands... CFLAG:306 = 2 ENDIF ENDIF ;------------------------------------------------- ;7,Nipple Tease ;------------------------------------------------- CASE 7 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:307 == 0 KSTR:(K++) = %CALLNAME:MASTER% stares hard at %CALLNAME:TARGET%'s naked breasts. KSTR:(K++) = %HIS_HER(TARGET)% youthful mounds were perfection itself. KSTR:(K++) = %HIS_HER(MASTER)% attention is drawn to %HIS_HER(TARGET)% nubs, pink and unmolested. KSTR:(K++) = Unable to resist, %CALLNAME:MASTER% brushes %HIS_HER(MASTER)% fingers against them. WSTR:(K++) = [Don't. Just don't do it. I-I'm really sensitive there, okay?!] KSTR:(K++) = The deep blush on %CALLNAME:TARGET%'s embarassed face spoke to the truth of %HIS_HER(TARGET)% words. KSTR:(K++) = %CALLNAME:MASTER% nods to %HIM_HER(TARGET)%self, then proceeds to ignore %HIM_HER(TARGET)%, teasing %HIS_HER(TARGET)% nipples, KSTR:(K++) = and enjoying the feeling of hardening flesh under %HIS_HER(MASTER)% fingers... CFLAG:307 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:307 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [You've- ahnnn- spent so much time doing this.] WSTR:(K++) = [Is it really- hnnn- that fun for you?!] KSTR:(K++) = %CALLNAME:TARGET% sat on %CALLNAME:MASTER%'s lap as %HE_SHE(MASTER)% ran %HIS_HER(MASTER)% fingers over the tips of %HIS_HER(TARGET)% nipples, KSTR:(K++) = as if %HE_SHE(MASTER)% were playing on a controller. KSTR:(K++) = Yes, in fact, %CALLNAME:MASTER% responds, it is really thismuch fun. KSTR:(K++) = Despite %HIS_HER(TARGET)% protests, %CALLNAME:TARGET% clearly enjoys thisperhaps more than %CALLNAME:MASTER% does, KSTR:(K++) = judging by the growing feeling of wetness %CALLNAME:MASTER% can feel on %HIS_HER(MASTER)% crotch... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Ha... haaggnnn... hgggnnn... ] KSTR:(K++) = %CALLNAME:TARGET% had fallen to the point where %HE_SHE(TARGET)% could not even form words. KSTR:(K++) = %HIS_HER(TARGET)% tongue lolled out of %HIS_HER(TARGET)% mouth, KSTR:(K++) = and %HE_SHE(TARGET)% could not control the flow of fluid flowing down %HIS_HER(TARGET)% thighs. KSTR:(K++) = %CALLNAME:MASTER% had no intention of relenting, however, as %HE_SHE(MASTER)% continued to grasp %HIS_HER(TARGET)% nipples from behind. KSTR:(K++) = %HIS_HER(MASTER)% skilled fingers slowly drowned %HIS_HER(TARGET)% in lust... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = %CALLNAME:TARGET% adopts a kneeling position in front of the bed. KSTR:(K++) = %HIS_HER(TARGET)% eyes are closed, as if that were any escape from %HIS_HER(TARGET)% position. KSTR:(K++) = Meanwhile, %CALLNAME:MASTER% pinches both %HIS_HER(TARGET)% nipples, tugging them gently and randomly. KSTR:(K++) = The rising heat in %HIS_HER(TARGET)% burns %HIS_HER(TARGET)% mentally more than physically. KSTR:(K++) = However, it was far too late for resistance at thispoint... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:307 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:307 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:307 = 3 ENDIF ;Otherwise IF (CFLAG:307 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% plays with %CALLNAME:TARGET%'s sensitive nubs, pinching and rubbing as %HE_SHE(MASTER)% pleases. WSTR:(K++) = [Hnnng! Ha! Ghnnn!] KSTR:(K++) = %CALLNAME:TARGET% attempts to hold back %HIS_HER(TARGET)% moans, unsuccessfully, as %CALLNAME:MASTER%'s fingers drive %HIS_HER(TARGET)% to madness... CFLAG:307 = 2 ENDIF ENDIF ;------------------------------------------------- ;8,Breast Caress ;------------------------------------------------- CASE 8 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:308 == 0 WSTR:(K++) = [No! Stay away from me!] KSTR:(K++) = Ignoring %CALLNAME:TARGET%'s protests, %CALLNAME:MASTER% moves in for a quick stroke of %HIS_HER(TARGET)% breasts. WSTR:(K++) = [Noooo! I haven't even let Tatsurou- ] KSTR:(K++) = %CALLNAME:TARGET% falls onto %HIS_HER(TARGET)% knees, clutching %HIS_HER(TARGET)% chest in shame... CFLAG:308 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:308 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = %CALLNAME:MASTER% motions for %CALLNAME:TARGET% to come closer. WSTR:(K++) = [? What is it, %CALLNAME:MASTER%?] KSTR:(K++) = %CALLNAME:TARGET% pads towards to %CALLNAME:MASTER% obediently. KSTR:(K++) = In a swift motion, %CALLNAME:MASTER% circles behind %HIM_HER(TARGET)%, KSTR:(K++) = hugging %HIS_HER(TARGET)% from behind and giving %HIS_HER(TARGET)% breast a light grope. WSTR:(K++) = [Kyah! Moh... ] KSTR:(K++) = %CALLNAME:TARGET% pouts, but doesn't seem all that displeased. WSTR:(K++) = [If you wanted to touch you only needed to ask, you know... ] WSTR:(K++) = [I-it's fine if it's you... ] ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = %CALLNAME:MASTER% strokes %HIS_HER(MASTER)% hand teasingly across %CALLNAME:TARGET%'s breasts... KSTR:(K++) = %HE_SHE(TARGET)% flinches, as if %HE_SHE(TARGET)% were in pain, but %HIS_HER(TARGET)% eyes betray anticipation. KSTR:(K++) = %CALLNAME:TARGET% leers at %CALLNAME:MASTER%'s hands greedily, hoping for more... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = %CALLNAME:MASTER% pushes %HIS_HER(MASTER)% hands up onto %CALLNAME:TARGET%'s shapely mounds. KSTR:(K++) = %HE_SHE(TARGET)% simply lowers %HIS_HER(TARGET)% head, unable to even bring up a protest. KSTR:(K++) = What was the point when it would only bring furt%HIS_HER(TARGET)% punishment? KSTR:(K++) = It was easier to let %HIM_HER(TARGET)% use %HIS_HER(TARGET)% body as if it was %HIS_HER(MASTER)% toy... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:308 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:308 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:308 = 3 ENDIF ;Otherwise IF (CFLAG:308 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = [Khh... ] KSTR:(K++) = %CALLNAME:TARGET% bit back %HIS_HER(TARGET)% anger as %CALLNAME:MASTER% brushes %HIS_HER(MASTER)% hands under %HIS_HER(TARGET)% breasts. WSTR:(K++) = (Now isn't the time to strike! I need to weat%HIS_HER(TARGET)% this!) WSTR:(K++) = (Tatsurou... I'll return to you for sure!) CFLAG:308 = 2 ENDIF ENDIF ;------------------------------------------------- ;9,Spread Labia ;------------------------------------------------- CASE 9 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:309 == 0 KSTR:(K++) = %CALLNAME:TARGET% sits on the bed, with %CALLNAME:MASTER% sitting opposite %HIM_HER(TARGET)%. KSTR:(K++) = %HE_SHE(TARGET)% grinds %HIS_HER(TARGET)% teeth in frustration at %CALLNAME:MASTER%'s latest order. WSTR:(K++) = [You... khh... ] KSTR:(K++) = Slowly, %HE_SHE(TARGET)% forces %HIM_HER(TARGET)%self to obey. KSTR:(K++) = Opening %HIS_HER(TARGET)% thighs, %CALLNAME:TARGET% then places %HIS_HER(TARGET)% fingers onto %HIS_HER(TARGET)% slit. KSTR:(K++) = Enduring the extreme embarrassment, %HE_SHE(TARGET)% opens %HIS_HER(TARGET)% honeypot for inspection. KSTR:(K++) = The shame makes %HIS_HER(TARGET)% want to die, and %HE_SHE(TARGET)% trembles with %HIS_HER(TARGET)% face bright red... CFLAG:309 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:309 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [Hey, is it really so nice to look at?] KSTR:(K++) = %CALLNAME:TARGET% asks, quietly. Despite having been subjected to worse, KSTR:(K++) = exposing %HIS_HER(TARGET)% most precious place was still deeply embarassing to %HIM_HER(TARGET)%. KSTR:(K++) = %CALLNAME:MASTER% nods vigorously, inspecting %HIS_HER(TARGET)% beautiful pussy with great enthusiasm. WSTR:(K++) = [Well... okay.] WSTR:(K++) = [Since it's you... stare as much as you want, okay?] WSTR:(K++) = [Pervert.] ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Hey, %CALLNAME:MASTER%... ] KSTR:(K++) = %CALLNAME:TARGET% raises a leg above %HIS_HER(TARGET)% head, in a fine demonstration of ninja flexibility. KSTR:(K++) = %HE_SHE(TARGET)% licks %HIS_HER(TARGET)% lips, one hand pushing %HIS_HER(TARGET)% leg up and the other pulling %HIS_HER(TARGET)% cunt in invitation. WSTR:(K++) = [Like what you see?~] KSTR:(K++) = %CALLNAME:TARGET% eyes %CALLNAME:MASTER% lustily, tempting %HIM_HER(TARGET)% for more... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [Kh.... ] KSTR:(K++) = Even now, even after all that had happened, KSTR:(K++) = thissimple act was still difficult for %CALLNAME:TARGET% to comply with. KSTR:(K++) = %HE_SHE(TARGET)% felt as if it were exposing not only %HIS_HER(TARGET)% most private of places, KSTR:(K++) = but baring %HIS_HER(TARGET)% soul for all to see. KSTR:(K++) = It burned %HIS_HER(TARGET)% from the inside out, but %CALLNAME:TARGET% had no choice. KSTR:(K++) = Slowly, %HE_SHE(TARGET)% pulled %HIS_HER(TARGET)% pussylips apart with both hands... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:309 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:309 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:309 = 3 ENDIF ;Otherwise IF (CFLAG:309 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = [... thisagain?] KSTR:(K++) = %CALLNAME:TARGET% trembles in a mixture of anger and embarrassment, KSTR:(K++) = as %CALLNAME:MASTER% orders %HIS_HER(TARGET)% to expose %HIM_HER(TARGET)%self. KSTR:(K++) = Even with a string of insults that a girl %HIS_HER(TARGET)% age should not be repeating, KSTR:(K++) = %HE_SHE(TARGET)% shakily complies, spreading %HIS_HER(TARGET)% folds apart for %CALLNAME:MASTER%'s satisfaction... CFLAG:309 = 2 ENDIF ENDIF ;------------------------------------------------- ;10,Breast Masturbation ;------------------------------------------------- CASE 10 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:310 == 0 WSTR:(K++) = [...] WSTR:(K++) = [Haaaaaa? Is there something wrong with your head?] WSTR:(K++) = [Are you stupid, or what? You brainless idiot. You mouthbreathing dumbass. ] KSTR:(K++) = %CALLNAME:TARGET% seems legitimately angry at thisrequest. KSTR:(K++) = Not that %HE_SHE(TARGET)% wasn't before, but thisparticular one seemed to have touched a nerve. KSTR:(K++) = %CALLNAME:MASTER% is slightly taken aback at %HIS_HER(TARGET)% fury, but steadfastly repeats %HIM_HER(TARGET)%self KSTR:(K++) = with the best poker face %HE_SHE(MASTER)% can manage. KSTR:(K++) = After a long moment, %CALLNAME:TARGET% sighs. WSTR:(K++) = [... are you really interested in this? Really? Hrmmph.] KSTR:(K++) = Despite %HIS_HER(TARGET)% reluctance, %HE_SHE(TARGET)% cups %HIS_HER(TARGET)% mounds in %HIS_HER(TARGET)% hands and attempts to pleasure %HIM_HER(TARGET)%self... CFLAG:310 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:310 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [... really?] WSTR:(K++) = [I'm not really sure you mean it.] WSTR:(K++) = [... I'll cry if you say you were lying later, okay?] KSTR:(K++) = It took %CALLNAME:MASTER% the better part of 10 minutes to convince %CALLNAME:TARGET% that, KSTR:(K++) = yes, %HE_SHE(MASTER)% did enjoy %HIS_HER(TARGET)% breasts, and yes, %HE_SHE(MASTER)% did want to see %HIS_HER(TARGET)% masturbate with them. KSTR:(K++) = %CALLNAME:MASTER% hugs %HIS_HER(TARGET)% chest close to %HIS_HER(MASTER)% face to push %HIS_HER(MASTER)% point further. WSTR:(K++) = [... dummy.] KSTR:(K++) = %CALLNAME:TARGET% whispers, cupping %HIS_HER(TARGET)% mounds toget%HIS_HER(TARGET)% and rubbing them on %CALLNAME:MASTER%'s face... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = On %CALLNAME:MASTER%'s request, %CALLNAME:TARGET% begins to rub %HIS_HER(TARGET)% womanly mounds... KSTR:(K++) = It doesn't take long for %HIS_HER(TARGET)% breathing to become haggard, KSTR:(K++) = %HIS_HER(TARGET)% nipples hardening and %HIS_HER(TARGET)% slit beginning to drip. KSTR:(K++) = Wistfully, %HE_SHE(TARGET)% looks towards %CALLNAME:MASTER%, %HIS_HER(TARGET)% hands move across %HIS_HER(TARGET)% breasts seductively. WSTR:(K++) = [... is thisenough for you?] KSTR:(K++) = %HE_SHE(TARGET)% practically pleads for more... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = When %CALLNAME:MASTER% issues %HIS_HER(MASTER)% order for %CALLNAME:TARGET% to show %HIM_HER(TARGET)% how %HE_SHE(TARGET)% masturbates with %HIS_HER(TARGET)% breasts, KSTR:(K++) = %HE_SHE(TARGET)% makes the most sullen face %HE_SHE(MASTER)% has seen for a while now. KSTR:(K++) = Despite having done far worse to %HIM_HER(TARGET)%, %CALLNAME:MASTER% wonders to %HIM_HER(TARGET)%self if %HE_SHE(MASTER)% has gone too far thistime, KSTR:(K++) = as the girl begins to rub %HIS_HER(TARGET)% mounds with a despondent expression... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:310 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:310 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:310 = 3 ENDIF ;Otherwise IF (CFLAG:310 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = [...] KSTR:(K++) = When %CALLNAME:MASTER% request a good show, %CALLNAME:TARGET% stares down at %HIS_HER(TARGET)% breasts with a conflicted expression. WSTR:(K++) = [You know... ] WSTR:(K++) = [They aren't very big, are they... ] KSTR:(K++) = %CALLNAME:MASTER% assures %CALLNAME:TARGET% that %HE_SHE(MASTER)% doesn't mind in the least. WSTR:(K++) = [I've heard that most people prefer them bigger, though... ] KSTR:(K++) = It takes %CALLNAME:MASTER% a little bit more time to persuade %CALLNAME:TARGET% to begin pleasuring %HIM_HER(TARGET)%self for %HIS_HER(MASTER)% sake... CFLAG:310 = 2 ENDIF ENDIF ;------------------------------------------------- ;11,Masturbation ;------------------------------------------------- CASE 11 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:311 == 0 WSTR:(K++) = [Kh.... ] WSTR:(K++) = (I can't believe I'm doing this... ) WSTR:(K++) = (Still, thisis better than having that pervert touch me... ) KSTR:(K++) = As promised, %CALLNAME:MASTER% simply stands back and watches as %CALLNAME:TARGET% clumsily tries to pleasure %HIM_HER(TARGET)%self. KSTR:(K++) = %HIS_HER(TARGET)% inexperience was almost cute, but getting %HIM_HER(TARGET)%self off wasn't the goal. KSTR:(K++) = The important part was that %HE_SHE(TARGET)% complied, and anything else was a bonus. WSTR:(K++) = [Mmm... ] KSTR:(K++) = %CALLNAME:TARGET% begins to lose %HIM_HER(TARGET)%self in %HIS_HER(TARGET)% masturbation, %HIS_HER(TARGET)% clit and nipples visibly hardening... CFLAG:311 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:311 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [%CALLNAME:MASTER%! Ha! Ha! %CALLNAME:MASTER%~ ] KSTR:(K++) = When %CALLNAME:MASTER% steps out to take a call, %CALLNAME:TARGET% begins to touch %HIM_HER(TARGET)%self out of longing for %CALLNAME:MASTER%. KSTR:(K++) = Biting %HIS_HER(TARGET)% lip, %CALLNAME:TARGET% squirts onto the bed with a shiver.... KSTR:(K++) = Just as %CALLNAME:MASTER% walks back in. KSTR:(K++) = The two lock eyes for a moment. WSTR:(K++) = [K-kill me! Just kill me! Nuuuooooooo!] KSTR:(K++) = %CALLNAME:TARGET% dives into %HIS_HER(TARGET)% pillow, legs flailing as %HE_SHE(TARGET)% wails in embarrassment... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Ha... hahnnnn... ha... ] KSTR:(K++) = %CALLNAME:TARGET% sits on the bed, desperately pinching %HIS_HER(TARGET)% bead and nipple. KSTR:(K++) = No matter how hard %HE_SHE(TARGET)% tried, %HE_SHE(TARGET)% could not quell the heat inside %HIM_HER(TARGET)%. KSTR:(K++) = Already the bedsheet was soaked in sweat and other fluids. KSTR:(K++) = %CALLNAME:MASTER% simply folds %HIS_HER(MASTER)% arms and watches %HIS_HER(TARGET)% unsuccessfully try to relieve %HIM_HER(TARGET)%self. ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = [Mmmm... ] KSTR:(K++) = Upon command from %HIS_HER(TARGET)% master, %CALLNAME:TARGET% begins to stroke %HIS_HER(TARGET)% slit. KSTR:(K++) = Well aware at thispoint of what is expected of %HIM_HER(TARGET)%, KSTR:(K++) = %CALLNAME:TARGET% puts on a good show of it, %HIS_HER(TARGET)% fingers exploring %HIM_HER(TARGET)%self thoroughly... ENDIF CFLAG:311 = 4 ENDIF ;Obedience LV3+ IF ABL:0 >= 3 && (CFLAG:311 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:311 = 3 ENDIF ;Otherwise IF (CFLAG:311 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = [Ha... what's the matter? Too much of a virgin to touch me yourself?] KSTR:(K++) = %CALLNAME:TARGET% instantly regrets %HIS_HER(TARGET)% backtalk when %CALLNAME:MASTER% makes to pounce onto %HIM_HER(TARGET)%. WSTR:(K++) = [Okay! Okay! I got it! I'll do it okay!] KSTR:(K++) = %CALLNAME:TARGET% begins to pinch %HIS_HER(TARGET)% clit and nipples, leaning slightly away from %CALLNAME:MASTER%... CFLAG:311 = 2 ENDIF ENDIF ;------------------------------------------------- ;12,Wing Caress ;------------------------------------------------- CASE 12 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:435 == 0 KSTR:(K++) = CFLAG:435 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:435 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:435 = 4 ENDIF ;Obedience LV3+ IF ABL:0 >= 3 && (CFLAG:435 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:435 = 3 ENDIF ;Otherwise IF (CFLAG:435 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:435 = 2 ENDIF ENDIF ;------------------------------------------------- ;13,Tail Caress ;------------------------------------------------- CASE 13 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:436 == 0 KSTR:(K++) = CFLAG:436 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:436 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:436 = 4 ENDIF ;Obedience LV3+ IF ABL:0 >= 3 && (CFLAG:436 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:436 = 3 ENDIF ;Otherwise IF (CFLAG:436 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:436 = 2 ENDIF ENDIF ;------------------------------------------------- ;14,Clit Caress ;------------------------------------------------- CASE 14 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:442 == 0 KSTR:(K++) = With a quick hand, %CALLNAME:MASTER% reaches for %CALLNAME:TARGET%'s clit, KSTR:(K++) = stroking it for a moment between two fingers. KSTR:(K++) = The Taimanin leaps back in surprise, blushing furiously. WSTR:(K++) = [Wh... I'll break your fingers if you try that again! Don't touch me! Pervert!] KSTR:(K++) = %CALLNAME:MASTER% has no intention of letting up, though. KSTR:(K++) = %HE_SHE(MASTER)% backs %HIS_HER(TARGET)% up into a corner, fingers wiggling and leering at %HIM_HER(TARGET)%... CFLAG:442 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:442 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [A-%CALLNAME:MASTER%! Haaa! Haa!] KSTR:(K++) = %CALLNAME:TARGET% wraps %HIS_HER(TARGET)% arms around %CALLNAME:MASTER% as %HE_SHE(TARGET)% lays on the bed. KSTR:(K++) = %HIS_HER(TARGET)% eyes gaze longingly at %HIM_HER(TARGET)%, dazed in raptured bliss and wet with longing. KSTR:(K++) = %CALLNAME:MASTER% continues to stroke and rub %HIS_HER(TARGET)% bead, KSTR:(K++) = fully intent on bringing %HIS_HER(TARGET)% to new heights of pleasure... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Khhh... hnngg... ha... ha... ] KSTR:(K++) = %CALLNAME:TARGET% clutches %HIS_HER(TARGET)% arms around %CALLNAME:MASTER% as %HE_SHE(MASTER)% molests %HIS_HER(TARGET)% bead. KSTR:(K++) = %HIS_HER(MASTER)% hand is almost soaked with dripping liquid. KSTR:(K++) = Moaning in lustful bliss is all %CALLNAME:TARGET% can manage as %CALLNAME:MASTER% continues to torment %HIM_HER(TARGET)%... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [Ha... ha... ha...] KSTR:(K++) = %CALLNAME:TARGET% purses %HIS_HER(TARGET)% lips, breathing heavily onto the bed. KSTR:(K++) = %HIS_HER(TARGET)% face reddens as %HE_SHE(TARGET)% struggles to mantain strength in %HIS_HER(TARGET)% legs, KSTR:(K++) = as %HE_SHE(TARGET)% presents %HIM_HER(TARGET)%self, even as %CALLNAME:MASTER% mercilessly torments %HIS_HER(TARGET)% clit. KSTR:(K++) = Rubbing, stroking and pinching, %CALLNAME:MASTER% ensures %HE_SHE(TARGET)% never gets used to the stimulation... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:442 = 4 ENDIF ;Obedience LV3+ IF ABL:0 >= 3 && (CFLAG:442 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:442 = 3 ENDIF ;Otherwise IF (CFLAG:442 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = [Kuh... ] KSTR:(K++) = %CALLNAME:TARGET% can do nothing but put up with the shame as %CALLNAME:MASTER% caresses %HIS_HER(TARGET)% bead. KSTR:(K++) = The combination of humiliation and arousal makes for a lovely expression on %HIS_HER(TARGET)% face. KSTR:(K++) = %CALLNAME:MASTER% can't help but break into a sneer as %HE_SHE(MASTER)% continues to molest %HIM_HER(TARGET)%... CFLAG:442 = 2 ENDIF ENDIF ;------------------------------------------------- ;15,Rub Butt ;------------------------------------------------- CASE 15 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:444 == 0 KSTR:(K++) = Ducking around %CALLNAME:TARGET%, %CALLNAME:MASTER% takes the chance to squeeze %HIS_HER(TARGET)% soft ass cheeks. WSTR:(K++) = [Hyah?!] KSTR:(K++) = %CALLNAME:TARGET% whirls around defensively, but the deed has already been done. WSTR:(K++) = [Kuh... ] KSTR:(K++) = %CALLNAME:TARGET% narrows %HIS_HER(TARGET)% eyes in frustration. WSTR:(K++) = [... I don't know how you managed to do that... ] WSTR:(K++) = [But you're not going to get my back again!] KSTR:(K++) = That sounded like a challenge that %CALLNAME:MASTER% was more than willing to accept. CFLAG:444 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:444 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = Taking a break, %CALLNAME:TARGET% offers to making something to drink. KSTR:(K++) = %HE_SHE(TARGET)% works on the small stove in %CALLNAME:MASTER%'s office. KSTR:(K++) = Presumably, %HE_SHE(TARGET)% is attempting to make tea. KSTR:(K++) = %CALLNAME:MASTER%, however, can only see a girl trying to ruin %HIS_HER(MASTER)% pot, KSTR:(K++) = by brewing black vinegar water. KSTR:(K++) = Still, %HE_SHE(TARGET)% only has the best of intentions, and %CALLNAME:MASTER% decides not to be too harsh. KSTR:(K++) = But at the same time, %HE_SHE(MASTER)% has to save %HIS_HER(MASTER)% precious pot somehow. KSTR:(K++) = In a moment of inspiration, %CALLNAME:MASTER% creeps behind %HIM_HER(TARGET)%, kissing %HIS_HER(TARGET)% neck and KSTR:(K++) = grabbing a handful of %HIS_HER(TARGET)% copious rear. WSTR:(K++) = [Kyah! .... moh, that was dangerous. What's the matter?] WSTR:(K++) = [Can't hold it any longer? Naughty~ %UNICODE(0x2661)%%UNICODE(0x2661)%] KSTR:(K++) = %CALLNAME:MASTER% successfully manages to save %HIS_HER(MASTER)% pot, by dragging %HIS_HER(TARGET)% back into the bedroom... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = %CALLNAME:MASTER% approaches %CALLNAME:TARGET% from behind, laying a hand on %HIS_HER(TARGET)% ass. WSTR:(K++) = [Hnng... ] KSTR:(K++) = %CALLNAME:TARGET% trembles and lets out a moan. KSTR:(K++) = ... did %HE_SHE(TARGET)% just cum a little? KSTR:(K++) = Impressed, %CALLNAME:MASTER%, continues to sink %HIS_HER(MASTER)% fingers into %CALLNAME:TARGET%'s rear. KSTR:(K++) = enjoying %HIS_HER(TARGET)% little twitches and reactions... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = %CALLNAME:MASTER% takes a moment for a short rest, sitting on the edge of the bed. KSTR:(K++) = Still, %HE_SHE(MASTER)% wants to make the most of %HIS_HER(MASTER)% time. KSTR:(K++) = %HE_SHE(MASTER)% instructs %CALLNAME:TARGET% precisely, to which %HE_SHE(TARGET)% widens %HIS_HER(TARGET)% eyes, KSTR:(K++) = then lowers %HIS_HER(TARGET)% eyelids in response. WSTR:(K++) = [... yes... master... ] KSTR:(K++) = Slowly, %HE_SHE(TARGET)% sinks to the floor next to %HIM_HER(TARGET)%, and presents %HIS_HER(TARGET)% ass. KSTR:(K++) = %CALLNAME:MASTER% takes a breat%HIS_HER(TARGET)% and uses %CALLNAME:TARGET%'s rear as a stress ball for the next few minutes... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:444 = 4 ENDIF ;Obedience LV3+ IF ABL:0 >= 3 && (CFLAG:444 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:444 = 3 ENDIF ;Otherwise IF (CFLAG:444 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = [Ku... ] KSTR:(K++) = %CALLNAME:TARGET% trembles with a whine as %CALLNAME:MASTER% runs %HIS_HER(MASTER)% hands over both of sides of %HIS_HER(TARGET)% impressive rear. KSTR:(K++) = %CALLNAME:MASTER% can't quite get enough of thisfeeling, and continues to grope %HIS_HER(TARGET)% until %HE_SHE(MASTER)% is satisfied... CFLAG:444 = 2 ENDIF ENDIF ;------------------------------------------------- ;99,Let Caress ;------------------------------------------------- CASE 99 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:462 == 0 WSTR:(K++) = [... and who would ever want to touch you?!] KSTR:(K++) = %CALLNAME:TARGET% turns away with a huff, folding %HIS_HER(TARGET)% arms. KSTR:(K++) = %CALLNAME:MASTER% cooly responds with an ultimatum. KSTR:(K++) = %HE_SHE(TARGET)% can be the one doing the touching, or %HE_SHE(TARGET)% can be the one who is touched. KSTR:(K++) = %CALLNAME:TARGET% takes a moment to process this... WSTR:(K++) = [Humph! Well... I guess it's better than having your greasy hands on my body.] KSTR:(K++) = With %HIS_HER(TARGET)% hands held out, and a blushing face full of frustration, KSTR:(K++) = %CALLNAME:TARGET% almost seems as if%HE_SHE(TARGET)% 's asking for a hug... CFLAG:462 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:462 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = %CALLNAME:TARGET% wordlessly strokes %CALLNAME:MASTER%'s chest. KSTR:(K++) = Gently, %HE_SHE(TARGET)% pushes %HIS_HER(TARGET)% head onto %HIM_HER(TARGET)%, and closes %HIS_HER(TARGET)% eyes. WSTR:(K++) = [... hey, %CALLNAME:MASTER%.] WSTR:(K++) = [... can we stay like thisfor a while?] ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [%CALLNAME:MASTER%~ %UNICODE(0x2661)%] KSTR:(K++) = %CALLNAME:TARGET% doesn't hesitate and goes straight for %CALLNAME:MASTER%'s crotch and chest. KSTR:(K++) = %HE_SHE(TARGET)% fondles them eagerly, watching like a hawk for any useful reactions. WSTR:(K++) = [How is this~ You like this~ ] KSTR:(K++) = Licking %HIS_HER(TARGET)% lips, %CALLNAME:TARGET% finds %HIM_HER(TARGET)%self enjoying what %CALLNAME:MASTER% has been doing to %HIS_HER(TARGET)% for some time. KSTR:(K++) = The thought of how far %HE_SHE(TARGET)% has fallen never even crossed %HIS_HER(TARGET)% mind... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [... as you wish.] KSTR:(K++) = %CALLNAME:TARGET% moves to rub %HIS_HER(TARGET)% chest on %CALLNAME:MASTER%'s back. KSTR:(K++) = %CALLNAME:MASTER% can feel %HIS_HER(TARGET)% swelling nubs with every movement. KSTR:(K++) = Of course, %CALLNAME:MASTER% also feels more horny by the moment... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:462 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:462 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:462 = 3 ENDIF ;Otherwise IF (CFLAG:462 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = [... you're surprisingly muscular, you know.] KSTR:(K++) = %CALLNAME:TARGET% mumbles, as %HE_SHE(TARGET)% feels various parts of %CALLNAME:MASTER%'s body. KSTR:(K++) = It takes a moment, then %HE_SHE(TARGET)% catches what %HE_SHE(TARGET)% said and fumbles out %HIS_HER(TARGET)% a recovery. WSTR:(K++) = [F-for some Society nerd, that is!] WSTR:(K++) = [Alllll the Taimanin men are bigger and stronger than you!] CFLAG:462 = 2 ENDIF ENDIF CASEELSE ENDSELECT ;------------------------------------------------- ;Generic Caress ;------------------------------------------------- IF !口上有無確認(0) K_CALL:K = TRAIN_MESSAGE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && !口上有無確認(0) ;WSTR:(K++) = ENDIF ENDIF ;================================================= ;Communication Commands ;================================================= ELSEIF RESULT == COMTYPE("コミュ系") SELECTCASE SELECTCOM ;------------------------------------------------- ;20,Kiss ;------------------------------------------------- CASE 20 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:312 == 0 WSTR:(K++) = [NOOOOO!] KSTR:(K++) = %CALLNAME:TARGET% trashes wildly on the bed, while %CALLNAME:MASTER% pressed down on %HIM_HER(TARGET)%. KSTR:(K++) = With an unyielding hunger, %CALLNAME:MASTER% plants kiss after kiss on %HIM_HER(TARGET)%. KSTR:(K++) = %CALLNAME:TARGET% throws %HIS_HER(TARGET)% head to the left and right, trying to evade %HIM_HER(TARGET)%, KSTR:(K++) = but eventually %CALLNAME:MASTER% manages to land one on %HIS_HER(TARGET)% lips. WSTR:(K++) = [Mmmph!] WSTR:(K++) = (Not even Tatsurou has! Tatsurou! No! Nooooo!) KSTR:(K++) = %CALLNAME:TARGET% begins to tear from the corners of %HIS_HER(TARGET)% eyes, KSTR:(K++) = once %CALLNAME:MASTER% mercilessly steals %HIS_HER(TARGET)% first kiss... CFLAG:312 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:312 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = Caught in a moment of passion, %CALLNAME:MASTER% lifts %CALLNAME:TARGET%'s chin towards %HIS_HER(MASTER)% lips. WSTR:(K++) = [W-wait! Is this- I'm not- only lovers can- mmmph!] KSTR:(K++) = %CALLNAME:MASTER% silences %HIS_HER(TARGET)% by locking %HIS_HER(TARGET)% mouth with %HIS_HER(MASTER)% own. KSTR:(K++) = Their tongues twist around each other, KSTR:(K++) = and while %CALLNAME:TARGET% resists at first, gradually %HE_SHE(TARGET)% begins to flush red, KSTR:(K++) = leaning into %CALLNAME:MASTER% as %HE_SHE(TARGET)% burned for more. KSTR:(K++) = When they finally part, %CALLNAME:TARGET% blurrily smiles at %CALLNAME:MASTER% with a dazed look. WSTR:(K++) = [%CALLNAME:MASTER%... %UNICODE(0x2661)%] ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Mmmmh- mmmmgh- mmmmh-] KSTR:(K++) = %CALLNAME:TARGET% and %CALLNAME:MASTER% cling passionately onto each other as they kiss. KSTR:(K++) = They almost seem to devour each other, their tongues intertwining and saliva flowing freely. KSTR:(K++) = When they part, a trail of drool drips from both their mouths. KSTR:(K++) = %CALLNAME:TARGET% doesn't even draw back %HIS_HER(TARGET)% tongue, allowing it to hang lewdly from %HIS_HER(TARGET)% mouth... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [... yes.] WSTR:(K++) = (... how many times has it been by now?) KSTR:(K++) = %CALLNAME:TARGET% didn't know the answer, but %HE_SHE(TARGET)% knew it was meaningless to ask. KSTR:(K++) = At thispoint, %HIS_HER(TARGET)% lips no longer belonged to %HIM_HER(TARGET)%. KSTR:(K++) = They were %CALLNAME:MASTER%'s, to devour and violate at %HIS_HER(MASTER)% leisure. KSTR:(K++) = %CALLNAME:MASTER% continued to defile the resistanceless %CALLNAME:TARGET%... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:312 = 4 ENDIF ;Obedience LV3+ IF ABL:0 >= 3 && (CFLAG:312 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:312 = 3 ENDIF ;Otherwise IF (CFLAG:312 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:TARGET% still obviously dislikes the idea very much. KSTR:(K++) = But after %HIS_HER(TARGET)% first kiss, %CALLNAME:MASTER% manages to wear %HIS_HER(TARGET)% down. WSTR:(K++) = (Only the first one is important... only the first... ) WSTR:(K++) = (That means all these don't matter at all!) KSTR:(K++) = %CALLNAME:TARGET% tells %HIM_HER(TARGET)%self, %HIS_HER(TARGET)% coping mechanism against %CALLNAME:MASTER%'s raping of %HIS_HER(TARGET)% mouth... CFLAG:312 = 2 ENDIF ENDIF ;------------------------------------------------- ;21,Do Nothing ;------------------------------------------------- CASE 21 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:313 == 0 KSTR:(K++) = %CALLNAME:MASTER% pulls up a chair and sits, staring at %CALLNAME:TARGET%. KSTR:(K++) = Warily, %CALLNAME:TARGET% returns %HIS_HER(MASTER)% stare. KSTR:(K++) = Eventually the silence between them is too much for %HIM_HER(TARGET)%. WSTR:(K++) = [W-what's wrong? Aren't you going to do anything?] WSTR:(K++) = [N-not that I want you to, of course!] WSTR:(K++) = %CALLNAME:MASTER% calmly replies that %HE_SHE(TARGET)%'s not quite doing it for %HIM_HER(TARGET)% at the moment. WSTR:(K++) = In a flustered huff, %CALLNAME:TARGET% decides to indulge %CALLNAME:MASTER%'s silence with %HIS_HER(TARGET)% own stony indifference... CFLAG:313 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:313 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = %CALLNAME:MASTER% sits next to %CALLNAME:TARGET% on the bed. KSTR:(K++) = Silently, %HE_SHE(MASTER)% places %HIS_HER(MASTER)% hand over %HIM_HER(TARGET)%s. KSTR:(K++) = %CALLNAME:TARGET% blushes, but smiles, and overlaps %HIS_HER(TARGET)% fingers with %HIS_HER(MASTER)%. KSTR:(K++) = They spend a moment enjoying each other's company... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = Today we are going to be doing nothing at all, %CALLNAME:MASTER% declares. KSTR:(K++) = %CALLNAME:TARGET% simply opens %HIS_HER(TARGET)% eyes wide as if %HE_SHE(TARGET)% %HIS_HER(TARGET)% world was going to end. WSTR:(K++) = [No... no! Please! I want to feel you... I need to... ] KSTR:(K++) = Stammering over %HIM_HER(TARGET)%self, %HE_SHE(TARGET)% falls onto %HIS_HER(TARGET)% knees, begging %HIM_HER(TARGET)% with upturned eyes. KSTR:(K++) = %CALLNAME:MASTER% smiles, and decides to savour the moment. ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = %CALLNAME:MASTER% decides to take a moment's respite. KSTR:(K++) = Relief floods %CALLNAME:TARGET% as soon as %HE_SHE(TARGET)% realizes %HE_SHE(TARGET)% would not be KSTR:(K++) = subject to %CALLNAME:MASTER%'s torment, at least for a while. KSTR:(K++) = Still, the dull ache in %HIS_HER(TARGET)% loins tells %HIS_HER(TARGET)% that even if %HE_SHE(TARGET)% wanted to rest, KSTR:(K++) = %HIS_HER(TARGET)% body would still crave %CALLNAME:MASTER%'s touch. WSTR:(K++) = (... I hate what he's done to my body... ) KSTR:(K++) = %CALLNAME:TARGET% spends the time lamenting how far %HIS_HER(TARGET)% body has given way to %CALLNAME:MASTER%'s control... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:313 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:313 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:313 = 3 ENDIF ;Otherwise IF (CFLAG:313 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% decides to take a short break. KSTR:(K++) = As %HE_SHE(MASTER)% sits on the bed, relaxing, %CALLNAME:TARGET%'s eyes dart across the room. KSTR:(K++) = %CALLNAME:MASTER% notices %HIS_HER(TARGET)% desperately trying to look for a way to overcome %HIM_HER(TARGET)%, of course. KSTR:(K++) = Looks like %HE_SHE(MASTER)% couldn't afford to rest for too long... CFLAG:313 = 2 ENDIF ENDIF ;------------------------------------------------- ;22,Conversation (Affection/Love) ;------------------------------------------------- CASE 22 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:314 == 0 WSTR:(K++) = (Ahh.... ) KSTR:(K++) = %CALLNAME:TARGET%'s eyes open with the sudden realization. WSTR:(K++) = [I think I love you.] KSTR:(K++) = %HE_SHE(TARGET)% mumbles. KSTR:(K++) = %CALLNAME:MASTER% gawks at %HIM_HER(TARGET)%, KSTR:(K++) = surprised by %HIS_HER(TARGET)% sudden confession in the middle of a trifling conversation. KSTR:(K++) = It takes a moment, but %CALLNAME:TARGET% realizes what %HE_SHE(TARGET)% had just said. KSTR:(K++) = %HIS_HER(TARGET)% eyes shoot open wide, and %HIS_HER(TARGET)% face flusters with a maiden's blush. WSTR:(K++) = [No! Wait! That's not what I meant! I- I meant I LOATHE you!] WSTR:(K++) = [N-no! I don't hate you either! Khhhhh!] WSTR:(K++) = [Why are you laughing! You know exactly what I mean! Idiot! Dummy!] KSTR:(K++) = %CALLNAME:TARGET% pouts as %CALLNAME:MASTER% chuckles at %HIS_HER(TARGET)% performance, patting %HIS_HER(TARGET)% head gently. CFLAG:314 = 1 ;Second onward ELSEIF CFLAG:314 < 2 || FLAG:7 == 2 KSTR:(K++) = %CALLNAME:TARGET% and %CALLNAME:MASTER% have a conversation about nothing much at all. KSTR:(K++) = Still, they enjoyed each other's company... KSTR:(K++) = %CALLNAME:TARGET% smiles at %CALLNAME:MASTER% like a maiden in love. CFLAG:314 = 2 ENDIF ;------------------------------------------------- ;23,Gift　(Affection/Love) ;------------------------------------------------- CASE 23 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:315 == 0 WSTR:(K++) = [E-eh?] KSTR:(K++) = %CALLNAME:TARGET% looks at %CALLNAME:MASTER%, stunned at what %HE_SHE(TARGET)% just recieved. WSTR:(K++) = [W- did you really? Did YOU just give me... ?] KSTR:(K++) = Apparently %HE_SHE(TARGET)% had thought %CALLNAME:MASTER% was more the time to take than to give. KSTR:(K++) = ... well, given what %HE_SHE(MASTER)% had done up to thispoint, it was only natural. KSTR:(K++) = %CALLNAME:MASTER% resolved to prepare more gifts, if only to see the beaming smile on %CALLNAME:TARGET%'s face again... CFLAG:315 = 1 ;Second onward ELSEIF CFLAG:315 < 2 || FLAG:7 == 2 KSTR:(K++) = When %CALLNAME:TARGET% recieves %CALLNAME:MASTER%'s present, %HE_SHE(TARGET)% smiles at %HIM_HER(TARGET)% gleefully. WSTR:(K++) = [Ehe~ %UNICODE(0x2661)% I love it.] KSTR:(K++) = %CALLNAME:TARGET% almost dances with pleasure at %HIS_HER(TARGET)% new gift. CFLAG:315 = 2 ENDIF ;------------------------------------------------- ;24,Skinship　(Affection/Love) ;------------------------------------------------- CASE 24 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:316 == 0 KSTR:(K++) = Suddenly, %CALLNAME:MASTER% takes %CALLNAME:TARGET%'s hand. KSTR:(K++) = %HE_SHE(MASTER)% squeezes it tightly and meaningfully. KSTR:(K++) = %CALLNAME:TARGET% gapes at %HIM_HER(TARGET)%, then quickly turns away. WSTR:(K++) = [... idiot.] KSTR:(K++) = %HIS_HER(TARGET)% reddened ears seen from behind told %CALLNAME:MASTER% everything %HE_SHE(MASTER)% needed to know. CFLAG:316 = 1 ;Second onward ELSEIF CFLAG:316 < 2 || FLAG:7 == 2 KSTR:(K++) = %CALLNAME:TARGET% and %CALLNAME:MASTER% embrace each other. WSTR:(K++) = (... I love feeling %HIS_HER(MASTER)% warmth.) WSTR:(K++) = (... is thiswhat all lovers feel?) WSTR:(K++) = (... no wonder they're always doing it in public.) WSTR:(K++) = (... ah... I want stay like thisforever... ) CFLAG:316 = 2 ENDIF ;------------------------------------------------- ;25,Relax　(Affection/Love) ;------------------------------------------------- CASE 25 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:317 == 0 WSTR:(K++) = [Hey, we have some time, don't we?] WSTR:(K++) = [... can we just sit here and, I don't know, have some tea?] WSTR:(K++) = [You still have those snacks from that mission in Tokyo a while ago, don't you?] WSTR:(K++) = [I think we still have some tea... oh, don't get up, I'll make it.] KSTR:(K++) = %CALLNAME:MASTER% and %CALLNAME:TARGET% enjoy a tea break after %CALLNAME:MASTER% speedily cuts %HIS_HER(TARGET)% off from going into the kitchen... CFLAG:317 = 1 ;Second onward ELSEIF CFLAG:317 < 2 || FLAG:7 == 2 WSTR:(K++) = [... fufu~] KSTR:(K++) = %CALLNAME:TARGET% gently strokes %CALLNAME:MASTER%'s head as %HE_SHE(MASTER)% uses %HIS_HER(TARGET)% lap as a pillow. KSTR:(K++) = %CALLNAME:MASTER% finds %HIM_HER(TARGET)%self dozing off, as %CALLNAME:TARGET% smiles down at %HIM_HER(TARGET)%... CFLAG:317 = 2 ENDIF ;------------------------------------------------- ;26,Housework　(Affection/Love) ;------------------------------------------------- CASE 26 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:318 == 0 WSTR:(K++) = [Ah?] KSTR:(K++) = You are a mess. %CALLNAME:MASTER% repeats %HIM_HER(TARGET)%self to %CALLNAME:TARGET%. KSTR:(K++) = %CALLNAME:TARGET% sat to one side of the office couch, snack wrappers and magazines strewn all over. WSTR:(K++) = [... wasn't all thisstuff here before I got here?] KSTR:(K++) = %HE_SHE(TARGET)% makes an innocent face, pretending to not know what %HE_SHE(MASTER)% meant. KSTR:(K++) = A few hard knocks to the head later, %CALLNAME:TARGET% sweeps up the trash while pouting. CFLAG:318 = 1 ;Second onward ELSEIF CFLAG:318 < 2 || FLAG:7 == 2 KSTR:(K++) = %CALLNAME:MASTER% and %CALLNAME:TARGET% do the laundry together. KSTR:(K++) = When %CALLNAME:MASTER% isn't look, %CALLNAME:TARGET% takes %HIS_HER(TARGET)% chance to inhale %CALLNAME:MASTER%'s shirt deeply. WSTR:(K++) = (Khhh... thissmell... I can't get enough... ) CFLAG:318 = 2 ENDIF ;------------------------------------------------- ;27,Practice Singing　(Affection/Love) ;------------------------------------------------- CASE 27 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:319 == 0 KSTR:(K++) = For the first time, %CALLNAME:MASTER% invites %CALLNAME:TARGET% to karaoke. WSTR:(K++) = [Okay~ I'm pretty good at this, you know?] WSTR:(K++) = [Make sure you don't fall for me later, okay? %UNICODE(0x2661)%] KSTR:(K++) = ... KSTR:(K++) = After an hour, %CALLNAME:MASTER% makes the excuse that they've run out of time and makes a hasty retreat. WSTR:(K++) = [H-hm! After that, I'm sure he's been charmed by my heavenly vocals!] KSTR:(K++) = %CALLNAME:TARGET% makes a triumphant smile, not noticing %CALLNAME:MASTER% stagger away... CFLAG:319 = 1 ;Second onward ELSEIF CFLAG:319 < 2 || FLAG:7 == 2 KSTR:(K++) = %CALLNAME:MASTER% drags out the karaoke set and has a fun time with %CALLNAME:TARGET%. KSTR:(K++) = The office wasn't made for it, though. KSTR:(K++) = %CALLNAME:MASTER% was sure he'd be hearing from the neighbours tomorrow, but that didn't really matter. CFLAG:319 = 2 ENDIF ;------------------------------------------------- ;28,Abuse ;------------------------------------------------- CASE 28 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:320 == 0 KSTR:(K++) = %CALLNAME:MASTER% leans forward, whispering degrading insults into %CALLNAME:TARGET%'s ear. KSTR:(K++) = %HIS_HER(TARGET)% face contorts with anger and resistance, but %HE_SHE(TARGET)% knows better than to respond. WSTR:(K++) = (Khhh! thispig! I'm going to fill %HIM_HER(TARGET)% full of holes once I get free!) CFLAG:320 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:320 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = In a moment of heat, %CALLNAME:MASTER% yells at %CALLNAME:TARGET%. WSTR:(K++) = [Kuh... ] KSTR:(K++) = %HIS_HER(TARGET)% eyes well up with tears, deeply hurt at %CALLNAME:MASTER%'s insult. WSTR:(K++) = [Why did you say that to me? I thought you were... ] KSTR:(K++) = %CALLNAME:TARGET% almost wished for %CALLNAME:MASTER%'s violence. At least that would hurt less. ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = %CALLNAME:MASTER% tells %CALLNAME:TARGET% what %HE_SHE(TARGET)% is. KSTR:(K++) = A whore. A bitch. A lust-crazed sow. KSTR:(K++) = %CALLNAME:TARGET% didn't look like %HE_SHE(TARGET)% cared. Perhaps %HE_SHE(TARGET)% knew %HE_SHE(MASTER)% was completely right. KSTR:(K++) = With an almost smug expression, %HE_SHE(TARGET)% lifted %HIS_HER(TARGET)% chin. WSTR:(K++) = [... and what are you going to be doing to thissow of yours? %UNICODE(0x2661)%] ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = %CALLNAME:MASTER% leans forward, spewing abuse into %CALLNAME:TARGET%'s ear. KSTR:(K++) = %HIS_HER(TARGET)% lips quiver, but %HE_SHE(TARGET)% offers no rebuke. WSTR:(K++) = (The first time %HE_SHE(MASTER)% insulted, I was furious... ) WSTR:(K++) = (Now I don't even feel anything at all... ) WSTR:(K++) = (... how much has %HE_SHE(MASTER)% taken from me?) ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:320 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:320 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:320 = 3 ENDIF ;Otherwise IF (CFLAG:320 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% shouts abuse at %CALLNAME:TARGET%. KSTR:(K++) = %HE_SHE(TARGET)% cringes, but cannot do anything but take it. WSTR:(K++) = (I have to wait! Have patience! I'll break free and kill %HIM_HER(MASTER)% in time!) CFLAG:320 = 2 ENDIF ENDIF ;------------------------------------------------- ;29,Watch Video　(Fallen) ;------------------------------------------------- CASE 29 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:321 == 0 ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [Huh?!] KSTR:(K++) = %CALLNAME:TARGET% contorts %HIS_HER(TARGET)% face when %CALLNAME:MASTER% states %HIS_HER(MASTER)% agenda today. KSTR:(K++) = In %HIS_HER(MASTER)% hand was a DVD of a fairly popular AV. KSTR:(K++) = %CALLNAME:MASTER%'s favourite, in fact. WSTR:(K++) = [... so you'd rat%HIS_HER(TARGET)% watch some big tittied whore than-!] KSTR:(K++) = It took some time for %CALLNAME:MASTER% to explain that thisjust something %HE_SHE(MASTER)% wanted to share with %HIM_HER(TARGET)%... KSTR:(K++) = Later on, %CALLNAME:TARGET% begrudingly concedes that it wasn't totally uninteresting... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = %CALLNAME:MASTER% has a surprise for %CALLNAME:TARGET% today. KSTR:(K++) = On the hotel TV, %HE_SHE(MASTER)% plays a recording of their first training session. KSTR:(K++) = %CALLNAME:TARGET% watches, transfixed. KSTR:(K++) = The sight of %CALLNAME:MASTER%'s hands violating %HIS_HER(TARGET)% sent shivers down %HIS_HER(TARGET)% spine. WSTR:(K++) = [Hey, master... ] KSTR:(K++) = After the video, %CALLNAME:TARGET% peeks at %CALLNAME:MASTER% with a blushing face. KSTR:(K++) = %HE_SHE(TARGET)% didn't even need to finish %HIS_HER(TARGET)% sentence. KSTR:(K++) = The wet spot under %HIS_HER(TARGET)% on the bed told %CALLNAME:MASTER% everything %HE_SHE(MASTER)% needed to know... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = Today, %CALLNAME:MASTER% has something special for %CALLNAME:TARGET%. KSTR:(K++) = On the hotel TV, %HE_SHE(MASTER)% plays a recording of an auction, based in Yomihara. KSTR:(K++) = Not just any auction, but one where women were sold as if cattle. KSTR:(K++) = The sight of the debased and used whores being traded like cards KSTR:(K++) = filled %CALLNAME:TARGET% with dread. KSTR:(K++) = When %CALLNAME:MASTER% mentions how %HE_SHE(TARGET)% should behave to avoid thisfate, KSTR:(K++) = %CALLNAME:TARGET% instantly lowers %HIS_HER(TARGET)% head in absolute obedience... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ;WSTR:(K++) = ENDIF CFLAG:321 = 1 ;Second onward ELSEIF CFLAG:321 < 2 || FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = %CALLNAME:MASTER% and %CALLNAME:TARGET% curl up on the bed and watch some porn. KSTR:(K++) = Halfway through, %CALLNAME:TARGET% can't help but notice %CALLNAME:MASTER% getting fidgety. KSTR:(K++) = Smiling, %HE_SHE(TARGET)% creeps up next to %HIM_HER(TARGET)% and traces a finger around %HIS_HER(MASTER)% nipple. WSTR:(K++) = [... if you want, we can pause it and do %UNICODE(0x2661)%something %UNICODE(0x2661)%else... ] ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = %CALLNAME:TARGET% watches %HIS_HER(TARGET)% latest training session, as recorded by %CALLNAME:MASTER%. KSTR:(K++) = Unconciously, %HE_SHE(TARGET)% begins to drool, and %HIS_HER(TARGET)% hands wander over to %HIS_HER(TARGET)% most sensitive parts. KSTR:(K++) = It only takes a moment for %HIS_HER(TARGET)% moans to begin to echo over %HIM_HER(TARGET)%self... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = Once again, %CALLNAME:MASTER% and %CALLNAME:TARGET% watch a video of a woman being tormented in Yomihara. KSTR:(K++) = The sight of the poor woman, with an entranced expression on %HIS_HER(TARGET)% face, KSTR:(K++) = dancing with orifices stretched to impossible sizes, made %CALLNAME:TARGET% want to cry. WSTR:(K++) = (... in a sense, I might be grateful to %HIM_HER(TARGET)%.) WSTR:(K++) = (... at least, I probably won't meet thisfate. I can trust %HIM_HER(TARGET)% that much.) KSTR:(K++) = %CALLNAME:TARGET% desperately comforts %HIM_HER(TARGET)%self before the sight of an unsure future... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ;WSTR:(K++) = ENDIF CFLAG:321 = 2 ENDIF ;------------------------------------------------- ;30,Puff-Puff　(Fallen) ;------------------------------------------------- CASE 30 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:422 == 0 ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [R-really?! You want to-?] KSTR:(K++) = %CALLNAME:MASTER% nods. WSTR:(K++) = [W-well I'm not entirely against it, but... ] WSTR:(K++) = [You know... ] KSTR:(K++) = %CALLNAME:TARGET% stares at %CALLNAME:MASTER% with unsure, upturned eyes. WSTR:(K++) = [They're... not very big, okay! I'm still growing, so... ] WSTR:(K++) = [Well, if you're sure... ] KSTR:(K++) = %CALLNAME:TARGET% opens %HIS_HER(TARGET)% arms, inviting %CALLNAME:MASTER% to dive in face first... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Mmmm... ] KSTR:(K++) = %CALLNAME:MASTER% feels %CALLNAME:TARGET%'s breathing getting harder, as %HE_SHE(MASTER)% nuzzles %HIS_HER(MASTER)% face in %HIS_HER(TARGET)% boobs. KSTR:(K++) = ... is %HE_SHE(TARGET)% getting turned on from this? KSTR:(K++) = The feeling of %CALLNAME:TARGET%'s stiffening nubs on eit%HIS_HER(TARGET)% side of %HIS_HER(MASTER)% face seems to KSTR:(K++) = make %HIS_HER(TARGET)% lust more than evident... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [... yes, master.] KSTR:(K++) = Obediently, %CALLNAME:TARGET% opens %HIS_HER(TARGET)% arms to allow %CALLNAME:MASTER% to rub %HIS_HER(MASTER)% face in %HIS_HER(TARGET)% chest. KSTR:(K++) = But %HIS_HER(TARGET)% expression! KSTR:(K++) = It's been a while since %CALLNAME:MASTER% has seen such open rejection on %HIS_HER(TARGET)% face. KSTR:(K++) = Savouring thisrare moment, %CALLNAME:MASTER% huffs into %HIS_HER(TARGET)% boobs, KSTR:(K++) = feeling %HIS_HER(TARGET)% trembling at %HIS_HER(MASTER)% touch... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ;WSTR:(K++) = ENDIF CFLAG:422 = 1 ;Second onward ELSEIF CFLAG:321 < 2 || FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = %CALLNAME:MASTER% snuggles %HIS_HER(MASTER)% face into %CALLNAME:TARGET%'s chest. KSTR:(K++) = ... and draws back after a moment. KSTR:(K++) = With a straight face, %CALLNAME:MASTER% comments about how there really isn't much there. KSTR:(K++) = %CALLNAME:MASTER%'s playful teasing earns %HIM_HER(TARGET)% some almost serious blows from %CALLNAME:TARGET%... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Mmm... ] KSTR:(K++) = %CALLNAME:TARGET% purrs restlessly as %CALLNAME:MASTER% rubs %HIS_HER(MASTER)% face on %HIS_HER(TARGET)% breasts. KSTR:(K++) = %CALLNAME:MASTER% enjoys the feeling of %CALLNAME:TARGET%'s soft mounds, KSTR:(K++) = all while feeling %HIS_HER(MASTER)% own growing desire for more... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = %CALLNAME:TARGET% can offer no resistance as %CALLNAME:MASTER% rubs %HIS_HER(MASTER)% face into %HIS_HER(TARGET)% tits. WSTR:(K++) = (To think I let %HIM_HER(TARGET)% do this... ) WSTR:(K++) = (At thispoint, I've completely given up, haven't I?) KSTR:(K++) = %CALLNAME:TARGET%'s internal conflict hurt %HIS_HER(TARGET)% a little. KSTR:(K++) = However, a part of %HIS_HER(TARGET)% could not deny submitting to %CALLNAME:MASTER%, KSTR:(K++) = was in a way, a big relief for %HIM_HER(TARGET)%... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ;WSTR:(K++) = ENDIF CFLAG:422 = 2 ENDIF CASEELSE ENDSELECT ;------------------------------------------------- ;Communication generic ;------------------------------------------------- IF !口上有無確認(0) K_CALL:K = TRAIN_MESSAGE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && !口上有無確認(0) ;WSTR:(K++) = ENDIF ENDIF ;================================================= ;Tool Commands ;================================================= ELSEIF RESULT == COMTYPE("道具系") SELECTCASE SELECTCOM ;------------------------------------------------- ;40,Rotor ;------------------------------------------------- CASE 40 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:322 == 0 WSTR:(K++) = [Hah?!] KSTR:(K++) = %CALLNAME:TARGET% adopts a fighting pose as %CALLNAME:MASTER% menacingly approaches %HIM_HER(TARGET)%. KSTR:(K++) = In both %HIS_HER(MASTER)% hands are electric rotors, which %HE_SHE(MASTER)% wiggles with an evil smile. WSTR:(K++) = [Khh! Don't even think about coming near me, pervert!] WSTR:(K++) = [If you touch me with those I'll break your fingers!] KSTR:(K++) = Such threats aren't enough to stop %CALLNAME:MASTER%, and %HE_SHE(MASTER)% suppresses %CALLNAME:TARGET% easily. KSTR:(K++) = The first rotor pushes against %HIS_HER(TARGET)% clit... WSTR:(K++) = [H-hyah! No! Nooooo!] CFLAG:322 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:322 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = %CALLNAME:MASTER% pushes a rotor on the edge of %CALLNAME:TARGET%'s slit. WSTR:(K++) = [Ahh! %CALLNAME:MASTER%... ] KSTR:(K++) = %CALLNAME:TARGET% presses onto %CALLNAME:MASTER%'s hand with %HIS_HER(TARGET)% own, pushing it up towards %HIM_HER(TARGET)%. KSTR:(K++) = Gasping, %HE_SHE(TARGET)% takes the rotor deep inside %HIM_HER(TARGET)%self, leaning onto %CALLNAME:MASTER% as %HE_SHE(TARGET)% does. WSTR:(K++) = [%CALLNAME:MASTER%... ] KSTR:(K++) = The Taimanin smiles at %HIM_HER(TARGET)%, happy to complied with %HIS_HER(MASTER)% intention... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = %CALLNAME:MASTER% presses a rotor onto %CALLNAME:TARGET%'s bead, drawing a sharp gasp. WSTR:(K++) = [Hm... %CALLNAME:MASTER%.... ] WSTR:(K++) = [That feels good.... ] WSTR:(K++) = [... can I have more?] KSTR:(K++) = %CALLNAME:MASTER% smirks to %HIM_HER(TARGET)%self, unable to deny the flushed-face Taimanin. KSTR:(K++) = %HIS_HER(MASTER)% free hand reaches to grab a handful of rotors... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [Ha.... ha... ] KSTR:(K++) = %CALLNAME:TARGET% moans, pushing the rotor onto %HIS_HER(TARGET)% clit. WSTR:(K++) = [Hnnng!] KSTR:(K++) = Despite having lightly cum, %CALLNAME:TARGET% was forbidden to drop the rotor. KSTR:(K++) = %HE_SHE(TARGET)% twists %HIS_HER(TARGET)% body in agony as %CALLNAME:MASTER% continues to torment %HIM_HER(TARGET)%... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:322 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:322 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:322 = 3 ENDIF ;Otherwise IF (CFLAG:322 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:TARGET% twists frantically, trying to get away from %CALLNAME:MASTER%. KSTR:(K++) = %HE_SHE(MASTER)% relentlessly pins %HIS_HER(TARGET)% down, though, and pushes the rotor against %HIS_HER(TARGET)% erect clitoris. WSTR:(K++) = [Ahhh! Stop! Noooo!] KSTR:(K++) = %CALLNAME:TARGET% writhes in combination of agony and pleasure... CFLAG:322 = 2 ENDIF ENDIF ;------------------------------------------------- ;41,E-Massager ;------------------------------------------------- CASE 41 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:323 == 0 WSTR:(K++) = [Eh? What are you going to do with that?] KSTR:(K++) = %CALLNAME:TARGET% stares in confusion at the massager in %CALLNAME:MASTER%'s hand. WSTR:(K++) = [Ehhh? A massage? For me? Well, that doesn't sound too bad... ] KSTR:(K++) = As %CALLNAME:TARGET% mulls it over, %CALLNAME:MASTER% flicks the switch. KSTR:(K++) = The buzzing machine approaches %CALLNAME:TARGET% menancingly... KSTR:(K++) = %HIS_HER(TARGET)% eyes widen as %CALLNAME:TARGET% comes to a sudden realization of what %CALLNAME:MASTER% intends to do. WSTR:(K++) = [To think I thought you had good intentions for onceeee!] WSTR:(K++) = [No! Ah! Ahn! Stop! Ahn~ ] CFLAG:323 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:323 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [Haa... ] KSTR:(K++) = %CALLNAME:TARGET% sighs as %CALLNAME:MASTER% runs the massager over %HIS_HER(TARGET)% back. WSTR:(K++) = [I didn't believe you when you said you were just going for a normal massage, but... ] WSTR:(K++) = [To think that even you'd be able to keep your word.] WSTR:(K++) = [Perhaps you're not such a lying scumbag after all ~ ] WSTR:(K++) = [W-wait! Where are you poking that thing!] WSTR:(K++) = [I just complimented you! Wa- ahn~ ] ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Haa... ha, hahn... ] KSTR:(K++) = %CALLNAME:TARGET% moans sexily as %CALLNAME:MASTER% pushes the massager against %HIS_HER(TARGET)% twitching lips. WSTR:(K++) = [Haa, %CALLNAME:MASTER% ~ %UNICODE(0x2661)%] KSTR:(K++) = Unable to control %HIM_HER(TARGET)%self, the Taimanin leans into %CALLNAME:MASTER%, to apply more pressure. WSTR:(K++) = [Hn!] KSTR:(K++) = %CALLNAME:TARGET% bites onto a finger and twitches as %HIS_HER(TARGET)% thighs drip with even more fluid... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = In the hotel room, only %CALLNAME:TARGET%'s heavy breathing and a buzzing sound can be heard. KSTR:(K++) = %CALLNAME:TARGET% stands perfectly still, as %CALLNAME:MASTER% runs the massager over %HIS_HER(TARGET)% slit. KSTR:(K++) = Every time %HE_SHE(TARGET)% comes, %CALLNAME:MASTER% mentally adds another minute on the timer, KSTR:(K++) = or so %HE_SHE(MASTER)% claims. KSTR:(K++) = In fact, %CALLNAME:TARGET% will be made to come over and over again until %CALLNAME:MASTER% is satisfied. KSTR:(K++) = Pushing the toy into %HIS_HER(TARGET)% clit, %CALLNAME:MASTER% smirks to %HIM_HER(TARGET)%self as the Taimanin shivers and moans... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:323 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:323 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:323 = 3 ENDIF ;Otherwise IF (CFLAG:323 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% pushes %CALLNAME:TARGET% against the wall. KSTR:(K++) = From %HIS_HER(TARGET)% position, %CALLNAME:TARGET% is unable to resist as %CALLNAME:MASTER% vibrates the toy KSTR:(K++) = against %HIS_HER(TARGET)% most sensitive parts. WSTR:(K++) = [Ahn- no- stop! Ahhhhn~ ] CFLAG:323 = 2 ENDIF ENDIF ;------------------------------------------------- ;42,Clit Cap ;------------------------------------------------- CASE 42 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:11 ;Performed for the first time IF CFLAG:324 == 0 KSTR:(K++) = Today, %CALLNAME:MASTER% introduces a new toy to %CALLNAME:TARGET%. KSTR:(K++) = %CALLNAME:TARGET% eyes it suspiciously. WSTR:(K++) = [And what are you going to do with that, pervert?] WSTR:(K++) = [Don't think I'm going to just lay back and let you use me as a toy!] KSTR:(K++) = Of course, %CALLNAME:MASTER% doesn't expect otherwise. KSTR:(K++) = %HE_SHE(MASTER)% restrains %HIS_HER(TARGET)% easily and pushes %HIS_HER(TARGET)% on the bed. KSTR:(K++) = Despite %HIS_HER(TARGET)% protests, %CALLNAME:MASTER% clamps the vibrating toy onto %CALLNAME:TARGET%'s clit, KSTR:(K++) = causing %HIS_HER(TARGET)% to scream in rage... CFLAG:324 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:324 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [Khh... ] KSTR:(K++) = %CALLNAME:TARGET% struggles against %CALLNAME:MASTER% as %HIS_HER(TARGET)% clit is tormented by the toy. WSTR:(K++) = [Ha, I don't k-know what's so fun about thisfor you!] WSTR:(K++) = [M-maybe- hnng- thisis your fetish? Is it that fun watching me squirm!] KSTR:(K++) = %CALLNAME:MASTER% confirms that it is indeed very fun. KSTR:(K++) = %CALLNAME:TARGET% wants to pout, but the pleasure from %HIS_HER(TARGET)% vibrating bead is very distracting... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Ha, ha, haaahnnn!] KSTR:(K++) = %CALLNAME:MASTER% stares at %CALLNAME:TARGET%'s dripping cunt. KSTR:(K++) = The clit cap is very effective, and the bed is already heavily stained. KSTR:(K++) = Despite having came multiple times by now, KSTR:(K++) = %CALLNAME:TARGET% still looked fixedly at %CALLNAME:MASTER%'s crotch as if wanting for more... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = Once again, %CALLNAME:MASTER% snaps the cap onto %CALLNAME:TARGET%'s bead. KSTR:(K++) = Once again, %HE_SHE(MASTER)% promises %HIS_HER(TARGET)% that as long as%HE_SHE(TARGET)% 's obedient, KSTR:(K++) = %HE_SHE(MASTER)% would remove it soon enough. KSTR:(K++) = %CALLNAME:TARGET% could not hide the remorse on %HIS_HER(TARGET)% face. KSTR:(K++) = There was little reason to trust %CALLNAME:MASTER%, but %HE_SHE(TARGET)% had no other choice... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:324 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:324 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:324 = 3 ENDIF ;Otherwise IF (CFLAG:324 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% clamps the vibrator onto %CALLNAME:TARGET%'s clit. WSTR:(K++) = [Khh... ] KSTR:(K++) = %CALLNAME:TARGET%'s growling does nothing to improve %HIS_HER(TARGET)% situation. KSTR:(K++) = At best it distracts %HIS_HER(TARGET)% from the growing stiumlation to %HIS_HER(TARGET)% bead... CFLAG:324 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% decides that %CALLNAME:TARGET% has had enough. KSTR:(K++) = Intending to free %HIS_HER(TARGET)% clit, %CALLNAME:MASTER% moves %HIS_HER(MASTER)% hand closer to %CALLNAME:TARGET%... WSTR:(K++) = [Stop! Don't touch me, pervert! I'll kick you!] KSTR:(K++) = Annoyed, %CALLNAME:MASTER% pulls it off with a yank, earning a scream from the Taimanin... ENDIF ENDIF ;------------------------------------------------- ;43,Onahole ;------------------------------------------------- CASE 43 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:12 ;Performed for the first time IF CFLAG:325 == 0 KSTR:(K++) = CFLAG:325 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:325 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:325 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:325 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:325 = 3 ENDIF ;Otherwise IF (CFLAG:325 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:325 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;44,Vibrator ;------------------------------------------------- CASE 44 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:13 ;Performed for the first time IF CFLAG:326 == 0 KSTR:(K++) = %CALLNAME:MASTER% looms over %CALLNAME:TARGET% with a vibrator in %HIS_HER(MASTER)% hand... KSTR:(K++) = The sight of it is enough to fill %HIS_HER(TARGET)% with fear. WSTR:(K++) = [... please! No! I haven't even... ] WSTR:(K++) = [... I'm still a virgin, so... ] WSTR:(K++) = [Just not that!] KSTR:(K++) = %CALLNAME:MASTER% is merciless, however, as %HE_SHE(MASTER)% holds %HIS_HER(TARGET)% down. KSTR:(K++) = Fighting against the struggling %CALLNAME:TARGET%, KSTR:(K++) = %CALLNAME:MASTER% pushes the vibrator in, slowly, tip first. KSTR:(K++) = %HIS_HER(TARGET)% pussy swallows the toy in, little by little, until it reaches %HIS_HER(TARGET)% hymen. WSTR:(K++) = [No- AHHHHHH!] KSTR:(K++) = %CALLNAME:TARGET% screams in rage and pain as the toy pierces %HIM_HER(TARGET)%. KSTR:(K++) = Fury peaks in %HIS_HER(TARGET)% and %HE_SHE(TARGET)% contorts %HIS_HER(TARGET)% face, glaring at %CALLNAME:MASTER%. WSTR:(K++) = ( thisbastard-!) WSTR:(K++) = (I'll kill %HIM_HER(MASTER)%! I'll kill %HIM_HER(MASTER)%! KILL %HIM_HER(MASTER)%!!) ;Virginity IF TALENT:0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ;Not a virgin ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [Hmm? What is it?] KSTR:(K++) = %CALLNAME:TARGET% turns around when %CALLNAME:MASTER% taps %HIS_HER(TARGET)% shoulder, KSTR:(K++) = only for %HIS_HER(TARGET)% cheek to bump into a pink vibrator. KSTR:(K++) = %HE_SHE(TARGET)% narrows %HIS_HER(TARGET)% eyes at the grinning %CALLNAME:MASTER%. WSTR:(K++) = [You... pervert! Idiot! Horny mutt!] KSTR:(K++) = %CALLNAME:MASTER% only widens %HIS_HER(MASTER)% grin, and advances while turning it on. KSTR:(K++) = %CALLNAME:TARGET% feels a strange mixture of apprehension and anticipation... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Hyah!] KSTR:(K++) = %CALLNAME:TARGET% squeals when %CALLNAME:MASTER% presses the vibrator against %HIS_HER(TARGET)% slick labia. KSTR:(K++) = %HE_SHE(MASTER)% teases %HIS_HER(TARGET)% with it, sliding it up and down. WSTR:(K++) = [Don't play with me, idiot... put it in already ~ %UNICODE(0x2661)%] KSTR:(K++) = %CALLNAME:MASTER% obliges, pushing the toy deep into %HIS_HER(TARGET)% core. WSTR:(K++) = [Haaahn!] KSTR:(K++) = And then, %HE_SHE(MASTER)% switches it on. WSTR:(K++) = [Haaaa!] ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [Haaa.... haaa... ] KSTR:(K++) = %CALLNAME:TARGET% pants uncontrollably as the rod penetrates %HIS_HER(TARGET)% to %HIS_HER(TARGET)% core. KSTR:(K++) = %CALLNAME:MASTER% has ordered %HIS_HER(TARGET)% not to move, KSTR:(K++) = and %HE_SHE(TARGET)% can do nothing to prevent the waves of pleasure coursing through %HIM_HER(TARGET)%. KSTR:(K++) = Every now and then %HE_SHE(TARGET)% shoots a look for mercy from %CALLNAME:MASTER%, KSTR:(K++) = but %HE_SHE(MASTER)% ignores %HIM_HER(TARGET)%, and continues to watch %HIS_HER(TARGET)% squirm... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = Today, %CALLNAME:MASTER% introduces %CALLNAME:TARGET% to a vibrator. KSTR:(K++) = The pink dildo vibrates menacingly in %CALLNAME:MASTER%'s hand. KSTR:(K++) = %CALLNAME:TARGET% widens %HIS_HER(TARGET)% eyes at it, then narrows them. WSTR:(K++) = [If you think you're going to- hey! Listen! To! Me!] KSTR:(K++) = %CALLNAME:MASTER% teases it along %HIS_HER(TARGET)% belly, then presses it against %HIS_HER(TARGET)% slit, KSTR:(K++) = causing a sensual moan to escape from %CALLNAME:TARGET%. WSTR:(K++) = [Haahn... wait, don't-] KSTR:(K++) = %CALLNAME:MASTER% then jams it into %HIS_HER(TARGET)% tight pussy, instantly causing a reaction. WSTR:(K++) = [HHAAHhhhh! Bastard! D-don't- hnnnnh!] ENDIF ENDIF CFLAG:326 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:326 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = %CALLNAME:MASTER% sits behind %CALLNAME:TARGET%, teasing %HIS_HER(TARGET)% with a vibrator. KSTR:(K++) = %HE_SHE(MASTER)% runs the toy down %HIS_HER(TARGET)% breasts, to %HIS_HER(TARGET)% belly, and then to %HIS_HER(TARGET)% slit. KSTR:(K++) = All while %CALLNAME:TARGET% cuddles %HIM_HER(TARGET)%self into %HIS_HER(MASTER)% chest, as if %HE_SHE(TARGET)% were a cat. KSTR:(K++) = Eventually, %CALLNAME:MASTER% slips the tip into %HIS_HER(TARGET)% pussy, then slowly pushes it in. WSTR:(K++) = [Mmmmh! Hahhn~ %UNICODE(0x2661)%] ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Ahhhn~ %UNICODE(0x2661)%] KSTR:(K++) = %CALLNAME:MASTER% teases %CALLNAME:TARGET% with a vibrator, KSTR:(K++) = twisting it inside %HIS_HER(TARGET)% as %HE_SHE(MASTER)% plants kisses all over %HIS_HER(TARGET)% tanned body. WSTR:(K++) = [ thisfeels so goooood... but... ] KSTR:(K++) = %CALLNAME:TARGET% drapes %HIS_HER(TARGET)% arms over %CALLNAME:MASTER%, lovingly staring into %HIS_HER(MASTER)% eyes. WSTR:(K++) = [I want more~ %UNICODE(0x2661)%] ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [Haaa.... haaa... ] KSTR:(K++) = %CALLNAME:TARGET% pants uncontrollably as the rod penetrates %HIS_HER(TARGET)% to %HIS_HER(TARGET)% core. KSTR:(K++) = %CALLNAME:MASTER% has ordered %HIS_HER(TARGET)% not to move, KSTR:(K++) = and %HE_SHE(TARGET)% can do nothing to prevent the waves of pleasure coursing through %HIM_HER(TARGET)%. KSTR:(K++) = Every now and then %HE_SHE(TARGET)% shoots a look for mercy from %CALLNAME:MASTER%, KSTR:(K++) = but %HE_SHE(MASTER)% ignores %HIM_HER(TARGET)%, and continues to watch %HIS_HER(TARGET)% squirm... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:326 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:326 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:326 = 3 ENDIF ;Otherwise IF (CFLAG:326 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% plays with %CALLNAME:TARGET% using a vibrator... KSTR:(K++) = The toy churns %HIS_HER(TARGET)% insides mercilessly, KSTR:(K++) = causing %HIS_HER(TARGET)% to squirm and twitch... WSTR:(K++) = [Ha! Haaa! T-take it out! Take it out- aaah!] CFLAG:326 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% pulls out the vibrator from %CALLNAME:TARGET%'s slick cunt. KSTR:(K++) = It drips with juices, leaving a wet trail... WSTR:(K++) = [Ha... ha... haaa... ] ENDIF ENDIF ;------------------------------------------------- ;45,Anal Vibrator ;------------------------------------------------- CASE 45 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:14 ;Performed for the first time IF CFLAG:327 == 0 KSTR:(K++) = With some effort, %CALLNAME:MASTER% forces %CALLNAME:TARGET% to bend over. KSTR:(K++) = In %HIS_HER(MASTER)% hand is a vibrating dildo, which %CALLNAME:TARGET% stares at in wide-eyed terror. KSTR:(K++) = Before %HE_SHE(TARGET)% can brace herself, %CALLNAME:MASTER% eases it into %HIS_HER(TARGET)% tender hole, little by little. WSTR:(K++) = [Hieeeee! That's the wrong- no, I mean, don't put things into me!] WSTR:(K++) = [I-I can feel it moving inside of me! Take it out!] KSTR:(K++) = %CALLNAME:MASTER%, of course, has no reason to listen to %HIS_HER(TARGET)% request. KSTR:(K++) = %HE_SHE(MASTER)% pushes it in a little deeper, drawing a pained squeal from %CALLNAME:TARGET%... CFLAG:327 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:327 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [Hnng... ] KSTR:(K++) = %CALLNAME:TARGET% sits on the bed, legs raised. KSTR:(K++) = %HIS_HER(TARGET)% ass is exposed, and a vibrator is quivering inside it. WSTR:(K++) = [This... this doesn't feel good, just so you know... ] WSTR:(K++) = [You're a real weirdo for being into this sort of thing... ] KSTR:(K++) = Despite %HIS_HER(TARGET)% protests, KSTR:(K++) = %CALLNAME:MASTER% can't help but notice %HIS_HER(TARGET)% face blushing with arousal, KSTR:(K++) = and %HIS_HER(TARGET)% stiffening nipples. WSTR:(K++) = [Well... if it's for you... then it's okay.] KSTR:(K++) = %CALLNAME:TARGET% pouts, while also looking at %CALLNAME:MASTER% as if hoping for some sort of reward... ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Hnnng!] KSTR:(K++) = %CALLNAME:MASTER% doesn't bother holding back. KSTR:(K++) = %CALLNAME:TARGET%'s asshole is trained enough to handle the huge toy. KSTR:(K++) = Without mercy, %HE_SHE(MASTER)% buries it as deep as it will go. WSTR:(K++) = [Ahhhnn~ I feel so full... %UNICODE(0x2661)%] WSTR:(K++) = [Please... drive me crazy, master... %UNICODE(0x2661)%%UNICODE(0x2661)%%UNICODE(0x2661)%] ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = %CALLNAME:MASTER% holds out a vibrator towards %CALLNAME:TARGET%. KSTR:(K++) = The size of the toy is impressively large, and it vibrates fiercely. KSTR:(K++) = While carefully watching %HIS_HER(TARGET)% reaction, KSTR:(K++) = %CALLNAME:MASTER% instructs %HIS_HER(TARGET)% to put it up %HIS_HER(TARGET)% ass. WSTR:(K++) = [... yes, master.] KSTR:(K++) = With trembling hands, %CALLNAME:TARGET% takes the toy, and bends over. KSTR:(K++) = %HIS_HER(TARGET)% ass pointing towards %CALLNAME:MASTER%, %HE_SHE(TARGET)% hides %HIS_HER(TARGET)% flinching, KSTR:(K++) = pushing the beast inside %HIS_HER(TARGET)%, little by little... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:327 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:327 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:327 = 3 ENDIF ;Otherwise IF (CFLAG:327 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% pushes a vibrator into %CALLNAME:TARGET%'s tender asshole. WSTR:(K++) = [Ow! Ow! S-stop! It hurts!] KSTR:(K++) = %CALLNAME:TARGET% squirms in pain from the intense stimulation... CFLAG:327 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% pulls the vibrator out from %CALLNAME:TARGET%'s fuckhole. WSTR:(K++) = [Hnnn! Haaa! Haaa!] KSTR:(K++) = %HIS_HER(TARGET)% sphincter is so tight the toy makes a loud pop as it slides out of her... ENDIF ENDIF ;------------------------------------------------- ;46,Anal Beads ;------------------------------------------------- CASE 46 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:15 ;Performed for the first time IF CFLAG:328 == 0 KSTR:(K++) = Today, %CALLNAME:MASTER% introduces a new tool. KSTR:(K++) = A set of rubber balls, connected to each other, KSTR:(K++) = each one bigger than the last. KSTR:(K++) = To %CALLNAME:TARGET%'s horror, %HE_SHE(MASTER)% applies lubrication onto it, KSTR:(K++) = smirking as %HE_SHE(MASTER)% enjoys %HIS_HER(TARGET)% reaction. WSTR:(K++) = [You're not planning to... no! Nooooo!] WSTR:(K++) = [Ahh! Ahhh! Hnnng!] KSTR:(K++) = As %CALLNAME:MASTER% forces each bead into %CALLNAME:TARGET%, KSTR:(K++) = %HE_SHE(TARGET)% clenches, making the ordeal even more painful... CFLAG:328 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:328 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [... you're not going to use that on me, are you?] WSTR:(K++) = [I don't even think I can take something that big... ] KSTR:(K++) = %CALLNAME:MASTER% laughs, finding %CALLNAME:TARGET%'s digust almost cute. KSTR:(K++) = %HE_SHE(MASTER)% justifies himself, that they won't know unless they try. KSTR:(K++) = With some persuasion, %CALLNAME:TARGET% holds %HIS_HER(TARGET)% ass cheeks open for %CALLNAME:MASTER%. WSTR:(K++) = [Hmm. Hnnng. Hmmm!] KSTR:(K++) = %CALLNAME:MASTER% slides in the beads, one by one... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = %CALLNAME:MASTER% places the tip of the bead against %CALLNAME:TARGET%'s anus and pushes forward. KSTR:(K++) = It slides inside easily, %HIS_HER(TARGET)% lubricated fuckhole greedily swallowing the toy. KSTR:(K++) = %CALLNAME:TARGET% bites %HIS_HER(TARGET)% lower lip, feeling the pressure on %HIS_HER(TARGET)% rectum. KSTR:(K++) = The strange sensation slowly starts feeling pleasurable, KSTR:(K++) = and %CALLNAME:TARGET% starts to tremble from the stimulation... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = %CALLNAME:MASTER% orders %CALLNAME:TARGET% to bend over. KSTR:(K++) = %CALLNAME:TARGET% obeys without a word. KSTR:(K++) = %HE_SHE(TARGET)% spreads %HIS_HER(TARGET)% cheeks open for %HIS_HER(MASTER)% inspection, KSTR:(K++) = already dreading what was going to happen. WSTR:(K++) = [... ha!] KSTR:(K++) = When the first bead slides in, %HE_SHE(TARGET)% lets out a small gasp. KSTR:(K++) = ... as punishment, %CALLNAME:MASTER% pushes in the rest faster and faster. KSTR:(K++) = %CALLNAME:TARGET% tries desperately to hold back %HIS_HER(TARGET)% voice, KSTR:(K++) = as %HE_SHE(TARGET)% trembles with pain and pleasure... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:328 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:328 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:328 = 3 ENDIF ;Otherwise IF (CFLAG:328 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% squeezes in the anal beads into %CALLNAME:TARGET%'s pink asshole. KSTR:(K++) = Every bead causes %HIS_HER(TARGET)% to squirm with resistance. KSTR:(K++) = %CALLNAME:MASTER% advises %HIS_HER(TARGET)% to relax, so it'll hurt less. WSTR:(K++) = [Why don't you just don't put it in instead!] WSTR:(K++) = [Pervert! Idiot!] CFLAG:328 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% eases out the beads from %CALLNAME:TARGET%. KSTR:(K++) = With each bead, %HE_SHE(TARGET)% shudders with pain and pleasure, KSTR:(K++) = gripping tightly onto the bedsheet as %HE_SHE(TARGET)% gasps. WSTR:(K++) = [Haa! Haaaa!] KSTR:(K++) = Suddenly, %CALLNAME:MASTER% fully yanks out the toy. WSTR:(K++) = [AHHHHH!] KSTR:(K++) = %CALLNAME:TARGET% tenses up with a slight anal orgasm... ENDIF ENDIF ;------------------------------------------------- ;47,Nipple Caps ;------------------------------------------------- CASE 47 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:16 ;Performed for the first time IF CFLAG:329 == 0 KSTR:(K++) = %CALLNAME:MASTER% handles two small suction cups. KSTR:(K++) = Flashing them at %CALLNAME:TARGET%, %HE_SHE(MASTER)% explains their purpose. WSTR:(K++) = [... you must be kidding me, pervert.] WSTR:(K++) = [As if I would ever let you put those on me!] KSTR:(K++) = %CALLNAME:TARGET% never had a choice in the matter, though. KSTR:(K++) = %CALLNAME:MASTER% easily restrains the struggling Taimanin, KSTR:(K++) = slowly lowering the cup onto %HIS_HER(TARGET)% nipple. WSTR:(K++) = [Mmmh!] KSTR:(K++) = %CALLNAME:TARGET% squirms in resistance as %HIS_HER(TARGET)% womanly tips are forcefully extended... CFLAG:329 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:329 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = %CALLNAME:TARGET% stares at %HIS_HER(TARGET)% chest, reflected in the bathroom mirror. KSTR:(K++) = Two suction caps hang off them, coercing %HIS_HER(TARGET)% nipples to peak. WSTR:(K++) = [... does %HE_SHE(MASTER)% really find this kind of thing... sexy?] KSTR:(K++) = Doubting herself, %HE_SHE(TARGET)% attempts what %HE_SHE(TARGET)% thinks are some sensual poses. KSTR:(K++) = As %HE_SHE(TARGET)% cups %HIS_HER(TARGET)% breasts up and puckers %HIS_HER(TARGET)% lips, KSTR:(K++) = %CALLNAME:MASTER% knocks on the door and opens it. KSTR:(K++) = Through the mirror, they lock eyes for a moment. KSTR:(K++) = Before %CALLNAME:MASTER% can process any of it, %HE_SHE(MASTER)% is kicked out of the bathroom, KSTR:(K++) = where embarassed wailing can be heard from behind the door... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = %CALLNAME:TARGET% leans against %CALLNAME:MASTER%, panting heavily. KSTR:(K++) = Rubbing %HIS_HER(TARGET)% stiffened peaks against %HIM_HER(MASTER)%, %HE_SHE(TARGET)% begs for more. WSTR:(K++) = [Look at my nipples... they're so perverted now... ] WSTR:(K++) = [Aren't you going to... take responsiblity? %UNICODE(0x2661)%] KSTR:(K++) = %CALLNAME:MASTER% obliges %HIS_HER(TARGET)%, teasing around %HIS_HER(TARGET)% areola, KSTR:(K++) = before clamping the nipple caps onto her. WSTR:(K++) = [Ahhnn! ~ %UNICODE(0x2661)%] ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = %CALLNAME:TARGET% is seated on a chair, one leg over each arm. KSTR:(K++) = %HIS_HER(TARGET)% entire body is exposed at %CALLNAME:MASTER%'s mercy. KSTR:(K++) = Blushing and trembling, %HIS_HER(TARGET)% body jolts when Anon KSTR:(K++) = snaps the nipple caps over %HIS_HER(TARGET)% peaks. WSTR:(K++) = [Haa!] KSTR:(K++) = As %HIS_HER(TARGET)% nipples engorge, %HE_SHE(TARGET)% continues to tremble not only in fear, KSTR:(K++) = but also with a twinge of anticipation of %CALLNAME:MASTER%'s training... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:329 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:329 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:329 = 3 ENDIF ;Otherwise IF (CFLAG:329 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% squeezes the suctions only %CALLNAME:TARGET%'s nipples... KSTR:(K++) = The strong suction of the toys causes %HIS_HER(TARGET)% to moan in pain. WSTR:(K++) = [You... you better remember this when I get free.] KSTR:(K++) = %HE_SHE(TARGET)% growls at %CALLNAME:MASTER%, trying %HIS_HER(TARGET)% best to ignore the pleasure KSTR:(K++) = from %HIS_HER(TARGET)% stiffening peaks... CFLAG:329 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% pulls the nipple caps off %CALLNAME:TARGET%'s breasts. WSTR:(K++) = [Mmhhn! Hey, be more careful! They're pretty... sensitive, now!] KSTR:(K++) = The cool air causes %CALLNAME:TARGET%'s extended nipples to twitch lewdly... ENDIF ENDIF ;------------------------------------------------- ;48,Nipple Rotor ;------------------------------------------------- CASE 48 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:330 == 0 KSTR:(K++) = %CALLNAME:MASTER% forces %CALLNAME:TARGET% to sit on %HIS_HER(MASTER)% lap. KSTR:(K++) = In %HIS_HER(MASTER)% free hand is a buzzing rotor, which %HE_SHE(MASTER)% draws closer to %CALLNAME:TARGET%'s naked breast. WSTR:(K++) = [Khhh... don't think you're going to get away with this!] WSTR:(K++) = [When I get out I'm going to- hnn!] KSTR:(K++) = The rotor makes contact with %HIS_HER(TARGET)% bud, causing %HIS_HER(TARGET)% to flinch and struggle... CFLAG:330 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:330 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [Noooo~ Ah! Ha!] KSTR:(K++) = %CALLNAME:MASTER% showers %CALLNAME:TARGET%'s body with kisses as %HE_SHE(MASTER)% presses the rotor against %HIS_HER(TARGET)% bare nipple. KSTR:(K++) = In return, the Taimanin pants uncontrollably and pushes onto %CALLNAME:MASTER% wildly. KSTR:(K++) = %HIS_HER(TARGET)% legs wrap around %CALLNAME:MASTER%, unconsciously reluctant to let %HIM_HER(MASTER)% go. KSTR:(K++) = %CALLNAME:MASTER% responds in turn, moving behind %HIS_HER(TARGET)% to further attack %HIS_HER(TARGET)% breast and KSTR:(K++) = plant kisses on %HIS_HER(TARGET)% neck... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Haa... haa... haa... ] KSTR:(K++) = %CALLNAME:TARGET% can barely stand, and %HIS_HER(TARGET)% tongue hangs out lewdly as %HE_SHE(TARGET)% gasps. KSTR:(K++) = %HE_SHE(TARGET)% grasps onto %CALLNAME:MASTER% with one hand, the two vibrators on %HIS_HER(TARGET)% sensitive nipples KSTR:(K++) = wracking %HIS_HER(TARGET)% body with mini-orgasms. KSTR:(K++) = %HIS_HER(TARGET)% half-lidded eyes glaze over %CALLNAME:MASTER%, pleading %HIM_HER(MASTER)% for more... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = %CALLNAME:TARGET% lies naked on the hotel floor. KSTR:(K++) = Twin rotors are taped to %HIS_HER(TARGET)% nipples, causing endless waves KSTR:(K++) = of pleasure to course through her. KSTR:(K++) = Despite that, %HE_SHE(TARGET)% had been forbidden to touch herself. KSTR:(K++) = The stimulation of almost, but not quite, KSTR:(K++) = achieving release, drove %HIS_HER(TARGET)% to the breaking point. KSTR:(K++) = A wordless gasp escapes %HIS_HER(TARGET)% lips as tears pour down %HIS_HER(TARGET)% face... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:330 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:330 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:330 = 3 ENDIF ;Otherwise IF (CFLAG:330 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = [Ahhhn!] KSTR:(K++) = %CALLNAME:TARGET% gasps, and covers %HIS_HER(TARGET)% mouth, KSTR:(K++) = when %HE_SHE(TARGET)% unintentionally moans. KSTR:(K++) = %CALLNAME:MASTER% pauses, having just touched %HIS_HER(TARGET)% nipple with a rotor. KSTR:(K++) = %HE_SHE(MASTER)% raises an eyebrow at her. WSTR:(K++) = [... i-it's not what you think!] WSTR:(K++) = [I was just, surprised, that's all!] WSTR:(K++) = [Don't think you- hey! Stop that! Enou- ahhhn~ ] CFLAG:330 = 2 ENDIF ENDIF ;------------------------------------------------- ;49,Milker ;------------------------------------------------- CASE 49 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:17 ;Performed for the first time IF CFLAG:331 == 0 WSTR:(K++) = [... are you an idiot?] KSTR:(K++) = Despite herself, %CALLNAME:TARGET% sighs, dropping %HIS_HER(TARGET)% head. WSTR:(K++) = [You know nothing's going to come out, even if you try, right?] KSTR:(K++) = %CALLNAME:TARGET% refers to the breast pumps in %CALLNAME:MASTER%'s hands. KSTR:(K++) = %CALLNAME:MASTER% replies, saying that they wouldn't know unless they tried. KSTR:(K++) = %HE_SHE(MASTER)% also adds that as a side effect %HIS_HER(TARGET)% breasts might grow bigger... WSTR:(K++) = [Wh- my breasts are fine the way they are!] KSTR:(K++) = %CALLNAME:TARGET% snaps at %HIM_HER(MASTER)%, but gives the pumps a sideways look. WSTR:(K++) = [W-well, I guess there's no harm in trying... ] WSTR:(K++) = [But you better not be thinking anything perverted!] KSTR:(K++) = %CALLNAME:MASTER%, however, has nothing but pervy thoughts. KSTR:(K++) = %HE_SHE(MASTER)% promises %HE_SHE(MASTER)% doesn't, though, and sticks the pumps onto %CALLNAME:TARGET%... ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:331 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [Hnnn~ %UNICODE(0x2661)%] KSTR:(K++) = %CALLNAME:TARGET% lets out a low moan when the breast pump squeezes around %HIS_HER(TARGET)% teat. KSTR:(K++) = As the machine pulls %HIS_HER(TARGET)% nipple and areola in and out, KSTR:(K++) = %CALLNAME:MASTER% watches with some envy. KSTR:(K++) = A few drops of cloudy milk flow out and collect into the bottle. WSTR:(K++) = [Hey! Don't stare so hard! This isn't for you!] WSTR:(K++) = [... though, if you wanted to drink directly, I wouldn't say no... ] WSTR:(K++) = [H-hey! Careful! Don't just yank it off!] ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [AHHH! HNNN! AHHHH!] KSTR:(K++) = The room is filled with unrestrained screams coming from %CALLNAME:TARGET%. KSTR:(K++) = %HIS_HER(TARGET)% breasts are attached to an industrial strength milker. KSTR:(K++) = The machine cruelly pulls at %HIS_HER(TARGET)% teats, forcing milky secretions, KSTR:(K++) = pumping on them painfully. KSTR:(K++) = Yet despite the pain %CALLNAME:TARGET% drips with arousal, KSTR:(K++) = the floor stained with %HIS_HER(TARGET)% bodily fluids. KSTR:(K++) = %HIS_HER(TARGET)% tongue hands out loosely, and %HE_SHE(TARGET)% stares into space in sheer bliss... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [Khh... Hnnn... ] KSTR:(K++) = Pained groans come from %CALLNAME:TARGET%. KSTR:(K++) = With the milking machine sucking mechnically on %HIS_HER(TARGET)% teats, KSTR:(K++) = the resemblance to livestock cannot be denied. WSTR:(K++) = (... I hate this! I feel like a cow!) WSTR:(K++) = (... but it's too late for anything now.) WSTR:(K++) = (... maybe just giving in would be easier.... ) KSTR:(K++) = A sharp tug at %HIS_HER(TARGET)% nipples brings %HIS_HER(TARGET)% back with a gasp. KSTR:(K++) = Lacteal liquid flows through the plastic tubes as the milker collects the harvest. KSTR:(K++) = The sight of it fills %HIS_HER(TARGET)% with despair... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:331 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:331 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:331 = 3 ENDIF ;Otherwise IF (CFLAG:331 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% attaches the breast pumps onto %CALLNAME:TARGET%. KSTR:(K++) = The machine is efficient, pulling %HIS_HER(TARGET)% nipples and areola. WSTR:(K++) = [Hngg! Hnggg!] KSTR:(K++) = Not long after, the stimulation begins to draw milk from %HIS_HER(TARGET)% teats... CFLAG:331 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% pulls off the milkers from %CALLNAME:TARGET%'s breasts. KSTR:(K++) = They come off with a satisfying pop, alabaster fluid leaking from them. KSTR:(K++) = %CALLNAME:MASTER% can't help but lick a drop as a sample. KSTR:(K++) = Delicious. ENDIF ENDIF ;------------------------------------------------- ;109,Ejaculation Stopper ;------------------------------------------------- CASE 109 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:42 ;Performed for the first time IF CFLAG:464 == 0 KSTR:(K++) = CFLAG:464 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:464 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:464 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:464 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:464 = 3 ENDIF ;Otherwise IF (CFLAG:464 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:464 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CASEELSE ENDSELECT ;------------------------------------------------- ;Generic tool ;------------------------------------------------- IF !口上有無確認(0) K_CALL:K = TRAIN_MESSAGE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && !口上有無確認(0) ;WSTR:(K++) = ENDIF ENDIF ;================================================= ;Tool on self commands ;================================================= ELSEIF RESULT == COMTYPE("対調教者道具系") SELECTCASE SELECTCOM ;------------------------------------------------- ;50,Self Clit Cap ;------------------------------------------------- CASE 50 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:PLAYER:11 ;Performed for the first time IF CFLAG:453 == 0 KSTR:(K++) = CFLAG:453 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:453 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:453 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:453 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:453 = 3 ENDIF ;Otherwise IF (CFLAG:453 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:453 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;51,Self Onahole ;------------------------------------------------- CASE 51 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:PLAYER:12 ;Performed for the first time IF CFLAG:454 == 0 KSTR:(K++) = CFLAG:454 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:454 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:454 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:454 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:454 = 3 ENDIF ;Otherwise IF (CFLAG:454 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:454 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;52,Self Vibrator ;------------------------------------------------- CASE 52 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:PLAYER:13 ;Performed for the first time IF CFLAG:455 == 0 KSTR:(K++) = CFLAG:455 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:455 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:455 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:455 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:455 = 3 ENDIF ;Otherwise IF (CFLAG:455 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:455 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;53,Self Anal Vibrator ;------------------------------------------------- CASE 53 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:PLAYER:14 ;Performed for the first time IF CFLAG:456 == 0 KSTR:(K++) = CFLAG:456 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:456 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:456 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:456 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:456 = 3 ENDIF ;Otherwise IF (CFLAG:456 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:456 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;54,Self Anal Beads ;------------------------------------------------- CASE 54 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:PLAYER:15 ;Performed for the first time IF CFLAG:457 == 0 KSTR:(K++) = CFLAG:457 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:457 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:457 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:457 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:457 = 3 ENDIF ;Otherwise IF (CFLAG:457 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:457 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;55,Self Nipple Caps ;------------------------------------------------- CASE 55 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:PLAYER:16 ;Performed for the first time IF CFLAG:458 == 0 KSTR:(K++) = CFLAG:458 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:458 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:458 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:458 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:458 = 3 ENDIF ;Otherwise IF (CFLAG:458 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:458 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;56,Self Milker ;------------------------------------------------- CASE 56 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:PLAYER:17 ;Performed for the first time IF CFLAG:459 == 0 KSTR:(K++) = CFLAG:459 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:459 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:459 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:459 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:459 = 3 ENDIF ;Otherwise IF (CFLAG:459 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:459 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;196,Use Aphrodesiac ;------------------------------------------------- CASE 196 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:437 == 0 KSTR:(K++) = %CALLNAME:MASTER% narrows %HIS_HER(MASTER)% eyes at the suspicious bottle in front of him. KSTR:(K++) = %HE_SHE(MASTER)% had bought this on a whim from a hooded merchant in Yomihara. KSTR:(K++) = Supposedly, this was a powerful aphrodisiac, KSTR:(K++) = but %CALLNAME:MASTER% was concerned about potential side effects. KSTR:(K++) = %CALLNAME:TARGET% was a valuable Taimanin, after all... KSTR:(K++) = %CALLNAME:MASTER% had done some basic tests, but now %HE_SHE(MASTER)% had to see the practical usage. KSTR:(K++) = Swallowing the drug, %CALLNAME:MASTER% feels %HIS_HER(MASTER)% skin flush and %HIS_HER(MASTER)% crotch heat up. KSTR:(K++) = Well, the merchant wasn't lying about it being powerful, at least. KSTR:(K++) = %CALLNAME:MASTER% can barely contain himself, and slams the door open, KSTR:(K++) = jumping onto the startled %CALLNAME:TARGET%... CFLAG:437 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:437 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = In %CALLNAME:MASTER%'s hand is a specially made aphrodisiac pill. KSTR:(K++) = %HIS_HER(MASTER)% plan was to kiss %CALLNAME:TARGET%, then surprise %HIS_HER(TARGET)% by making %HIS_HER(TARGET)% swallow it. KSTR:(K++) = With wicked intention, %HE_SHE(MASTER)% slips the pill into %HIS_HER(MASTER)% mouth... KSTR:(K++) = BANG KSTR:(K++) = BANG KSTR:(K++) = BANG WSTR:(K++) = [Oiiii! How long are you going to take in there? I'm getting bored out here!] KSTR:(K++) = Startled, %CALLNAME:MASTER% swallows. Instantly, %HE_SHE(MASTER)% begins to feel the fire rising within him. KSTR:(K++) = %CALLNAME:MASTER% checks %HIS_HER(MASTER)% flushed, harrowed expression in the mirror. KSTR:(K++) = And then %HE_SHE(MASTER)% grins to himself. KSTR:(K++) = Well, this works too. KSTR:(K++) = %CALLNAME:MASTER% exits the bathroom to punish the impatient Taimanin with %HIS_HER(MASTER)% rock-hard erection... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = %CALLNAME:MASTER% uses Tarukaja! KSTR:(K++) = %CALLNAME:MASTER%'s attack rises! KSTR:(K++) = %CALLNAME:MASTER% uses Tarukaja! KSTR:(K++) = %CALLNAME:MASTER%'s attack rises! KSTR:(K++) = %CALLNAME:MASTER% uses Tarukaja! KSTR:(K++) = %CALLNAME:MASTER%'s attack rises! KSTR:(K++) = %CALLNAME:MASTER% uses Tarukaja! KSTR:(K++) = %CALLNAME:MASTER%'s attack rises! KSTR:(K++) = %CALLNAME:TARGET% gets excited at %CALLNAME:MASTER%'s aroused state! KSTR:(K++) = %CALLNAME:MASTER% attacks! ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = %CALLNAME:MASTER% swallows the bottle of suspicious medicine. KSTR:(K++) = %HIS_HER(MASTER)% already impressive erection grows even more towering. KSTR:(K++) = The overhead light of the hotel room casts a shadow of the colossus dick KSTR:(K++) = onto %CALLNAME:TARGET%'s face, causing %HIS_HER(TARGET)% to tremble in fear and dread... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:437 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:437 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:437 = 3 ENDIF ;Otherwise IF (CFLAG:437 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = %CALLNAME:MASTER% takes the aphrodisiac... KSTR:(K++) = Instantly, %HE_SHE(MASTER)% feels the heat burn through %HIS_HER(MASTER)% blood. KSTR:(K++) = %HIS_HER(MASTER)% heartbeat starts to rise, and lust starts to cloud %HIS_HER(MASTER)% mind... CFLAG:437 = 2 ENDIF ENDIF CASEELSE ENDSELECT ;------------------------------------------------- ;Gerneric tool on self ;------------------------------------------------- IF !口上有無確認(0) K_CALL:K = TRAIN_MESSAGE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && !口上有無確認(0) ;WSTR:(K++) = ENDIF ENDIF ;================================================= ;Sex commands ;================================================= ELSEIF RESULT == COMTYPE("Ｖ性交系") SELECTCASE SELECTCOM ;------------------------------------------------- ;60,Missionary ;------------------------------------------------- CASE 60 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:332 == 0 ;Virginity KSTR:(K++) = With some force, %CALLNAME:MASTER% grabs %CALLNAME:TARGET%'s legs. KSTR:(K++) = %HIS_HER(MASTER)% hungry eyes run over %HIS_HER(TARGET)% the seductive tanlines over %HIS_HER(TARGET)% body. KSTR:(K++) = Exposing %HIS_HER(MASTER)% throbbing member, %HIS_HER(MASTER)% intention can't be any clearer as %HE_SHE(MASTER)% pulls %HIS_HER(TARGET)% legs apart. WSTR:(K++) = [Eyaaaaah! G-get away from me! Don't touch me!] KSTR:(K++) = %CALLNAME:TARGET%'s useless struggling only serves to make %CALLNAME:MASTER% harder. KSTR:(K++) = %CALLNAME:MASTER% drives %HIS_HER(MASTER)% meat rod into %CALLNAME:TARGET%, teasing with only the tip at first, KSTR:(K++) = then ploughing the rest in all at once. KSTR:(K++) = %CALLNAME:MASTER%'s penis is soon covered with a mixture of virginal blood and fresh juices, KSTR:(K++) = with %CALLNAME:TARGET%'s cries filling the room and tears soaking %HIS_HER(TARGET)% face... IF TALENT:0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = (... am I really going to do this?) WSTR:(K++) = (It's really weird, isn't it?) WSTR:(K++) = (That I'm having my first time with such a person.... ) KSTR:(K++) = %CALLNAME:TARGET% lays naked on the bed, staring at %CALLNAME:MASTER% with a lovestruck expression. KSTR:(K++) = %HIS_HER(TARGET)% eyes are moist and %HIS_HER(TARGET)% face is flushed, as %CALLNAME:MASTER% takes %HIS_HER(TARGET)% maidenhood for the first time. WSTR:(K++) = [Ahhhh! Ahhhhhh!] WSTR:(K++) = (It hurts... but... ) WSTR:(K++) = (To think having my first time with someone I love this much would make me so happy... ) KSTR:(K++) = Despite the pain %HE_SHE(TARGET)% felt, a blissful smile blossoms on %CALLNAME:TARGET%'s face. KSTR:(K++) = The two of them continue to consummate their relationship... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = Today is the today. KSTR:(K++) = %CALLNAME:TARGET% lays on the bed, %HIS_HER(TARGET)% pussy already dripping invitingly as %HE_SHE(TARGET)% spreads it open for %CALLNAME:MASTER%. WSTR:(K++) = [Ha... ha... hurry... I want it... ] KSTR:(K++) = %HIS_HER(TARGET)% pent up lust drives %HIS_HER(TARGET)% crazy, and %HE_SHE(TARGET)% can't help but paw at herself in desperation. WSTR:(K++) = [Please... take this slut's first time and just fuck me up like crazy ~ %UNICODE(0x2661)%] KSTR:(K++) = Happy to oblige, %CALLNAME:MASTER% thrusts deep into her. WSTR:(K++) = [Ahhhhhn~!] KSTR:(K++) = %CALLNAME:TARGET% is so wet that %HE_SHE(TARGET)% doesn't even feel like a virgin. KSTR:(K++) = The room is quickly filled with the sounds of slapping flesh and pleasured moans... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [... ] KSTR:(K++) = %CALLNAME:TARGET%'s face is horrified when %CALLNAME:MASTER% commands %HIS_HER(TARGET)% to present %HIS_HER(TARGET)% chastity to him. KSTR:(K++) = Slowly, %HE_SHE(TARGET)% reaches down with trembling fingers, and spreads %HIS_HER(TARGET)% pussylips open. KSTR:(K++) = %CALLNAME:MASTER% confirms at a glance %HIS_HER(TARGET)% pink and untouched maidenhood, with %HIS_HER(TARGET)% hymen still intact. KSTR:(K++) = Nodding at %CALLNAME:TARGET%, %HE_SHE(MASTER)% looks at %HIS_HER(TARGET)% expectantly. WSTR:(K++) = [... please take my first time, m-master.] WSTR:(K++) = [E-everything of mine is yours to take...] KSTR:(K++) = %CALLNAME:TARGET% can't help but shiver when %CALLNAME:MASTER% takes out %HIS_HER(MASTER)% rock hard cock, KSTR:(K++) = %HIS_HER(TARGET)% submissiveness only making %HIM_HER(MASTER)% even hotter. WSTR:(K++) = [Ahhhhh!] KSTR:(K++) = %CALLNAME:TARGET% screams, then bites %HIS_HER(TARGET)% lip hard enough to draw blood, KSTR:(K++) = as %CALLNAME:MASTER% mercilessly pierces %HIS_HER(TARGET)% hymen in one go. KSTR:(K++) = %HIS_HER(TARGET)% moans and sobs overlap as %CALLNAME:MASTER% ploughs into %HIS_HER(TARGET)% again and again... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ;Not a virgin ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CFLAG:332 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:332 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [Anon... %UNICODE(0x2661)%] KSTR:(K++) = %CALLNAME:TARGET% pulls %CALLNAME:MASTER% in for a hug as %HE_SHE(MASTER)% penetrates her. WSTR:(K++) = (I feel so full... ) WSTR:(K++) = (I want to feel %HIM_HER(MASTER)% more and more... ) WSTR:(K++) = (I want to feel %HIM_HER(MASTER)% spreading inside of me... ) KSTR:(K++) = A sensual smile is on %HIS_HER(TARGET)% face, and %HE_SHE(TARGET)% closes %HIS_HER(TARGET)% eyes in happiness, KSTR:(K++) = as %HE_SHE(TARGET)% absorbs %CALLNAME:MASTER% in %HIS_HER(MASTER)% entirety. WSTR:(K++) = [Ahh... I love you, %CALLNAME:MASTER%... %UNICODE(0x2661)%] ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Ahhhh! Haa! Haaann!] KSTR:(K++) = %CALLNAME:TARGET% throws %HIS_HER(TARGET)% head back in pleasure as %CALLNAME:MASTER% pounds %HIS_HER(TARGET)% senseless. KSTR:(K++) = The bed quickly soaks in all sorts of bodily fluids, KSTR:(K++) = even saliva coming from %HIS_HER(TARGET)% loosely hanging tongue. WSTR:(K++) = [AAAHHHHH~ %UNICODE(0x2661)%] KSTR:(K++) = %CALLNAME:TARGET% arcs %HIS_HER(TARGET)% back and clutches at the bedsheets when %CALLNAME:MASTER% pushes all %HIS_HER(MASTER)% weight onto her, KSTR:(K++) = the massive orgasm sending a rush throughout %HIS_HER(TARGET)% whole body. KSTR:(K++) = %HIS_HER(TARGET)% eyes roll back and %HE_SHE(TARGET)% collapses onto the bed, panting, at %CALLNAME:MASTER%'s mercy... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [Hnn, hggn... ] KSTR:(K++) = As %CALLNAME:TARGET% lays on the bed, %CALLNAME:MASTER% lifts %HIS_HER(TARGET)% legs apart and drills into her. KSTR:(K++) = %CALLNAME:TARGET% offers no resistance when %HE_SHE(TARGET)% feels herself being penetrated. KSTR:(K++) = Despite herself, %HE_SHE(TARGET)% tries %HIS_HER(TARGET)% best to match %HIS_HER(MASTER)% pace, KSTR:(K++) = knowing it will only be over when %CALLNAME:MASTER% decides it's over. KSTR:(K++) = Every thrust fills %HIS_HER(TARGET)% with pleasure, and a twisted guilt for enjoying it. KSTR:(K++) = Even with %HIS_HER(TARGET)% best efforts, the room soon fills with the sound of %HIS_HER(TARGET)% moaning... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:332 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:332 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:332 = 3 ENDIF ;Otherwise IF (CFLAG:332 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:332 = 2 ENDIF ENDIF ;------------------------------------------------- ;61,Doggy Style ;------------------------------------------------- CASE 61 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:333 == 0 ;Virginity WSTR:(K++) = [No! What are you do- stop it!] KSTR:(K++) = %CALLNAME:MASTER% twists %CALLNAME:TARGET%'s arms behind %HIS_HER(TARGET)% back, forcing %HIS_HER(TARGET)% to bend over. KSTR:(K++) = %HIS_HER(TARGET)% plump pussy is at %HIS_HER(MASTER)% mercy, glistering invitingly. KSTR:(K++) = %CALLNAME:MASTER% can't help but lick %HIS_HER(MASTER)% lips at the sight. WSTR:(K++) = [No! Nooo! AHHHHHH!] KSTR:(K++) = %CALLNAME:TARGET% can only let out a strained wail as %CALLNAME:MASTER% viciously defiles %HIS_HER(TARGET)% purity. KSTR:(K++) = Tears pour down %HIS_HER(TARGET)% cheeks as %HE_SHE(TARGET)% sobs, KSTR:(K++) = %HIS_HER(TARGET)% first sexual experience being stolen in such a beastial way. KSTR:(K++) = The feeling of %CALLNAME:MASTER% inside %HIS_HER(TARGET)% fills %HIS_HER(TARGET)% with disgust and rage... IF TALENT:0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = (Hmm... ) WSTR:(K++) = (I wonder if I'm just not attractive... ?) WSTR:(K++) = (No! With a girl this cute in front of %HIM_HER(MASTER)%, the problem is with him!) WSTR:(K++) = (... then as expected, the problem is breast size, huh... ) KSTR:(K++) = %CALLNAME:TARGET% flops onto the couch, flipping open a woman's magazine. WSTR:(K++) = (We've done all kinds of things together, so why won't %HE_SHE(MASTER)% just take me!) WSTR:(K++) = (Khhh! This is so frustrating!!) KSTR:(K++) = As %CALLNAME:MASTER% opens the door, %HE_SHE(MASTER)% is greeted by the sight of %CALLNAME:TARGET% ass raise in the air, KSTR:(K++) = as %HE_SHE(TARGET)% sprawls onto on the couch. KSTR:(K++) = The alluring sight of %HIS_HER(TARGET)% is too tempting for %CALLNAME:MASTER%, and %HE_SHE(MASTER)% plants %HIS_HER(MASTER)% hands onto %HIS_HER(TARGET)% cheeks, KSTR:(K++) = causing %HIS_HER(TARGET)% to start. WSTR:(K++) = [Kyah! Oh, it's you. Don't just sneak in like that, mou... ] WSTR:(K++) = [Wait! Why are you taking off your-] WSTR:(K++) = [Wait! Wait! I'm not prepared for- ] WSTR:(K++) = [Noooo! Don't just pull it off- ] WSTR:(K++) = [Ahnnn~ %UNICODE(0x2661)%] WSTR:(K++) = WSTR:(K++) = Later, %CALLNAME:TARGET% throughly chews %CALLNAME:MASTER% out for taking %HIS_HER(TARGET)% first time by bending %HIS_HER(TARGET)% over the couch. KSTR:(K++) = [Idiot! If you do something like that again I'll beat you senseless!] KSTR:(K++) = [... though, it's not like it didn't feel good... ] KSTR:(K++) = [Haaaa?! Don't get ahead of yourself, dummy!] ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = When %CALLNAME:MASTER% enters the hotel room, %CALLNAME:TARGET% is already on the bed. KSTR:(K++) = %HIS_HER(TARGET)% naked ass is raised in the air, and %HE_SHE(TARGET)% wiggles it alluringly. KSTR:(K++) = With a coquettish wink and a finger pulling at %HIS_HER(TARGET)% bottom lip, %HE_SHE(TARGET)% fixes onto %CALLNAME:MASTER% with a burning gaze. WSTR:(K++) = [I've waited long enough, haven't I?] WSTR:(K++) = [I'll give it to you, if you want it... ] KSTR:(K++) = %CALLNAME:MASTER% is stunned into silence. WSTR:(K++) = [Y-you made me do this! Idiot! Don't make me want you this much! Dummy!] KSTR:(K++) = %CALLNAME:TARGET% wails at %HIM_HER(MASTER)%, waving %HIS_HER(TARGET)% ass furiously. KSTR:(K++) = %CALLNAME:MASTER% sighs, and begins pulling off %HIS_HER(MASTER)% clothing. KSTR:(K++) = %HE_SHE(MASTER)% hadn't intended to do this today, but %CALLNAME:TARGET%'s pouting, along with %HIS_HER(TARGET)% slick and inviting pussy, KSTR:(K++) = are too much for him. KSTR:(K++) = Surely %HE_SHE(TARGET)% was right, it would be cruel to refuse her. KSTR:(K++) = Grabbing onto %HIS_HER(TARGET)% ass, %CALLNAME:MASTER% plants %HIS_HER(MASTER)% meat rod deep into her. KSTR:(K++) = %CALLNAME:TARGET% is already so wet that %HIS_HER(MASTER)% dick slides deep into %HIS_HER(TARGET)% with little resistance and an obscene gush of liquid. WSTR:(K++) = [Ahhn! ... finally... ] KSTR:(K++) = %CALLNAME:TARGET% fades into blissful orgasm after orgasm as %CALLNAME:MASTER% introduces %HIS_HER(TARGET)% to true pleasure... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [Hnn!] KSTR:(K++) = %CALLNAME:TARGET% grunts as %CALLNAME:MASTER% forcefully pushes %HIS_HER(TARGET)% down onto the bed. KSTR:(K++) = With a cold tone, %HE_SHE(MASTER)% orders %HIS_HER(TARGET)% to lift %HIS_HER(TARGET)% ass and present herself. WSTR:(K++) = (No! No! Anything but this! No!) KSTR:(K++) = Inner turmoil rages within %HIS_HER(TARGET)% heart, and %HE_SHE(TARGET)% bites %HIS_HER(TARGET)% lower lip, KSTR:(K++) = unable to even voice words of protest. KSTR:(K++) = Seeing %HIS_HER(TARGET)% hesitation, %CALLNAME:MASTER% slaps %HIS_HER(TARGET)% ass, hard enough to make %HIS_HER(TARGET)% yelp. KSTR:(K++) = %HE_SHE(TARGET)% wouldn't disobey %HIM_HER(MASTER)%, now would she? KSTR:(K++) = Trembling, %CALLNAME:TARGET% shakes %HIS_HER(TARGET)% head, and moves into position. KSTR:(K++) = %CALLNAME:MASTER% rubs %HIS_HER(MASTER)% rock hard member against %HIS_HER(TARGET)% slit, KSTR:(K++) = then plunges in without mercy, grabbing %HIS_HER(TARGET)% hips and thrusting into %HIS_HER(TARGET)% from behind. KSTR:(K++) = %CALLNAME:TARGET%'s face contorts in pain, but %HE_SHE(TARGET)% doesn't cry out or resist, KSTR:(K++) = even when %CALLNAME:MASTER%'s penis is dyed in the colour of %HIS_HER(TARGET)% virginal blood... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ;Not a virgin ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CFLAG:333 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:333 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [Hnng!] WSTR:(K++) = [Hey... take it easy... ] WSTR:(K++) = [I- hn! You know I like it better when I can see- hnn! Your face, right?] KSTR:(K++) = %CALLNAME:MASTER% vaguely thinks about how this would be a cute moment, KSTR:(K++) = if not for %HIS_HER(MASTER)% current state of relentlessly fucking %CALLNAME:TARGET% from behind. KSTR:(K++) = There is a time for deredere, but not when animalistic rutting is happening! WSTR:(K++) = [Moh... you're such a pervert... ] KSTR:(K++) = %CALLNAME:TARGET% grumbles to herself, but %HIS_HER(TARGET)% flushed face and raised ass suggestively KSTR:(K++) = %HE_SHE(TARGET)% enjoys this more than %HE_SHE(TARGET)% lets on... KSTR:(K++) = %CALLNAME:MASTER% continues to release %HIS_HER(MASTER)% inflamed passions into %HIS_HER(MASTER)% young lover... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Hey... ] KSTR:(K++) = While %CALLNAME:MASTER% sits on the bed, %CALLNAME:TARGET% crawls between %HIS_HER(MASTER)% legs. KSTR:(K++) = Turning around, %HE_SHE(TARGET)% begins to lewdly rub %HIS_HER(TARGET)% butt against %HIS_HER(MASTER)% crotch. WSTR:(K++) = [I want to feel your fat dick deep inside of me... ] WSTR:(K++) = [Won't you indulge your slave in this... master? ~ %UNICODE(0x2661)%] KSTR:(K++) = Turning %HIS_HER(TARGET)% head around with a wink, it seems %CALLNAME:TARGET% wasn't kidding. KSTR:(K++) = %CALLNAME:MASTER%'s cock was already rock hard, and soaked in %HIS_HER(TARGET)% leaking drippings. KSTR:(K++) = It takes no effort for it to slide into %CALLNAME:TARGET%, causing %HIS_HER(TARGET)% to squeal in delight. WSTR:(K++) = [Ahhh! Ahhhn! So good! Master ~ %UNICODE(0x2661)%] KSTR:(K++) = %CALLNAME:MASTER% furiously drives in and out of %CALLNAME:TARGET%, who happily shakes %HIS_HER(TARGET)% hips in return... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = [Hnnn! Haaa! Hnnnn!] KSTR:(K++) = %CALLNAME:TARGET% pants, sweat dripping off her. KSTR:(K++) = Behind %HIS_HER(TARGET)%, %CALLNAME:MASTER% pounds %HIS_HER(TARGET)% mercilessly, digging deep into her. WSTR:(K++) = (When is %HE_SHE(MASTER)% going to finish!) WSTR:(K++) = (It's like %HE_SHE(MASTER)% has endless stamina!) WSTR:(K++) = (My heart feels like it's crumbling in the face of this pleasure!) KSTR:(K++) = %CALLNAME:TARGET% has already lost this battle, however. KSTR:(K++) = Despite herself, %HIS_HER(TARGET)% face twists in pleasure, %HIS_HER(TARGET)% tongue loosely hanging out. KSTR:(K++) = %CALLNAME:MASTER%'s penis causes %HIS_HER(TARGET)% to shudder and shake as %HE_SHE(TARGET)% cums over and over again... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:333 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:333 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:333 = 3 ENDIF ;Otherwise IF (CFLAG:333 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:333 = 2 ENDIF ENDIF ;------------------------------------------------- ;66,Cowgirl ;------------------------------------------------- CASE 66 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:338 == 0 ;Virginity WSTR:(K++) = [... what did you say?] KSTR:(K++) = %CALLNAME:MASTER% repeated %HIS_HER(MASTER)% command for %CALLNAME:TARGET% to get on %HIS_HER(MASTER)% penis and ride him. KSTR:(K++) = Almost instantly, %CALLNAME:TARGET% leaps onto %CALLNAME:MASTER%, hands wrapping around %HIS_HER(MASTER)% neck. WSTR:(K++) = [You! -?!] KSTR:(K++) = However, %CALLNAME:MASTER% easily overpowers %HIS_HER(TARGET)%, gripping %HIS_HER(TARGET)% arms tightly. KSTR:(K++) = Seeing %CALLNAME:TARGET% in a good position, %HE_SHE(MASTER)% lies backwards, %HIS_HER(MASTER)% erection pushing onto %HIS_HER(TARGET)% naked slit. KSTR:(K++) = No matter how much %HE_SHE(TARGET)% struggles, %CALLNAME:TARGET% cannot break free. WSTR:(K++) = [Nooooo! Get your hands off me- Noooooooo!] KSTR:(K++) = In an instant, %HE_SHE(TARGET)% feels the pain of %HIS_HER(TARGET)% maidenhood being ripped apart as %CALLNAME:MASTER% forces himself inside her. KSTR:(K++) = Screaming in anger and fear, tears streak down %HIS_HER(TARGET)% cheeks while %CALLNAME:MASTER% thrusts into %HIS_HER(TARGET)% from below. WSTR:(K++) = (Tatsurou... ) IF TALENT:0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = %CALLNAME:TARGET% lies on top of %CALLNAME:MASTER%. KSTR:(K++) = Recently, the two of them have spent far too much time on the bed, KSTR:(K++) = exploring each other's bodies. KSTR:(K++) = %CALLNAME:MASTER% can't help but notice a change in %CALLNAME:TARGET%'s expressions, KSTR:(K++) = softening and becoming more shy. KSTR:(K++) = Today seems to be %HIS_HER(TARGET)% limit. WSTR:(K++) = [Hey... %CALLNAME:MASTER%... ] KSTR:(K++) = %CALLNAME:TARGET% sits upright, straddling %CALLNAME:MASTER%'s cock between %HIS_HER(TARGET)% thighs. KSTR:(K++) = The sight of %HIS_HER(TARGET)% tanned, sweaty, body against the light of the hotel room is enchanting. WSTR:(K++) = [... I want it. I want you.] WSTR:(K++) = [... you're cruel, to make me beg like this.] KSTR:(K++) = Seeing the pouting Taimanin makes %CALLNAME:MASTER% smirk to himself. KSTR:(K++) = %HE_SHE(MASTER)% decides to indulge %HIS_HER(TARGET)%, guiding %HIS_HER(MASTER)% cock into %HIS_HER(TARGET)% maidenhood. WSTR:(K++) = (Ahh... it feels so hot... ) WSTR:(K++) = (Feels like he's piercing through my whole body... ) WSTR:(K++) = (... this summoner, when did I start thinking it's okay for me to feel this way about him?) WSTR:(K++) = (To even give up my first time in such an perverted way... ) KSTR:(K++) = Slowly, %CALLNAME:MASTER% starts to buck, causing %CALLNAME:TARGET% to squeal cutely. KSTR:(K++) = They spend the night consumating their first time together... ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [... you've got to be kidding me.] KSTR:(K++) = %CALLNAME:MASTER% isn't kidding, though. KSTR:(K++) = Lying on the bed, with a rock hard erection, KSTR:(K++) = %CALLNAME:MASTER% states %HE_SHE(MASTER)% isn't going to do anything to her. KSTR:(K++) = Rather, %HE_SHE(MASTER)% is going to lie here and %HE_SHE(TARGET)% can do as %HE_SHE(TARGET)% pleases. KSTR:(K++) = The smirk on %HIS_HER(MASTER)% face tells %CALLNAME:TARGET% everything %HE_SHE(TARGET)% needs to know. KSTR:(K++) = %HE_SHE(MASTER)% intends to make %HIS_HER(TARGET)% submit %HIS_HER(TARGET)% own precious virginity by %HIS_HER(TARGET)% own will. WSTR:(K++) = (Khhh! Who would!) WSTR:(K++) = (As if I would ever!) WSTR:(K++) = (This scumbag, no matter how big %HIS_HER(MASTER)% dick is... ) WSTR:(K++) = (Or the itching from my core... ) WSTR:(K++) = (Or the heat from my skin... ) WSTR:(K++) = (I would never give in!) KSTR:(K++) = %CALLNAME:TARGET% is already in a daze, though, and mounts %CALLNAME:MASTER% without thinking. KSTR:(K++) = %HIS_HER(TARGET)% mouth waters in anticipation, and all %HE_SHE(TARGET)% can think about is %CALLNAME:MASTER%'s dick. WSTR:(K++) = (... maybe just the tip... ) WSTR:(K++) = (... just a little doesn't count, right?) WSTR:(K++) = (... I'll just rub against it a little... ) KSTR:(K++) = The next thing %HE_SHE(TARGET)% knows, %CALLNAME:TARGET% can already feel %HIS_HER(MASTER)% meat rod penetrating into her. KSTR:(K++) = It enters %HIS_HER(TARGET)% slick and inviting pussy with no resistance, despite it being %HIS_HER(TARGET)% first time. WSTR:(K++) = [Hyaaaah! ~ %UNICODE(0x2661)%] KSTR:(K++) = The hotel room soon fills with the sound of slapping meat on meat, KSTR:(K++) = and crazed moans and screams... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = On hearing %CALLNAME:MASTER%'s command, %CALLNAME:TARGET% feels something break within her. WSTR:(K++) = (Why... ) WSTR:(K++) = (I've already held on for so long!) WSTR:(K++) = (I've let this bastard do all sorts of things to me!) WSTR:(K++) = (Why hasn't anything saved me?!) WSTR:(K++) = (Why has it come to this!) KSTR:(K++) = Despite herself, %CALLNAME:TARGET% obeys, kneeling on top of %CALLNAME:MASTER%'s erection. WSTR:(K++) = (... No, rather... ) WSTR:(K++) = (... from the start, I was already enslaved, wasn't I?) WSTR:(K++) = (... it was foolish to hope for a chance to escape... ) KSTR:(K++) = As %CALLNAME:TARGET% feels %CALLNAME:MASTER% penetrate %HIS_HER(TARGET)% from below, KSTR:(K++) = tears well up in %HIS_HER(TARGET)% eyes. KSTR:(K++) = The pain of %HIS_HER(MASTER)% meat rod tearing through %HIS_HER(TARGET)% maidenhood, KSTR:(K++) = combined with having offered it herself, KSTR:(K++) = caused %HIS_HER(TARGET)% heart to crumble... WSTR:(K++) = (Tatsurou... I'm sorry... ) WSTR:(K++) = (I am already this person's belonging... ) ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ;Not a virgin ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CFLAG:338 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:338 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [Hnn! Hnnng! Ahhh!] KSTR:(K++) = %CALLNAME:TARGET% lets out little gasps as %HE_SHE(TARGET)% bounces on top of %CALLNAME:MASTER%. KSTR:(K++) = The sight of %HIS_HER(TARGET)% jiggling breasts, even as meagre as they are, KSTR:(K++) = only serves to arouse %CALLNAME:MASTER% even more. KSTR:(K++) = Eventually %CALLNAME:TARGET% can no longer mantain %HIS_HER(TARGET)% balance, falling forward onto %CALLNAME:MASTER%. WSTR:(K++) = [Anon... ] KSTR:(K++) = The Taimanin girl mumbles, then plants a kiss. WSTR:(K++) = [I wuv you so mush... %UNICODE(0x2661)%] ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = [Ahhhh! Haa! Haaann!] KSTR:(K++) = %CALLNAME:TARGET% throws %HIS_HER(TARGET)% head back in pleasure as %CALLNAME:MASTER% pounds %HIS_HER(TARGET)% senseless from below. KSTR:(K++) = The bed quickly soaks in all sorts of bodily fluids, KSTR:(K++) = even saliva coming from %HIS_HER(TARGET)% loosely hanging tongue. WSTR:(K++) = [AAAHHHHH~ %UNICODE(0x2661)%] KSTR:(K++) = %CALLNAME:TARGET% arcs %HIS_HER(TARGET)% back and clutches at the bedsheets when %CALLNAME:MASTER% thrusts into her, KSTR:(K++) = the massive orgasm sending a rush throughout %HIS_HER(TARGET)% whole body. KSTR:(K++) = %HIS_HER(TARGET)% eyes roll back and %HE_SHE(TARGET)% collapses against %CALLNAME:MASTER%, panting, at %HIS_HER(MASTER)% mercy... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = Tonight, %CALLNAME:MASTER% decides %HE_SHE(MASTER)% wants %CALLNAME:TARGET% to service him. KSTR:(K++) = There is no light in %HIS_HER(TARGET)% eyes as %CALLNAME:TARGET% mounts %HIS_HER(MASTER)% penis. KSTR:(K++) = %HE_SHE(TARGET)% tries %HIS_HER(TARGET)% best to pleasure %HIM_HER(MASTER)%, but cannot seem to muster the spirit. KSTR:(K++) = Only when %CALLNAME:MASTER% painfully pulls on %HIS_HER(TARGET)% nipples does %CALLNAME:TARGET% react. KSTR:(K++) = %HE_SHE(TARGET)% can only grit %HIS_HER(TARGET)% teeth, riding on top of Anon, KSTR:(K++) = trying %HIS_HER(TARGET)% best to service %HIM_HER(MASTER)% while also desperately ignoring the rising pleasure within her... ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:338 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:338 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:338 = 3 ENDIF ;Otherwise IF (CFLAG:338 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:338 = 2 ENDIF ENDIF ;------------------------------------------------- ;68,Sitting On Lap ;------------------------------------------------- CASE 68 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:340 == 0 ;Virginity KSTR:(K++) = %CALLNAME:MASTER% grabs %CALLNAME:TARGET%'s arms, and drags %HIS_HER(TARGET)% over to the bed. KSTR:(K++) = With the anti-Taimanin Particle technology in place, KSTR:(K++) = all %CALLNAME:TARGET% can do is shriek and try to pull away from him. WSTR:(K++) = [You bastard! Pervert! Get your dirty hands off me!] KSTR:(K++) = %CALLNAME:MASTER% easily overpowers %HIS_HER(TARGET)%, however, and sits on the bed. KSTR:(K++) = %HIS_HER(MASTER)% erect dick pushes against %HIS_HER(TARGET)% ass as %CALLNAME:MASTER% forces %HIS_HER(TARGET)% to sit on %HIS_HER(MASTER)% lap. WSTR:(K++) = [Wh- don't you dare! I'll kill you! I'll KILL-] KSTR:(K++) = In the next moment, %CALLNAME:MASTER% pierces deep into %CALLNAME:TARGET%, KSTR:(K++) = ripping %HIS_HER(TARGET)% hymen apart. WSTR:(K++) = [HYAAAHHHH!] KSTR:(K++) = Fear and pain grip %HIS_HER(TARGET)%, but %CALLNAME:MASTER% slips %HIS_HER(MASTER)% arms under hers, KSTR:(K++) = preventing any hope of escape as %HE_SHE(MASTER)% rocks %HIS_HER(MASTER)% hips under her, KSTR:(K++) = making the lithe girl bounce off %HIS_HER(MASTER)% lap... IF TALENT:0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = %CALLNAME:TARGET% sits next to %CALLNAME:MASTER% on the bed, clinging onto %HIS_HER(MASTER)% arm. KSTR:(K++) = The television in front of them plays a gaudy soap opera, KSTR:(K++) = but neither of them are paying any attention to it. KSTR:(K++) = %CALLNAME:TARGET% simply rests %HIS_HER(TARGET)% head against %CALLNAME:MASTER%, KSTR:(K++) = looking up with %HIM_HER(MASTER)% with a loving gaze. WSTR:(K++) = [I. Love. You.] KSTR:(K++) = %HE_SHE(TARGET)% mouths at %HIM_HER(MASTER)%, and smiles. KSTR:(K++) = Their bodies naturally move closer to each other, KSTR:(K++) = and %CALLNAME:TARGET% ends up straddling %CALLNAME:MASTER%'s lap as %HIS_HER(MASTER)% hands explore %HIS_HER(TARGET)% body. WSTR:(K++) = [B-be gentle, okay? I'm... not very used to this.] KSTR:(K++) = In front of the warm light from the television, KSTR:(K++) = %CALLNAME:MASTER% carefully pushes %HIS_HER(MASTER)% member into %CALLNAME:TARGET%. WSTR:(K++) = [Hnnng... ] WSTR:(K++) = [It hurts... but... ] WSTR:(K++) = [If it's you, %CALLNAME:MASTER%... ] WSTR:(K++) = [Ehe~ %UNICODE(0x2661)%] ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = (Khhh... it's not like I want this.) WSTR:(K++) = (It just aches so much... ) WSTR:(K++) = (Just a little is fine, right?) WSTR:(K++) = (Just the tip.) KSTR:(K++) = %CALLNAME:MASTER% simply waits as %HE_SHE(MASTER)% sits on the chair, full mast on display. KSTR:(K++) = %HE_SHE(MASTER)% watches as %CALLNAME:TARGET% stares at %HIS_HER(MASTER)% dick, %HIS_HER(TARGET)% moral quandry obvious. KSTR:(K++) = %CALLNAME:MASTER% didn't give %HIS_HER(TARGET)% any instructions, or do anything to her. KSTR:(K++) = It was up to %HIS_HER(TARGET)% what %HE_SHE(TARGET)% wanted to do next. KSTR:(K++) = Though, watching %HIS_HER(TARGET)% lick %HIS_HER(TARGET)% lips unconciously, KSTR:(K++) = and the dripping stream of nectar down %HIS_HER(TARGET)% leg, KSTR:(K++) = it was obvious what the outcome was going to be. KSTR:(K++) = With some hesitation, %CALLNAME:TARGET% turns around and slowly sits down on %CALLNAME:MASTER%'s dick. WSTR:(K++) = (Haa... t-this isn't so bad... ) WSTR:(K++) = (Maybe I can go a little deeper?) WSTR:(K++) = (J-just a little more... ) WSTR:(K++) = (No, this is too much for me after all!) WSTR:(K++) = (It feels so good! It's rubbing on my walls!) KSTR:(K++) = Without %HIS_HER(TARGET)% noticing, %CALLNAME:MASTER% had already pierced though %HIS_HER(TARGET)% hymen. KSTR:(K++) = Despite herself, the Taimanin girl begins to rock %HIS_HER(TARGET)% hips, slowly at first, KSTR:(K++) = but quicker and quicker. KSTR:(K++) = Soon, the room fills with the sound of beastial moans and screams... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ;Not a virgin ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = As soon as %CALLNAME:MASTER% enters the room, %CALLNAME:TARGET% pounces onto him. KSTR:(K++) = %HIS_HER(TARGET)% eyes are swimming with sexual desire, KSTR:(K++) = reminding %CALLNAME:MASTER% of certain predatory female demons %HE_SHE(MASTER)% has fought lately. KSTR:(K++) = Rubbing %HIS_HER(TARGET)% naked tanned body on %CALLNAME:MASTER%, %HE_SHE(TARGET)% leans forward and nibbles %HIS_HER(MASTER)% ear. KSTR:(K++) = %HIS_HER(TARGET)% practised hand unzips %CALLNAME:MASTER%, pulling out %HIS_HER(MASTER)% hardening erection. WSTR:(K++) = [Ahhh... I've been waiting all day for this... ] KSTR:(K++) = Unable to wait any longer, %CALLNAME:TARGET% slips %CALLNAME:MASTER% inside of her. WSTR:(K++) = [Ahhhhn!~ ] KSTR:(K++) = Of course, it's not as if %CALLNAME:MASTER% is unwilling. KSTR:(K++) = %HE_SHE(MASTER)% sits on the floor, allowing %HIS_HER(TARGET)% to ride %HIS_HER(TARGET)% hips on %HIS_HER(MASTER)% lap, KSTR:(K++) = as %HIS_HER(TARGET)% vagina clamps down on %HIM_HER(MASTER)% again and again... ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CFLAG:340 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:340 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:340 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:340 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:340 = 3 ENDIF ;Otherwise IF (CFLAG:340 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:340 = 2 ENDIF ENDIF ;------------------------------------------------- ;69,Reverse Sitting On Lap ;------------------------------------------------- CASE 69 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:341 == 0 ;Virginity IF TALENT:0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ;Not a virgin ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CFLAG:341 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:341 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = [No.] WSTR:(K++) = [I'm never, neeeeever going to do it.] WSTR:(K++) = [Stop asking! It's not going to happen!] WSTR:(K++) = [... tsk.] WSTR:(K++) = [... just this once, okay?!] WSTR:(K++) = [Don't ask me for something like this again!] KSTR:(K++) = Upon %CALLNAME:MASTER%'s persistant request, KSTR:(K++) = %CALLNAME:TARGET% puts %HIS_HER(TARGET)% hands down and makes a heart with %HIS_HER(TARGET)% fingers over %HIS_HER(TARGET)% pussy. WSTR:(K++) = [Khhhhh... how embarrassing... ] KSTR:(K++) = A flustered face turned away with a blush steals away %CALLNAME:MASTER%'s breath. KSTR:(K++) = %CALLNAME:MASTER% accepts the precious invitiation with no hesistation at all, KSTR:(K++) = pushing %HIS_HER(TARGET)% down on %HIS_HER(MASTER)% more-than-ready pole. WSTR:(K++) = [Kyaah! Don't put it in all of a sudden, idiot! I- ahhn~ %UNICODE(0x2661)%] WSTR:(K++) = [%UNICODE(0x2661)%~ %UNICODE(0x2661)%%UNICODE(0x2661)%%UNICODE(0x2661)%~] ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:341 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:341 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:341 = 3 ENDIF ;Otherwise IF (CFLAG:341 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:341 = 2 ENDIF ENDIF ;------------------------------------------------- ;72,Move Undie & Insert ;------------------------------------------------- CASE 72 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:420 == 0 ;Virginity IF TALENT:0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ;Not a virgin ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CFLAG:420 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:420 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:420 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:420 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:420 = 3 ENDIF ;Otherwise IF (CFLAG:420 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:420 = 2 ENDIF ENDIF ;------------------------------------------------- ;74,Let Reverse Rape ;------------------------------------------------- CASE 74 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:460 == 0 ;Virginity IF TALENT:0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ;Not a virgin ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CFLAG:460 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:460 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:460 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:460 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:460 = 3 ENDIF ;Otherwise IF (CFLAG:460 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:460 = 2 ENDIF ENDIF CASEELSE ENDSELECT ;------------------------------------------------- ;Generic vaginal sex ;------------------------------------------------- IF !口上有無確認(0) K_CALL:K = TRAIN_MESSAGE ;Virginity IF TALENT:0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && !口上有無確認(0) ;WSTR:(K++) = ENDIF ENDIF ;================================================= ;Anal Sex commands ;================================================= ELSEIF RESULT == COMTYPE("Ａ性交系") SELECTCASE SELECTCOM ;------------------------------------------------- ;62,Anal Missionary ;------------------------------------------------- CASE 62 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:334 == 0 KSTR:(K++) = CFLAG:334 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:334 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:334 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:334 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:334 = 3 ENDIF ;Otherwise IF (CFLAG:334 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:334 = 2 ENDIF ENDIF ;------------------------------------------------- ;63,Anal Doggy Style ;------------------------------------------------- CASE 63 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:335 == 0 KSTR:(K++) = CFLAG:335 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:335 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:335 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:335 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:335 = 3 ENDIF ;Otherwise IF (CFLAG:335 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:335 = 2 ENDIF ENDIF ;------------------------------------------------- ;67,Anal Cowgirl ;------------------------------------------------- CASE 67 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:339 == 0 KSTR:(K++) = CFLAG:339 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:339 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:339 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:339 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:339 = 3 ENDIF ;Otherwise IF (CFLAG:339 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:339 = 2 ENDIF ENDIF ;------------------------------------------------- ;70,Anal Sitting On Lap ;------------------------------------------------- CASE 70 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:342 == 0 KSTR:(K++) = CFLAG:342 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:342 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:342 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:342 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:342 = 3 ENDIF ;Otherwise IF (CFLAG:342 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:342 = 2 ENDIF ENDIF ;------------------------------------------------- ;71,Anal Reverse Sitting On Lap ;------------------------------------------------- CASE 71 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:343 == 0 KSTR:(K++) = CFLAG:343 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:343 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:343 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:343 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:343 = 3 ENDIF ;Otherwise IF (CFLAG:343 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:343 = 2 ENDIF ENDIF ;------------------------------------------------- ;73,Move Undie & Anal Insert ;------------------------------------------------- CASE 73 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:421 == 0 KSTR:(K++) = CFLAG:421 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:421 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:421 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:421 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:421 = 3 ENDIF ;Otherwise IF (CFLAG:421 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:421 = 2 ENDIF ENDIF CASEELSE ENDSELECT ;------------------------------------------------- ;Generic anal ;------------------------------------------------- IF !口上有無確認(0) K_CALL:K = TRAIN_MESSAGE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && !口上有無確認(0) ;WSTR:(K++) = ENDIF ENDIF ;================================================= ;Service commands ;================================================= ELSEIF RESULT == COMTYPE("奉仕系") SELECTCASE SELECTCOM ;------------------------------------------------- ;80,Handjob ;------------------------------------------------- CASE 80 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:344 == 0 KSTR:(K++) = CFLAG:344 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:344 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:344 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:344 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:344 = 3 ENDIF ;Otherwise IF (CFLAG:344 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:344 = 2 ENDIF ENDIF ;------------------------------------------------- ;81,Blowjob ;------------------------------------------------- CASE 81 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:345 == 0 KSTR:(K++) = CFLAG:345 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:345 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:345 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:345 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:345 = 3 ENDIF ;Otherwise IF (CFLAG:345 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:345 = 2 ENDIF ENDIF ;------------------------------------------------- ;82,Boobjob ;------------------------------------------------- CASE 82 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:346 == 0 KSTR:(K++) = CFLAG:346 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:346 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:346 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:346 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:346 = 3 ENDIF ;Otherwise IF (CFLAG:346 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:346 = 2 ENDIF ENDIF ;------------------------------------------------- ;83,Intercrural ;------------------------------------------------- CASE 83 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:347 == 0 KSTR:(K++) = CFLAG:347 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:347 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:347 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:347 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:347 = 3 ENDIF ;Otherwise IF (CFLAG:347 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:347 = 2 ENDIF ENDIF ;------------------------------------------------- ;84,Foam Play ;------------------------------------------------- CASE 84 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:348 == 0 KSTR:(K++) = CFLAG:348 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:348 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:348 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:348 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:348 = 3 ENDIF ;Otherwise IF (CFLAG:348 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:348 = 2 ENDIF ENDIF ;------------------------------------------------- ;85,Footjob ;------------------------------------------------- CASE 85 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:349 == 0 KSTR:(K++) = CFLAG:349 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:349 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:349 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:349 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:349 = 3 ENDIF ;Otherwise IF (CFLAG:349 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:349 = 2 ENDIF ENDIF ;------------------------------------------------- ;86,Forced Foot Lick ;------------------------------------------------- CASE 86 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:350 == 0 KSTR:(K++) = CFLAG:350 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:350 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:350 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:350 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:350 = 3 ENDIF ;Otherwise IF (CFLAG:350 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:350 = 2 ENDIF ENDIF ;------------------------------------------------- ;87,Vertical Titfuck ;------------------------------------------------- CASE 87 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:351 == 0 KSTR:(K++) = CFLAG:351 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:351 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:351 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:351 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:351 = 3 ENDIF ;Otherwise IF (CFLAG:351 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:351 = 2 ENDIF ENDIF ;------------------------------------------------- ;88,Tit Blowjob ;------------------------------------------------- CASE 88 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:352 == 0 KSTR:(K++) = CFLAG:352 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:352 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:352 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:352 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:352 = 3 ENDIF ;Otherwise IF (CFLAG:352 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:352 = 2 ENDIF ENDIF ;------------------------------------------------- ;89,Drink Milk　(Fallen) ;------------------------------------------------- CASE 89 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:353 == 0 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ;WSTR:(K++) = ENDIF CFLAG:353 = 1 ;Second onward ELSEIF CFLAG:321 < 2 || FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ;WSTR:(K++) = ENDIF CFLAG:353 = 2 ENDIF ;------------------------------------------------- ;197,Pantyjob ;------------------------------------------------- CASE 197 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:438 == 0 KSTR:(K++) = CFLAG:438 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:438 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:438 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:438 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:438 = 3 ENDIF ;Otherwise IF (CFLAG:438 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:438 = 2 ENDIF ENDIF ;------------------------------------------------- ;211,Glans Rub ;------------------------------------------------- CASE 211 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:479 == 0 KSTR:(K++) = CFLAG:479 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:479 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:479 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:479 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:479 = 3 ENDIF ;Otherwise IF (CFLAG:479 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:479 = 2 ENDIF ENDIF CASEELSE ENDSELECT ;------------------------------------------------- ;Generic Service ;------------------------------------------------- IF !口上有無確認(0) K_CALL:K = TRAIN_MESSAGE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && !口上有無確認(0) ;WSTR:(K++) = ENDIF ENDIF ;================================================= ;Master Servicing Commands ;================================================= ELSEIF RESULT == COMTYPE("調教者奉仕系") SELECTCASE SELECTCOM ;------------------------------------------------- ;2,Do Blowjob ;------------------------------------------------- CASE 2 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:302 == 0 KSTR:(K++) = CFLAG:302 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:302 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:302 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:302 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:302 = 3 ENDIF ;Otherwise IF (CFLAG:302 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:302 = 2 ENDIF ENDIF ;------------------------------------------------- ;90,Do Handjob ;------------------------------------------------- CASE 90 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:12 == 0 ;Performed for the first time IF CFLAG:423 == 0 KSTR:(K++) = CFLAG:423 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:423 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:423 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:423 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:423 = 3 ENDIF ;Otherwise IF (CFLAG:423 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:423 = 2 ENDIF ENDIF ELSE ;------------------------------------------------- ;If onahole equipped ;------------------------------------------------- ;Performed for the first time IF CFLAG:461 == 0 KSTR:(K++) = CFLAG:461 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:461 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:461 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:461 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:461 = 3 ENDIF ;Otherwise IF (CFLAG:461 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:461 = 2 ENDIF ENDIF ENDIF ;------------------------------------------------- ;91,Do Boobjob ;------------------------------------------------- CASE 91 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:424 == 0 KSTR:(K++) = CFLAG:424 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:424 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:424 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:424 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:424 = 3 ENDIF ;Otherwise IF (CFLAG:424 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:424 = 2 ENDIF ENDIF ;------------------------------------------------- ;92,Let Missionary ;------------------------------------------------- CASE 92 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:425 == 0 KSTR:(K++) = CFLAG:425 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:425 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:425 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:425 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:425 = 3 ENDIF ;Otherwise IF (CFLAG:425 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:425 = 2 ENDIF ENDIF ;------------------------------------------------- ;93,Let Doggy Style ;------------------------------------------------- CASE 93 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:426 == 0 KSTR:(K++) = CFLAG:426 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:426 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:426 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:426 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:426 = 3 ENDIF ;Otherwise IF (CFLAG:426 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:426 = 2 ENDIF ENDIF ;------------------------------------------------- ;94,Do Cowgirl ;------------------------------------------------- CASE 94 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:427 == 0 KSTR:(K++) = CFLAG:427 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:427 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:427 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:427 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:427 = 3 ENDIF ;Otherwise IF (CFLAG:427 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:427 = 2 ENDIF ENDIF ;------------------------------------------------- ;95,Let Anal Missionary ;------------------------------------------------- CASE 95 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:428 == 0 KSTR:(K++) = CFLAG:428 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:428 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:428 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:428 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:428 = 3 ENDIF ;Otherwise IF (CFLAG:428 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:428 = 2 ENDIF ENDIF ;------------------------------------------------- ;96,Let Anal Doggy Style ;------------------------------------------------- CASE 96 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:429 == 0 KSTR:(K++) = CFLAG:429 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:429 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:429 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:429 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:429 = 3 ENDIF ;Otherwise IF (CFLAG:429 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:429 = 2 ENDIF ENDIF ;------------------------------------------------- ;97,Do Anal Cowgirl ;------------------------------------------------- CASE 97 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:430 == 0 KSTR:(K++) = CFLAG:430 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:430 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:430 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:430 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:430 = 3 ENDIF ;Otherwise IF (CFLAG:430 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:430 = 2 ENDIF ENDIF ;------------------------------------------------- ;98,Give Milk　(Fallen) ;------------------------------------------------- CASE 98 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:443 == 0 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ;WSTR:(K++) = ENDIF CFLAG:443 = 1 ;Second onward ELSEIF CFLAG:321 < 2 || FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ;WSTR:(K++) = ENDIF CFLAG:443 = 2 ENDIF ;------------------------------------------------- ;210,Give Glans Rub ;------------------------------------------------- CASE 210 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:480 == 0 KSTR:(K++) = CFLAG:480 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:480 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:480 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:480 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:480 = 3 ENDIF ;Otherwise IF (CFLAG:480 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:480 = 2 ENDIF ENDIF CASEELSE ENDSELECT ;------------------------------------------------- ;Generic Master Servicing ;------------------------------------------------- IF !口上有無確認(0) K_CALL:K = TRAIN_MESSAGE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && !口上有無確認(0) ;WSTR:(K++) = ENDIF ENDIF ;================================================= ;Sado-Maso ;================================================= ELSEIF RESULT == COMTYPE("ＳＭ系") SELECTCASE SELECTCOM ;------------------------------------------------- ;100,Spanking ;------------------------------------------------- CASE 100 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:354 == 0 KSTR:(K++) = CFLAG:354 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:354 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:354 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:354 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:354 = 3 ENDIF ;Otherwise IF (CFLAG:354 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:354 = 2 ENDIF ENDIF ;------------------------------------------------- ;101,Breast Spanking ;------------------------------------------------- CASE 101 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:355 == 0 KSTR:(K++) = CFLAG:355 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:355 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:355 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:355 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:355 = 3 ENDIF ;Otherwise IF (CFLAG:355 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:355 = 2 ENDIF ENDIF ;------------------------------------------------- ;102,Whip ;------------------------------------------------- CASE 102 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:356 == 0 KSTR:(K++) = CFLAG:356 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:356 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:356 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:356 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:356 = 3 ENDIF ;Otherwise IF (CFLAG:356 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:356 = 2 ENDIF ENDIF ;------------------------------------------------- ;103,Candle ;------------------------------------------------- CASE 103 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:357 == 0 KSTR:(K++) = CFLAG:357 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:357 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:357 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:357 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:357 = 3 ENDIF ;Otherwise IF (CFLAG:357 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:357 = 2 ENDIF ENDIF ;------------------------------------------------- ;104,Needle ;------------------------------------------------- CASE 104 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:358 == 0 KSTR:(K++) = CFLAG:358 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:358 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:358 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:358 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:358 = 3 ENDIF ;Otherwise IF (CFLAG:358 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:358 = 2 ENDIF ENDIF ;------------------------------------------------- ;105,Blindfold ;------------------------------------------------- CASE 105 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:18 ;Performed for the first time IF CFLAG:359 == 0 KSTR:(K++) = CFLAG:359 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:359 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:359 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:359 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:359 = 3 ENDIF ;Otherwise IF (CFLAG:359 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:359 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;106,Rope ;------------------------------------------------- CASE 106 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:19 ;Performed for the first time IF CFLAG:360 == 0 KSTR:(K++) = CFLAG:360 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:360 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:360 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:360 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:360 = 3 ENDIF ;Otherwise IF (CFLAG:360 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:360 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;107,Ball Gag ;------------------------------------------------- CASE 107 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:20 ;Performed for the first time IF CFLAG:361 == 0 KSTR:(K++) = CFLAG:361 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:361 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:361 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:361 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:361 = 3 ENDIF ;Otherwise IF (CFLAG:361 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:361 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CASEELSE ENDSELECT ;------------------------------------------------- ;Generic Sado-Maso ;------------------------------------------------- IF !口上有無確認(0) K_CALL:K = TRAIN_MESSAGE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && !口上有無確認(0) ;WSTR:(K++) = ENDIF ENDIF ;================================================= ;Threesome+Lesbian ;================================================= ELSEIF RESULT == COMTYPE("助手・レズ系") SELECTCASE SELECTCOM ;------------------------------------------------- ;120,Forced Cunnilingus ;------------------------------------------------- CASE 120 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:362 == 0 KSTR:(K++) = CFLAG:362 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:362 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:362 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:362 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:362 = 3 ENDIF ;Otherwise IF (CFLAG:362 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:362 = 2 ENDIF ENDIF ;------------------------------------------------- ;121,Scissoring ;------------------------------------------------- CASE 121 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:363 == 0 KSTR:(K++) = CFLAG:363 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:363 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:363 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:363 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:363 = 3 ENDIF ;Otherwise IF (CFLAG:363 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:363 = 2 ENDIF ENDIF ;------------------------------------------------- ;122,Let Rape Assistant ;------------------------------------------------- CASE 122 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:364 == 0 KSTR:(K++) = CFLAG:364 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:364 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:364 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:364 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:364 = 3 ENDIF ;Otherwise IF (CFLAG:364 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:364 = 2 ENDIF ENDIF ;Call function for assistant's dialogue ;Assistant's pleasure dialogue ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_1 ;Assistant orgasm dialogue ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_2 ;Assistant reassuring dialogue ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_3 ;Assistant rape bluff dialogue ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_4 ;Assistant skillful dialogue ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_5 ;------------------------------------------------- ;123,Do Footjob ;------------------------------------------------- CASE 123 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:365 == 0 KSTR:(K++) = CFLAG:365 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:365 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:365 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:365 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:365 = 3 ENDIF ;Otherwise IF (CFLAG:365 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:365 = 2 ENDIF ENDIF ;------------------------------------------------- ;124,Double Blowjob ;------------------------------------------------- CASE 124 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:366 == 0 KSTR:(K++) = CFLAG:366 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:366 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:366 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:366 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:366 = 3 ENDIF ;Otherwise IF (CFLAG:366 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:366 = 2 ENDIF ENDIF ;Call function for assistant's dialogue ;Pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_1 ;Servicing ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_2 ;Teasing ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_3 ;Excessive pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_4 ;Lesbian talk ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_5 ;Pole sisters ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_6 ;------------------------------------------------- ;125,Double Paizuri ;------------------------------------------------- CASE 125 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:367 == 0 KSTR:(K++) = CFLAG:367 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:367 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:367 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:367 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:367 = 3 ENDIF ;Otherwise IF (CFLAG:367 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:367 = 2 ENDIF ENDIF ;Call function for assistant's dialogue ;Pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_1 ;Servicing ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_2 ;Teasing ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_3 ;Excessive pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_4 ;Mutual nipple rub ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_5 ;Double Paizuri text ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_6 ;Feeling good? ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_7 ;------------------------------------------------- ;126,Rub Nipples ;------------------------------------------------- CASE 126 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:368 == 0 KSTR:(K++) = CFLAG:368 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:368 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:368 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:368 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:368 = 3 ENDIF ;Otherwise IF (CFLAG:368 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:368 = 2 ENDIF ENDIF ;------------------------------------------------- ;127,Show Off Masturbation ;------------------------------------------------- CASE 127 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:432 == 0 KSTR:(K++) = CFLAG:432 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:432 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:432 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:432 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:432 = 3 ENDIF ;Otherwise IF (CFLAG:432 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:432 = 2 ENDIF ENDIF ;------------------------------------------------- ;128,Show Off Pussy ;------------------------------------------------- CASE 128 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:465 == 0 KSTR:(K++) = CFLAG:465 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:465 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:465 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:465 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:465 = 3 ENDIF ;Otherwise IF (CFLAG:465 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:465 = 2 ENDIF ENDIF ;------------------------------------------------- ;129,Show Off Autofellatio ;------------------------------------------------- CASE 129 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:466 == 0 KSTR:(K++) = CFLAG:466 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:466 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:466 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:466 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:466 = 3 ENDIF ;Otherwise IF (CFLAG:466 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:466 = 2 ENDIF ENDIF CASEELSE ENDSELECT ;------------------------------------------------- ;Generic lesbian/threesome ;------------------------------------------------- IF !口上有無確認(0) K_CALL:K = TRAIN_MESSAGE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && !口上有無確認(0) ;WSTR:(K++) = ENDIF ENDIF ;================================================= ;Hardcore commands ;================================================= ELSEIF RESULT == COMTYPE("ハード系") SELECTCASE SELECTCOM ;------------------------------------------------- ;64,Reverse Rape ;------------------------------------------------- CASE 64 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:336 == 0 KSTR:(K++) = CFLAG:336 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:336 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:336 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:336 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:336 = 3 ENDIF ;Otherwise IF (CFLAG:336 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:336 = 2 ENDIF ENDIF ;------------------------------------------------- ;65,Titfucking ;------------------------------------------------- CASE 65 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:337 == 0 KSTR:(K++) = CFLAG:337 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:337 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:337 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:337 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:337 = 3 ENDIF ;Otherwise IF (CFLAG:337 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:337 = 2 ENDIF ENDIF ;------------------------------------------------- ;108,Wooden Horse ;------------------------------------------------- CASE 108 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:41 ;Performed for the first time IF CFLAG:463 == 0 KSTR:(K++) = CFLAG:463 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:463 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:463 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:463 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:463 = 3 ENDIF ;Otherwise IF (CFLAG:463 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:463 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;140,Forced Blowjob ;------------------------------------------------- CASE 140 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:369 == 0 KSTR:(K++) = CFLAG:369 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:369 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:369 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:369 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:369 = 3 ENDIF ;Otherwise IF (CFLAG:369 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:369 = 2 ENDIF ENDIF ;------------------------------------------------- ;141,Fisting　(Submission/slave) ;------------------------------------------------- CASE 141 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:370 == 0 ;Virginity IF TALENT:0 KSTR:(K++) = ELSE KSTR:(K++) = ENDIF CFLAG:370 = 1 ;Second onward ELSEIF CFLAG:370 < 2 || FLAG:7 == 2 KSTR:(K++) = CFLAG:370 = 2 ENDIF ;------------------------------------------------- ;142,Anal Fisting　(Submission/slave) ;------------------------------------------------- CASE 142 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:371 == 0 KSTR:(K++) = CFLAG:371 = 1 ;Second onward ELSEIF CFLAG:371 < 2 || FLAG:7 == 2 KSTR:(K++) = CFLAG:371 = 2 ENDIF ;------------------------------------------------- ;143,Double Fisting　(Submission/slave) ;------------------------------------------------- CASE 143 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:372 == 0 ;Virginity IF TALENT:0 KSTR:(K++) = ELSE KSTR:(K++) = ENDIF CFLAG:372 = 1 ;Second onward ELSEIF CFLAG:372 < 2 || FLAG:7 == 2 KSTR:(K++) = CFLAG:372 = 2 ENDIF ;------------------------------------------------- ;144,Urination ;------------------------------------------------- CASE 144 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:373 == 0 KSTR:(K++) = CFLAG:373 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:373 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:373 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:373 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:373 = 3 ENDIF ;Otherwise IF (CFLAG:373 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:373 = 2 ENDIF ENDIF ;------------------------------------------------- ;145,Forced Rimjob ;------------------------------------------------- CASE 145 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:374 == 0 KSTR:(K++) = CFLAG:374 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:374 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:374 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:374 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:374 = 3 ENDIF ;Otherwise IF (CFLAG:374 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:374 = 2 ENDIF ENDIF ;------------------------------------------------- ;146,Enema＋Plug ;------------------------------------------------- CASE 146 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:21 ;Performed for the first time IF CFLAG:375 == 0 KSTR:(K++) = CFLAG:375 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:375 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:375 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:375 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:375 = 3 ENDIF ;Otherwise IF (CFLAG:375 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:375 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;147,Air Enema (Fart) ;------------------------------------------------- CASE 147 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:376 == 0 KSTR:(K++) = CFLAG:376 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:376 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:376 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:376 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:376 = 3 ENDIF ;Otherwise IF (CFLAG:376 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:376 = 2 ENDIF ENDIF ;------------------------------------------------- ;148,Expanding Balloon ;------------------------------------------------- CASE 148 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:22 ;Performed for the first time IF CFLAG:377 == 0 KSTR:(K++) = CFLAG:377 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:377 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:377 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:377 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:377 = 3 ENDIF ;Otherwise IF (CFLAG:377 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:377 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;149,Anal Electrode　(Submission/slave) ;------------------------------------------------- CASE 149 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:23 ;Performed for the first time IF CFLAG:378 == 0 KSTR:(K++) = CFLAG:378 = 1 ;Second onward ELSEIF CFLAG:378 < 2 || FLAG:7 == 2 KSTR:(K++) = CFLAG:378 = 2 ENDIF ELSE ;Unequip text IF CFLAG:378 == 1 || FLAG:7 == 2 KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;150,Breast Electrode　(Submission/slave) ;------------------------------------------------- CASE 150 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:24 ;Performed for the first time IF CFLAG:379 == 0 KSTR:(K++) = CFLAG:379 = 1 ;Second onward ELSEIF CFLAG:379 < 2 || FLAG:7 == 2 KSTR:(K++) = CFLAG:379 = 2 ENDIF ELSE ;Unequip text IF CFLAG:379 == 1 || FLAG:7 == 2 KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;151,Eel Bath　(Submission/slave) ;------------------------------------------------- CASE 151 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:380 == 0 ;Virginity IF TALENT:0 KSTR:(K++) = ELSE KSTR:(K++) = ENDIF CFLAG:380 = 1 ;Second onward ELSEIF CFLAG:380 < 2 || FLAG:7 == 2 KSTR:(K++) = CFLAG:380 = 2 ENDIF ;------------------------------------------------- ;152,Insect Bath　(Submission/slave) ;------------------------------------------------- CASE 152 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:381 == 0 KSTR:(K++) = CFLAG:381 = 1 ;Second onward ELSEIF CFLAG:381 < 2 || FLAG:7 == 2 KSTR:(K++) = CFLAG:381 = 2 ENDIF ;------------------------------------------------- ;154,Onahole Treatment　2+ Size differences ;------------------------------------------------- CASE 154 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:467 == 0 ;Virginity IF TALENT:0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ;Not a virgin ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CFLAG:467 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:467 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:467 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:467 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:467 = 3 ENDIF ;Otherwise IF (CFLAG:467 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:467 = 2 ENDIF ENDIF ;------------------------------------------------- ;155,Kick Balls ;------------------------------------------------- CASE 155 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:468 == 0 KSTR:(K++) = CFLAG:468 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:468 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:468 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:468 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:468 = 3 ENDIF ;Otherwise IF (CFLAG:468 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:468 = 2 ENDIF ENDIF ;------------------------------------------------- ;156,Drink Urine ;------------------------------------------------- CASE 156 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:469 == 0 KSTR:(K++) = CFLAG:469 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:469 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:469 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:469 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:469 = 3 ENDIF ;Otherwise IF (CFLAG:469 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:469 = 2 ENDIF ENDIF CASEELSE ENDSELECT ;------------------------------------------------- ;Generic Hardcore ;------------------------------------------------- IF !口上有無確認(0) K_CALL:K = TRAIN_MESSAGE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && !口上有無確認(0) ;WSTR:(K++) = ENDIF ENDIF ;================================================= ;Tentacles ;================================================= ELSEIF RESULT == COMTYPE("触手系") $SHOKUSHU_PLAY SELECTCASE SELECTCOM ;------------------------------------------------- ;0, T Caress ;------------------------------------------------- CASE 0 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:455 == 0 KSTR:(K++) = CFLAG:455 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:455 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:455 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:455 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:455 = 3 ENDIF ;Otherwise IF (CFLAG:455 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:455 = 2 ENDIF ENDIF ;------------------------------------------------- ;5,T Anal Caress ;------------------------------------------------- CASE 5 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:456 == 0 KSTR:(K++) = CFLAG:456 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:456 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:456 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:456 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:456 = 3 ENDIF ;Otherwise IF (CFLAG:456 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:456 = 2 ENDIF ENDIF ;------------------------------------------------- ;6,T Breast Massage ;------------------------------------------------- CASE 6 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:457 == 0 KSTR:(K++) = CFLAG:457 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:457 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:457 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:457 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:457 = 3 ENDIF ;Otherwise IF (CFLAG:457 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:457 = 2 ENDIF ENDIF ;------------------------------------------------- ;7,T Nipple Tease ;------------------------------------------------- CASE 7 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:458 == 0 KSTR:(K++) = CFLAG:458 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:458 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:458 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:458 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:458 = 3 ENDIF ;Otherwise IF (CFLAG:458 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:458 = 2 ENDIF ENDIF ;------------------------------------------------- ;8,T Breast Caress ;------------------------------------------------- CASE 8 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:459 == 0 KSTR:(K++) = CFLAG:459 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:459 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:459 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:459 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:459 = 3 ENDIF ;Otherwise IF (CFLAG:459 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:459 = 2 ENDIF ENDIF ;------------------------------------------------- ;12,T Wing Caress ;------------------------------------------------- CASE 12 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:460 == 0 KSTR:(K++) = CFLAG:460 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:460 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:460 = 4 ENDIF ;Obedience LV3+ IF ABL:0 >= 3 && (CFLAG:460 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:460 = 3 ENDIF ;Otherwise IF (CFLAG:460 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:460 = 2 ENDIF ENDIF ;------------------------------------------------- ;13,T Tail Caress ;------------------------------------------------- CASE 13 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:461 == 0 KSTR:(K++) = CFLAG:461 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:461 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:461 = 4 ENDIF ;Obedience LV3+ IF ABL:0 >= 3 && (CFLAG:461 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:461 = 3 ENDIF ;Otherwise IF (CFLAG:461 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:461 = 2 ENDIF ENDIF ;------------------------------------------------- ;15,T Butt Caress ;------------------------------------------------- CASE 15 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:462 == 0 KSTR:(K++) = CFLAG:462 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:462 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:462 = 4 ENDIF ;Obedience LV3+ IF ABL:0 >= 3 && (CFLAG:462 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:462 = 3 ENDIF ;Otherwise IF (CFLAG:462 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:462 = 2 ENDIF ENDIF ;------------------------------------------------- ;160,Tentacle Summon ;------------------------------------------------- CASE 160 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:25 ;Performed for the first time IF CFLAG:382 == 0 KSTR:(K++) = CFLAG:382 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:382 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:382 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:382 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:382 = 3 ENDIF ;Otherwise IF (CFLAG:382 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:382 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;161,T Vaginal ;------------------------------------------------- CASE 161 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:13 ;Performed for the first time IF CFLAG:383 == 0 ;Virginity IF TALENT:0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ;Not a virgin ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CFLAG:383 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:383 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:383 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:383 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:383 = 3 ENDIF ;Otherwise IF (CFLAG:383 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:383 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;162,T Anal ;------------------------------------------------- CASE 162 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:14 ;Performed for the first time IF CFLAG:384 == 0 KSTR:(K++) = CFLAG:384 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:384 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:384 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:384 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:384 = 3 ENDIF ;Otherwise IF (CFLAG:384 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:384 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;163,T Cunnilingus ;------------------------------------------------- CASE 163 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:11 ;Performed for the first time IF CFLAG:385 == 0 KSTR:(K++) = CFLAG:385 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:385 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:385 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:385 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:385 = 3 ENDIF ;Otherwise IF (CFLAG:385 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:385 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;164,T Nipple Tease ;------------------------------------------------- CASE 164 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:16 ;Performed for the first time IF CFLAG:386 == 0 KSTR:(K++) = CFLAG:386 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:386 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:386 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:386 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:386 = 3 ENDIF ;Otherwise IF (CFLAG:386 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:386 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;165,Tentacle Milking ;------------------------------------------------- CASE 165 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:17 ;Performed for the first time IF CFLAG:387 == 0 KSTR:(K++) = CFLAG:387 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:387 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:387 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:387 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:387 = 3 ENDIF ;Otherwise IF (CFLAG:387 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:387 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;166,Tentacle Bondage ;------------------------------------------------- CASE 166 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:19 ;Performed for the first time IF CFLAG:388 == 0 KSTR:(K++) = CFLAG:388 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:388 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:388 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:388 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:388 = 3 ENDIF ;Otherwise IF (CFLAG:388 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:388 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;167,Tentacle Enema ;------------------------------------------------- CASE 167 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:21 ;Performed for the first time IF CFLAG:389 == 0 KSTR:(K++) = CFLAG:389 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:389 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:389 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:389 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:389 = 3 ENDIF ;Otherwise IF (CFLAG:389 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:389 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;168,Tentacle Mouth Fuck ;------------------------------------------------- CASE 168 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:36 ;Performed for the first time IF CFLAG:390 == 0 KSTR:(K++) = CFLAG:390 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:390 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:390 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:390 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:390 = 3 ENDIF ;Otherwise IF (CFLAG:390 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:390 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;169,Tentacle Penis Torture ;------------------------------------------------- CASE 169 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:12 ;Performed for the first time IF CFLAG:391 == 0 KSTR:(K++) = CFLAG:391 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:391 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:391 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:391 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:391 = 3 ENDIF ;Otherwise IF (CFLAG:391 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:391 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;170,Let Tentacle Insertion ;------------------------------------------------- CASE 170 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:PLAYER:13 ;Performed for the first time IF CFLAG:470 == 0 KSTR:(K++) = CFLAG:470 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:470 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:470 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:470 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:470 = 3 ENDIF ;Otherwise IF (CFLAG:470 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:470 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;171,Let Tentacle Anal Insertion ;------------------------------------------------- CASE 171 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:PLAYER:14 ;Performed for the first time IF CFLAG:471 == 0 KSTR:(K++) = CFLAG:471 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:471 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:471 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:471 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:471 = 3 ENDIF ;Otherwise IF (CFLAG:471 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:471 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;172,Let Tentacle Clit Tease ;------------------------------------------------- CASE 172 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:PLAYER:11 ;Performed for the first time IF CFLAG:472 == 0 KSTR:(K++) = CFLAG:472 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:472 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:472 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:472 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:472 = 3 ENDIF ;Otherwise IF (CFLAG:472 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:472 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;173,Let Tentacle Nipple Tease ;------------------------------------------------- CASE 173 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:PLAYER:16 ;Performed for the first time IF CFLAG:473 == 0 KSTR:(K++) = CFLAG:473 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:473 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:473 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:473 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:473 = 3 ENDIF ;Otherwise IF (CFLAG:473 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:473 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;174,Let Tentacle Milking ;------------------------------------------------- CASE 174 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:PLAYER:17 ;Performed for the first time IF CFLAG:474 == 0 KSTR:(K++) = CFLAG:474 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:474 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:474 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:474 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:474 = 3 ENDIF ;Otherwise IF (CFLAG:474 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:474 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;175,Let Tentacle Penis Torture ;------------------------------------------------- CASE 175 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:PLAYER:12 ;Performed for the first time IF CFLAG:475 == 0 KSTR:(K++) = CFLAG:475 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:475 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:475 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:475 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:475 = 3 ENDIF ;Otherwise IF (CFLAG:475 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:475 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CASEELSE ENDSELECT ;------------------------------------------------- ;Generic Gentacle ;------------------------------------------------- IF !口上有無確認(0) K_CALL:K = TRAIN_MESSAGE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && !口上有無確認(0) ;WSTR:(K++) = ENDIF ENDIF ;================================================= ;Special Commands ;================================================= ELSEIF RESULT == COMTYPE("特殊コマンド系") && SELECTCOM < 600 SELECTCASE SELECTCOM ;------------------------------------------------- ;180,Lube ;------------------------------------------------- CASE 180 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:392 == 0 KSTR:(K++) = CFLAG:392 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:392 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:392 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:392 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:392 = 3 ENDIF ;Otherwise IF (CFLAG:392 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:392 = 2 ENDIF ENDIF ;------------------------------------------------- ;181,Aphrodesiac ;------------------------------------------------- CASE 181 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:393 == 0 KSTR:(K++) = CFLAG:393 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:393 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:393 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:393 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:393 = 3 ENDIF ;Otherwise IF (CFLAG:393 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:393 = 2 ENDIF ENDIF ;------------------------------------------------- ;182,Diuretic ;------------------------------------------------- CASE 182 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:394 == 0 KSTR:(K++) = CFLAG:394 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:394 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:394 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:394 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:394 = 3 ENDIF ;Otherwise IF (CFLAG:394 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:394 = 2 ENDIF ENDIF ;------------------------------------------------- ;183,Video Camera ;------------------------------------------------- CASE 183 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:28 ;Performed for the first time IF CFLAG:395 == 0 KSTR:(K++) = CFLAG:395 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:395 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:395 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:395 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:395 = 3 ENDIF ;Otherwise IF (CFLAG:395 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:395 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;184,Outdoors Play ;------------------------------------------------- CASE 184 K_CALL:K = TRAIN_MESSAGE ;TEQUIP:29 is the indication of area. ;Add a IF TEQUIP:29 == X for variation ;Abandoned building=1　Forest=2　Park=4　Riverside=8 IF TEQUIP:29 ;Performed for the first time IF CFLAG:396 == 0 KSTR:(K++) = CFLAG:396 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:396 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:396 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:396 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:396 = 3 ENDIF ;Otherwise IF (CFLAG:396 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:396 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;185,Rape Assistant ;------------------------------------------------- CASE 185 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:397 == 0 KSTR:(K++) = CFLAG:397 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:397 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:397 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:397 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:397 = 3 ENDIF ;Otherwise IF (CFLAG:397 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:397 = 2 ENDIF ENDIF ;Call Assistant dialogue ;Raped pleasure dialogue ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_1 ;Feeling good? dialogue ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_2 ;Envious? dialogue ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_3 ;Worried dialogue ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_4 ;------------------------------------------------- ;186,Shame Play ;------------------------------------------------- CASE 186 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:30 ;Performed for the first time IF CFLAG:398 == 0 KSTR:(K++) = CFLAG:398 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:398 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:398 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:398 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:398 = 3 ENDIF ;Otherwise IF (CFLAG:398 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:398 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;187,Bathroom Play ;------------------------------------------------- CASE 187 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:31 ;Performed for the first time IF CFLAG:399 == 0 KSTR:(K++) = CFLAG:399 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:399 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:399 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:399 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:399 = 3 ENDIF ;Otherwise IF (CFLAG:399 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:399 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;188,Shower ;------------------------------------------------- CASE 188 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:32 ;Performed for the first time IF CFLAG:400 == 0 KSTR:(K++) = CFLAG:400 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:400 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:400 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:400 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:400 = 3 ENDIF ;Otherwise IF (CFLAG:400 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:400 = 2 ENDIF ENDIF ;Unequip text ELSE ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;189,Newlywed Play　(Affection/Love) ;------------------------------------------------- CASE 189 K_CALL:K = TRAIN_MESSAGE IF TEQUIP:33 ;Performed for the first time IF CFLAG:401 == 0 KSTR:(K++) = CFLAG:401 = 1 ;Second onward ELSEIF CFLAG:401 < 2 || FLAG:7 == 2 KSTR:(K++) = CFLAG:401 = 2 ENDIF ELSE ;Unequip text IF CFLAG:401 == 1 || FLAG:7 == 2 KSTR:(K++) = ENDIF ENDIF ;------------------------------------------------- ;190,Take A Picture ;------------------------------------------------- CASE 190 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:402 == 0 KSTR:(K++) = CFLAG:402 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:402 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:402 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:402 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:402 = 3 ENDIF ;Otherwise IF (CFLAG:402 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:402 = 2 ENDIF ENDIF ;------------------------------------------------- ;191,Strong Drugs ;------------------------------------------------- CASE 191 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:403 == 0 KSTR:(K++) = CFLAG:403 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:403 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:403 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:403 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:403 = 3 ENDIF ;Otherwise IF (CFLAG:403 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:403 = 2 ENDIF ENDIF ;------------------------------------------------- ;192,Drink From Condom(Slave) ;------------------------------------------------- CASE 192 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:404 == 0 KSTR:(K++) = CFLAG:404 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:404 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:404 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:404 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:404 = 3 ENDIF ;Otherwise IF (CFLAG:404 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:404 = 2 ENDIF ENDIF ;------------------------------------------------- ;193,Drink From Condom(Assistant) ;------------------------------------------------- CASE 193 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:405 == 0 KSTR:(K++) = CFLAG:405 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:405 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:405 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:405 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:405 = 3 ENDIF ;Otherwise IF (CFLAG:405 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:405 = 2 ENDIF ENDIF ;Call assistant dialogue ;Tasty semen dialogue ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_1 ; thisis mine! dialogue ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_2 ;Envious? dialogue ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_3 ;Eating before dialogue ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_4 ;------------------------------------------------- ;194,Snowball ;------------------------------------------------- CASE 194 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:406 == 0 KSTR:(K++) = CFLAG:406 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:406 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:406 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:406 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:406 = 3 ENDIF ;Otherwise IF (CFLAG:406 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:406 = 2 ENDIF ENDIF ;------------------------------------------------- ;195,Force Lactation ;------------------------------------------------- CASE 195 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:431 == 0 KSTR:(K++) = CFLAG:431 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:431 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:431 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:431 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:431 = 3 ENDIF ;Otherwise IF (CFLAG:431 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:431 = 2 ENDIF ENDIF ;------------------------------------------------- ;200,Invite Stranger ;------------------------------------------------- CASE 200 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:433 == 0 KSTR:(K++) = CFLAG:433 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:433 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:433 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:433 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:433 = 3 ENDIF ;Otherwise IF (CFLAG:433 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:433 = 2 ENDIF ENDIF ;------------------------------------------------- ;201,Gang Rape ;------------------------------------------------- CASE 201 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:434 == 0 ;Virginity IF TALENT:0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ;Not a virgin ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CFLAG:434 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:434 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:434 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:434 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:434 = 3 ENDIF ;Otherwise IF (CFLAG:434 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:434 = 2 ENDIF ENDIF ;------------------------------------------------- ;202,Gat%HIS_HER(TARGET)% People ;------------------------------------------------- CASE 202 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:476 == 0 KSTR:(K++) = CFLAG:476 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:476 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:476 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:476 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:476 = 3 ENDIF ;Otherwise IF (CFLAG:476 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:476 = 2 ENDIF ENDIF ;------------------------------------------------- ;203,Send Outside with Earpiece ;------------------------------------------------- CASE 203 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:477 == 0 KSTR:(K++) = CFLAG:477 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:477 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:477 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:477 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:477 = 3 ENDIF ;Otherwise IF (CFLAG:477 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:477 = 2 ENDIF ENDIF ;------------------------------------------------- ;204,Semen Chug ;------------------------------------------------- CASE 204 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:478 == 0 KSTR:(K++) = CFLAG:478 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:478 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:478 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:478 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:478 = 3 ENDIF ;Otherwise IF (CFLAG:478 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:478 = 2 ENDIF ENDIF CASEELSE ENDSELECT ;------------------------------------------------- ;Generic special ;------------------------------------------------- IF !口上有無確認(0) K_CALL:K = TRAIN_MESSAGE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && !口上有無確認(0) ;WSTR:(K++) = ENDIF ENDIF ;================================================= ;500+ - follow-up commands ;================================================= ELSEIF RESULT == COMTYPE("派生系") && SELECTCOM < 600 SELECTCASE SELECTCOM ;------------------------------------------------- ;500,３Ｐ ;------------------------------------------------- CASE 500 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:407 == 0 KSTR:(K++) = CFLAG:407 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:407 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:407 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:407 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:407 = 3 ENDIF ;Otherwise IF (CFLAG:407 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:407 = 2 ENDIF ENDIF ;Call for assistant dialogue ;Pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_1 ;Hurry op ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_2 ;Pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_3 ;Putting inside ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_4 ;------------------------------------------------- ;501,Sixty Nine ;------------------------------------------------- CASE 501 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:408 == 0 KSTR:(K++) = CFLAG:408 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:408 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:408 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:408 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:408 = 3 ENDIF ;Otherwise IF (CFLAG:408 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:408 = 2 ENDIF ENDIF ;------------------------------------------------- ;502,Facesitting ;------------------------------------------------- CASE 502 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:409 == 0 KSTR:(K++) = CFLAG:409 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:409 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:409 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:409 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:409 = 3 ENDIF ;Otherwise IF (CFLAG:409 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:409 = 2 ENDIF ENDIF ;------------------------------------------------- ;503,G Spot Stimulation ;------------------------------------------------- CASE 503 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:410 == 0 KSTR:(K++) = CFLAG:410 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:410 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:410 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:410 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:410 = 3 ENDIF ;Otherwise IF (CFLAG:410 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:410 = 2 ENDIF ENDIF ;------------------------------------------------- ;504,Lotus Position ;------------------------------------------------- CASE 504 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:411 == 0 ;Virginity IF TALENT:0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ;Not a virgin ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CFLAG:411 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:411 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:411 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:411 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:411 = 3 ENDIF ;Otherwise IF (CFLAG:411 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:411 = 2 ENDIF ENDIF ;------------------------------------------------- ;505,Cowgirl Breast Masturbation ;------------------------------------------------- CASE 505 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:412 == 0 ;Virginity IF TALENT:0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ;Not a virgin ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF CFLAG:412 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:412 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:412 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:412 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:412 = 3 ENDIF ;Otherwise IF (CFLAG:412 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:412 = 2 ENDIF ENDIF ;------------------------------------------------- ;506,G Spot Torture ;------------------------------------------------- CASE 506 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:413 == 0 KSTR:(K++) = CFLAG:413 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:413 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:413 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:413 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:413 = 3 ENDIF ;Otherwise IF (CFLAG:413 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:413 = 2 ENDIF ENDIF ;------------------------------------------------- ;507,Uterus Torture ;------------------------------------------------- CASE 507 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:414 == 0 KSTR:(K++) = CFLAG:414 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:414 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:414 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:414 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:414 = 3 ENDIF ;Otherwise IF (CFLAG:414 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:414 = 2 ENDIF ENDIF ;------------------------------------------------- ;508,６９ Titfuck ;------------------------------------------------- CASE 508 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:415 == 0 KSTR:(K++) = CFLAG:415 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:415 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:415 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:415 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:415 = 3 ENDIF ;Otherwise IF (CFLAG:415 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:415 = 2 ENDIF ENDIF ;------------------------------------------------- ;509,Milking ;------------------------------------------------- CASE 509 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:416 == 0 KSTR:(K++) = CFLAG:416 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:416 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:416 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:416 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:416 = 3 ENDIF ;Otherwise IF (CFLAG:416 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:416 = 2 ENDIF ENDIF ;------------------------------------------------- ;510,Double Intercrural ;------------------------------------------------- CASE 510 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:417 == 0 KSTR:(K++) = CFLAG:417 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:417 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:417 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:417 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:417 = 3 ENDIF ;Otherwise IF (CFLAG:417 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:417 = 2 ENDIF ENDIF ;Call for assistant dialogue ;Pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_1 ;Giving pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_2 ;Pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_3 ;Excessive pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_4 ;Mutual pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_5 ;------------------------------------------------- ;511,Double Blowjob ;------------------------------------------------- CASE 511 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:418 == 0 KSTR:(K++) = CFLAG:418 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:418 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:418 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:418 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:418 = 3 ENDIF ;Otherwise IF (CFLAG:418 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:418 = 2 ENDIF ENDIF ;Call for assistant dialogue ;Very pleasant ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_1 ;Pleasuring ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_2 ;Praising Master's penis ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_3 ;Double load drink ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_4 ;Pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_5 ;------------------------------------------------- ;512,Anal Cowgirl Breast Masturbation ;------------------------------------------------- CASE 512 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:419 == 0 KSTR:(K++) = CFLAG:419 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:419 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:419 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:419 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:419 = 3 ENDIF ;Otherwise IF (CFLAG:419 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:419 = 2 ENDIF ENDIF ;------------------------------------------------- ;513,Mouth & Vagina Rape ;------------------------------------------------- CASE 513 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:439 == 0 KSTR:(K++) = CFLAG:439 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:439 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:439 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:439 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:439 = 3 ENDIF ;Otherwise IF (CFLAG:439 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:439 = 2 ENDIF ENDIF ;Call for assistant dialogue ;Pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_1 ;Praising mouth ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_2 ;Hurry up ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_3 ;Pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_4 ;------------------------------------------------- ;514,Mouth & Anal Rape ;------------------------------------------------- CASE 514 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:440 == 0 KSTR:(K++) = CFLAG:440 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:440 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:440 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:440 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:440 = 3 ENDIF ;Otherwise IF (CFLAG:440 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:440 = 2 ENDIF ENDIF ;Call for assistant dialogue ;Pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_1 ;Praising mouth ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_2 ;Hurry up ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_3 ;Pleasure ; K_CALL:K = KOJO_MESSAGE_ASSIPAIR_COM_4 ;------------------------------------------------- ;515,Anal Lotus Position ;------------------------------------------------- CASE 515 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:441 == 0 KSTR:(K++) = CFLAG:441 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:441 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:441 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:441 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:441 = 3 ENDIF ;Otherwise IF (CFLAG:441 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:441 = 2 ENDIF ENDIF CASEELSE ENDSELECT ;------------------------------------------------- ;500+ generic ;------------------------------------------------- IF !口上有無確認(0) K_CALL:K = TRAIN_MESSAGE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && !口上有無確認(0) KSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && !口上有無確認(0) ;WSTR:(K++) = ENDIF ENDIF ;================================================= ;600Non-combatant commands ;================================================= ELSEIF SELECTCOM >= 600 SELECTCASE SELECTCOM ;------------------------------------------------- ;600,Basic Training ;------------------------------------------------- CASE 600 K_CALL:K = TRAIN_MESSAGE ;Performed for the first time IF CFLAG:481 == 0 KSTR:(K++) = CFLAG:481 = 1 ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:481 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) KSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) KSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) KSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) KSTR:(K++) = ENDIF CFLAG:481 = 4 ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:481 < 2 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:481 = 3 ENDIF ;Otherwise IF (CFLAG:481 || FLAG:7 == 2) && !口上有無確認(0) KSTR:(K++) = CFLAG:481 = 2 ENDIF ENDIF ;------------------------------------------------- ;601,Try Summoning Demons ;------------------------------------------------- CASE 601 K_CALL:K = TRAIN_MESSAGE IF TALENT:サマナー && !TALENT:非戦闘員 KSTR:(K++) = ENDIF ;------------------------------------------------- ;602,Pull-out Shadow ;------------------------------------------------- CASE 602 K_CALL:K = TRAIN_MESSAGE IF TALENT:ペルソナ使い && !TALENT:非戦闘員 KSTR:(K++) = ; ;Initial persona definition ;ABL:初期ペルソナ = ; ;初期ペルソナ能力変更 ;ABL:ペルソナ1データ／スキル1 = ;ABL:ペルソナ1データ／習得スキル1 = ;ABL:ペルソナ1データ／習得LV1 = ENDIF ;------------------------------------------------- ;603,Awaken ;------------------------------------------------- CASE 603 K_CALL:K = TRAIN_MESSAGE IF TALENT:異能者 && !TALENT:非戦闘員 KSTR:(K++) = ; ;Adept definition ;ABL:スキル1 = ;ABL:習得スキル1 ;ABL:習得LV1 ENDIF ;------------------------------------------------- ;604,nject Atma virus ;------------------------------------------------- CASE 604 K_CALL:K = TRAIN_MESSAGE IF TALENT:喰奴 && !TALENT:非戦闘員 KSTR:(K++) = ENDIF ;------------------------------------------------- ;605,Spirit Medium Experiment ;------------------------------------------------- CASE 605 K_CALL:K = TRAIN_MESSAGE IF TALENT:デビルシフター && !TALENT:非戦闘員 KSTR:(K++) = ; ;Define linked demon ;CFLAG:初期リンク悪魔 ; ;Define changes to demon ;ABL:初期変身悪魔スキル1 ;ABL:初期変身悪魔習得スキル1 ;ABL:初期変身悪魔習得LV1 ;ABL:初期リンク悪魔攻撃相性 ;ABL:初期リンク悪魔最低攻撃回数 ;ABL:初期リンク悪魔最大攻撃回数 ;ABL:初期リンク悪魔射程 ;ABL:初期リンク悪魔攻撃範囲 ;ABL:初期リンク悪魔追加効果 ;ABL:初期リンク悪魔追加効果相性 ;ABL:初期リンク悪魔追加効果命中率 ;ABL:初期リンク悪魔追加効果最大命中率 ENDIF ;------------------------------------------------- ;606,Reconstruction Surgery ;------------------------------------------------- CASE 606 K_CALL:K = TRAIN_MESSAGE IF TALENT:機械の乙女 && !TALENT:非戦闘員 KSTR:(K++) = ENDIF CASEELSE ENDSELECT ENDIF ;------------------------------------------------- ;Generic for all cases not covered before. ;------------------------------------------------- IF !口上有無確認(0) SELECTCASE SELECTCOM ENDSELECT ENDIF ;------------------------------------------------ ;Proceed with dialogue. ;------------------------------------------------ CALL 口上変数表示 ;Defer to another dialogue in case nothing above generated a text to be displayed. IF RESULT == 0 TRYCCALLFORM KOJO_MESSAGE_COM_ZZZ CATCH CALL TRAIN_MESSAGE ENDCATCH ENDIF ;------------------------------------------------- ;Gangrape text ;CASE 0 is always called out at first ;If RETURN gives 0, will give a generic response ;CFLAGs are not used ;COMF201_uses LOCAL, so please do not use it. ;------------------------------------------------- @KOJO_MESSAGE_RINKAN_K9001, ARG:1 , ARG:2 CALL 口上変数初期化 SELECTCASE ARG:1 CASE 0 ;CASE 0はオリジナル輪姦口上 ;C:一回あたりの帰宅人数、D：興奮度増加(及び減少) ;CとDはオリジナル輪姦口上内のみ使う ;C += 、D += を使う IF ARG:2 == 1 ;ハードON ELSE ;ハードOFF ENDIF ;ハード系 ;胸を踏まれる（巨乳・爆乳のみ） CASE 1 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && FLAG:7 == 2 ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF KSTR:0 == "" WSTR:(K++) = ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && FLAG:7 == 2 && KSTR:0 == "" WSTR:(K++) = ENDIF ;Otherwise IF FLAG:7 == 2 && KSTR:0 == "" WSTR:(K++) = ENDIF ;頭を踏まれる CASE 2 ;暴力を振るわれる CASE 3 ;タバコの根性焼き ;興奮度が低く、反抗的、気丈、プライド高い、生意気、抵抗を持っている CASE 4 ;地面に垂れた精液舐めとらせる ;マゾっ気３以上 CASE 5 ;体に落書きをされて犯される CASE 6 ;尻突き上げてバックから犯されつつ、頭を踏んづけられて屈辱で涙目状態 CASE 7 ;Normal系 ;Lust系で目の前に棒並べられて、どれが欲しいか選ばせるとか（淫乱・娼婦のみ） CASE 8 ;巨乳以上のキャラだと「その乳は飾りか？遊ばせてるんじゃねえ」とか罵られパイズリする（巨乳・爆乳のみ） CASE 9 ;挿れられるのだけは回避しようと必死に口と手で群がるチンポにご奉仕する（恋幕・親愛のみ） CASE 10 ;;両穴突かれながら無理やり笑顔とピースサインとらされて記念撮影 CASE 11 ;;輸姦後の後始末描写で、本人精液でどろどろにされてるのに周囲の男達の肉棒を舌で掃除させられてる CASE 12 ;中に出されても即座にほかの人に交代 CASE 13 ;一斉射精で精液まみれ CASE 14 ;;両穴突かれて同時射精 CASE 15 ;騎乗位+両脇コキ CASE 16 ;;口+マンコ CASE 17 ENDSELECT CALL 口上変数表示 ;Defer to another dialogue in case nothing above generated a text to be displayed. IF RESULT == 0 TRYCCALLFORM KOJO_MESSAGE_RINKAN_ZZZ CATCH ENDCATCH ENDIF ;------------------------------------------------- ;@KOJO_MESSAGE_PALAMCNG functions (9001 - charanum) ;Responses to parameter changes. ;------------------------------------------------- ;------------------------------------------------- ;@KOJO_MESSAGE_PALAMCNG_A function (9001 - charanum) ;Triggered on training person's ejaculation ;------------------------------------------------- @KOJO_MESSAGE_PALAMCNG_A_K9001 ;Uncomment to skip on assistant training ;SIF ASSI > 0 && ASSIPLAY ; RETURN 0 ;Skip on ballgag IF TEQUIP:20 && SELECTCOM != 107 CALL PALAM_MESSAGE_A RETURN 0 ENDIF ;-------------------------------------------------- ;Specific master/assistant call (change Y1 to specific character and define function elsewhere) ;-------------------------------------------------- ;IF NO:MASTER == Y1 ; CALL KOJO_MESSAGE_PALAMCNG_A_PY1_K9001 ; RETURN 0 ;ENDIF ;IF ASSI > 0 && ASSIPLAY ; IF NO:ASSI == Y1 ; CALL KOJO_MESSAGE_PALAMCNG_A_PY1_K9001 ; RETURN 0 ; ENDIF ;ENDIF ;------------------------------------------------- ;Trainer cumshot dialogue ;------------------------------------------------- CALL 口上変数初期化 LOCAL = 0;射精量 ;------------------------------------------------- ;Vary by cumshot location ;------------------------------------------------- IF CFLAG:106 LOCAL = 1 K_CALL:K = PALAM_MESSAGE_A IF 1 == 0 ;Hair ELSEIF CFLAG:106 == 1 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:221 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:221= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:221= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:221= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:221= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:221 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:221= 2 ENDIF ;Otherwise IF (CFLAG:221 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:221= 1 ENDIF ;Facial ELSEIF CFLAG:106 == 2 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:222 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:222= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:222= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:222= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:222= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:222 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:222= 2 ENDIF ;Otherwise IF (CFLAG:222 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:222= 1 ENDIF ;Chest ELSEIF CFLAG:106 == 3 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:223 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:223= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:223= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:223= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:223= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:223 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:223= 2 ENDIF ;Otherwise IF (CFLAG:223 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:223= 1 ENDIF ;Belly ELSEIF CFLAG:106 == 4 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:224 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:224= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:224= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:224= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:224= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:224 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:224= 2 ENDIF ;Otherwise IF (CFLAG:224 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:224= 1 ENDIF ;Armpit ELSEIF CFLAG:106 == 5 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:225 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:225= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:225= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:225= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:225= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:225 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:225= 2 ENDIF ;Otherwise IF (CFLAG:225 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:225= 1 ENDIF ;Thigh ELSEIF CFLAG:106 == 6 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:226 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:226= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:226= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:226= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:226= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:226 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:226= 2 ENDIF ;Otherwise IF (CFLAG:226 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:226= 1 ENDIF ;On pussy ELSEIF CFLAG:106 == 7 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:227 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:227= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:227= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:227= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:227= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:227 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:227= 2 ENDIF ;Otherwise IF (CFLAG:227 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:227= 1 ENDIF ;On butt ELSEIF CFLAG:106 == 8 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:228 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:228= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:228= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:228= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:228= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:228 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:228= 2 ENDIF ;Otherwise IF (CFLAG:228 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:228= 1 ENDIF ;In condom ELSEIF CFLAG:106 == 9 LOCAL = 0 ;Through sex IF GROUPMATCH(SELECTCOM , 60 , 61 , 66 , 68 , 69 , 72 , 504 , 505 , 506 , 507) IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:229 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:229= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:229= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:229= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:229= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:229 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:229= 2 ENDIF ;Otherwise IF (CFLAG:229 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:229= 1 ENDIF ELSE IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:230 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:230= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:230= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:230= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:230= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:230 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:230= 2 ENDIF ;Otherwise IF (CFLAG:230 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:230= 1 ENDIF ENDIF ENDIF ENDIF ;------------------------------------------------- ;Ejaculations except on hand and in mouth ;By kiss, sumata, intercrural, footjob... ;------------------------------------------------- IF TFLAG:9 > 0 K_CALL:K = PALAM_MESSAGE_A ;Large ejaculation IF TFLAG:9 > 1 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:230 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:230= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:230= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:230= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:230= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:230 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:230= 2 ENDIF ;Otherwise IF (CFLAG:230 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:230= 1 ENDIF ENDIF ;Normal IF !口上有無確認(0) IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:230 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:230= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:230= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:230= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:230= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:230 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:230= 2 ENDIF ;Otherwise IF (CFLAG:230 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:230= 1 ENDIF ENDIF LOCAL = TFLAG:9 ENDIF ;------------------------------------------------- ;Cum inside assistant ;------------------------------------------------- IF TFLAG:7 > 0 K_CALL:K = PALAM_MESSAGE_A ;Large ejaculation IF TFLAG:7 > 1 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:232 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:232= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:232= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:232= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:232= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:232 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:232= 2 ENDIF ;Otherwise IF (CFLAG:232 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:232= 1 ENDIF ENDIF ;Normal IF !口上有無確認(0) IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:232 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:232= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:232= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:232= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:232= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:232 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:232= 2 ENDIF ;Otherwise IF (CFLAG:232 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:232= 1 ENDIF ENDIF LOCAL = TFLAG:7 ENDIF ;------------------------------------------------- ;Cum into mouth ;------------------------------------------------- IF TFLAG:0 > 0 K_CALL:K = PALAM_MESSAGE_A ;By forced blowjob IF SELECTCOM == 140 ;Large ejaculation IF TFLAG:0 > 1 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:233 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:233= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:233= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:233= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:233= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:233 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:233= 2 ENDIF ;Otherwise IF (CFLAG:233 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:233= 1 ENDIF ENDIF ;Normal IF !口上有無確認(0) IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:233 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:233= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:233= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:233= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:233= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:233 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:233= 2 ENDIF ;Otherwise IF (CFLAG:233 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:233= 1 ENDIF ENDIF ;Otherwise and drinking cum ELSE ;Large ejaculation IF TFLAG:0 > 1 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:233 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:233= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:233= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:233= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:233= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:233 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:233= 2 ENDIF ;Otherwise IF (CFLAG:233 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:233= 1 ENDIF ENDIF ;Normal IF !口上有無確認(0) IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:233 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:233= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:233= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:233= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:233= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:233 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:233= 2 ENDIF ;Otherwise IF (CFLAG:233 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:233= 1 ENDIF ENDIF ENDIF LOCAL = TFLAG:0 ENDIF ;------------------------------------------------- ;By Handjob ;------------------------------------------------- IF TFLAG:1 > 0 K_CALL:K = PALAM_MESSAGE_A ;Large ejaculation IF TFLAG:1 > 1 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:234 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:234= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:234= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:234= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:234= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:234 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:234= 2 ENDIF ;Otherwise IF (CFLAG:234 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:234= 1 ENDIF ENDIF ;Normal IF !口上有無確認(0) IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:234 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:234= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:234= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:234= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:234= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:234 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:234= 2 ENDIF ;Otherwise IF (CFLAG:234 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:234= 1 ENDIF ENDIF LOCAL = TFLAG:1 ENDIF ;------------------------------------------------- ;By boobjob ;------------------------------------------------- IF TFLAG:34 > 0 K_CALL:K = PALAM_MESSAGE_A ;Large ejaculation IF TFLAG:34 > 1 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:235 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:235= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:235= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:235= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:235= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:235 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:235= 2 ENDIF ;Otherwise IF (CFLAG:235 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:235= 1 ENDIF ENDIF ;Normal IF !口上有無確認(0) IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:235 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:235= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:235= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:235= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:235= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:235 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:235= 2 ENDIF ;Otherwise IF (CFLAG:235 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:235= 1 ENDIF ENDIF LOCAL = TFLAG:34 ENDIF W:K = 1 ;------------------------------------------------- ;By onahole ;------------------------------------------------- IF TFLAG:16 == 1 K_CALL:K = PALAM_MESSAGE_A ;Large ejaculation IF TFLAG:16 > 1 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:236 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:236= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:236= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:236= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:236= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:236 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:236= 2 ENDIF ;Otherwise IF (CFLAG:236 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:236= 1 ENDIF ENDIF ;Normal IF !口上有無確認(0) IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:236 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:236= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:236= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:236= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:236= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:236 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:236= 2 ENDIF ;Otherwise IF (CFLAG:236 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:236= 1 ENDIF ENDIF LOCAL = 0 ENDIF ;------------------------------------------------- ;By sex ;------------------------------------------------- IF TFLAG:2 > 0 LOCAL = TFLAG:2 K_CALL:K = PALAM_MESSAGE_A ;Anal IF SELECTCOM == 62 || SELECTCOM == 63 || SELECTCOM == 67 || SELECTCOM == 70 || SELECTCOM == 71 || SELECTCOM == 512 ;Large ejaculation IF TFLAG:2 > 1 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:237 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:237= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:237= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:237= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:237= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:237 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:237= 2 ENDIF ;Otherwise IF (CFLAG:237 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:237= 1 ENDIF ENDIF ;Normal IF !口上有無確認(0) IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:237 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:237= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:237= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:237= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:237= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:237 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:237= 2 ENDIF ;Otherwise IF (CFLAG:237 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:237= 1 ENDIF ENDIF ;Vaginal ELSE ;By g-spot/womb opening IF SELECTCOM == 506 || SELECTCOM == 507 ;Large ejaculation IF TFLAG:2 > 1 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:238 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:238= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:238= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:238= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:238= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:238 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:238= 2 ENDIF ;Otherwise IF (CFLAG:238 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:238= 1 ENDIF ENDIF ;Normal IF !口上有無確認(0) IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:238 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:238= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:238= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:238= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:238= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:238 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:238= 2 ENDIF ;Otherwise IF (CFLAG:238 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:238= 1 ENDIF ENDIF ENDIF ;Otherwise by sex IF !口上有無確認(0) ;Large ejaculation IF TFLAG:2 > 1 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:239 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:239= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:239= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:239= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:239= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:239 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:239= 2 ENDIF ;Otherwise IF (CFLAG:239 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:239= 1 ENDIF ENDIF ;Normal IF !口上有無確認(0) IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:239 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:239= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:239= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:239= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:239= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:239 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:239= 2 ENDIF ;Otherwise IF (CFLAG:239 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:239= 1 ENDIF ENDIF ENDIF ENDIF ENDIF ;------------------------------------------------- ;By reverse rape ;------------------------------------------------- IF SELECTCOM == 64 && TFLAG:10 > 0 LOCAL = TFLAG:10 K_CALL:K = PALAM_MESSAGE_A ;Large ejaculation IF TFLAG:10 > 1 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:240 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:240= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:240= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:240= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:240= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:240 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:240= 2 ENDIF ;Otherwise IF (CFLAG:240 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:240= 1 ENDIF ENDIF ;Normal IF !口上有無確認(0) IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:240 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:240= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:240= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:240= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:240= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:240 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:240= 2 ENDIF ;Otherwise IF (CFLAG:240 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:240= 1 ENDIF ENDIF ENDIF ;------------------------------------------------- ;All other trainer ejaculation responses ;------------------------------------------------- IF !口上有無確認(0) && LOCAL > 0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:240 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:240= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:240= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:240= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:240= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:240 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:240= 2 ENDIF ;Otherwise IF (CFLAG:240 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:240= 1 ENDIF ENDIF CALL 口上変数表示 ;Defer to another dialogue in case nothing above generated a text to be displayed. IF RESULT == 0 TRYCCALLFORM KOJO_MESSAGE_PALAMCNG_A_ZZZ CATCH CALL PALAM_MESSAGE_A ENDCATCH ENDIF ;------------------------------------------------- ;@KOJO_MESSAGE_PALAMCNG_E function（9001-charanum） ;Triggered on tentacle ejaculating. ;------------------------------------------------- @KOJO_MESSAGE_PALAMCNG_E_K9001 ;Uncomment to skip on assistant ;SIF ASSI > 0 && ASSIPLAY ; RETURN 0 ;Skip on ballgag IF TEQUIP:20 && SELECTCOM != 107 CALL PALAM_MESSAGE_E RETURN 0 ENDIF ;-------------------------------------------------- ;Specific assistant/master dialogue (Y1 - checked character) ;-------------------------------------------------- ;IF NO:MASTER == Y1 ; CALL KOJO_MESSAGE_PALAMCNG_E_PY1_K9001 ; RETURN 0 ;ENDIF ;IF ASSI > 0 && ASSIPLAY ; IF NO:ASSI == Y1 ; CALL KOJO_MESSAGE_PALAMCNG_E_PY1_K9001 ; RETURN 0 ; ENDIF ;ENDIF ;------------------------------------------------- ;Tentacle ejaculating text ;------------------------------------------------- CALL 口上変数初期化 ;------------------------------------------------- ;Tentacle ejaculation ;------------------------------------------------- IF TFLAG:15 >0 K_CALL:K = PALAM_MESSAGE_E IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:241 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:241= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:241= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:241= 3 ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = CFLAG:241= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:241 < 2 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:241= 2 ENDIF ;Otherwise IF (CFLAG:241 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:241= 1 ENDIF ENDIF CALL 口上変数表示 IF RESULT == 0 TRYCCALLFORM KOJO_MESSAGE_COM_ZZZ CATCH CALL PALAM_MESSAGE_E ENDCATCH ENDIF ;------------------------------------------------- ;@KOJO_MESSAGE_PALAMCNG_B function（9001-charanum） ;Triggered on trained character's orgasm ;------------------------------------------------- @KOJO_MESSAGE_PALAMCNG_B_K9001 ;Uncomment to skip on assistant training ;SIF ASSI > 0 && ASSIPLAY ; RETURN 0 ;Skip on ballgag IF TEQUIP:20 && SELECTCOM != 107 CALL PALAM_MESSAGE_B RETURN 0 ENDIF ;Skip outside reasonable bounds IF SELECTCOM < 0 || SELECTCOM > 700 RETURN 0 ENDIF ;-------------------------------------------------- ;Specific master/assistant call (change Y1 to specific character and define function elsewhere) ;-------------------------------------------------- ;IF NO:MASTER == Y1 ; CALL KOJO_MESSAGE_PALAMCNG_B_PY1_K9001 ; RETURN 0 ;ENDIF ;IF ASSI > 0 && ASSIPLAY ; IF NO:ASSI == Y1 ; CALL KOJO_MESSAGE_PALAMCNG_B_PY1_K9001 ; RETURN 0 ; ENDIF ;ENDIF ;------------------------------------------------- ;Trained character's orgasm ;------------------------------------------------- CALL 口上変数初期化 ;------------------------------------------------- ; First C orgasm ;------------------------------------------------- IF NOWEX:0 > 0 && CFLAG:242 == 0 WSTR:(K++) = CFLAG:242 = 1 ENDIF ;------------------------------------------------- ;First V orgasm ;------------------------------------------------- IF NOWEX:1 > 0 && CFLAG:243 == 0 WSTR:(K++) = CFLAG:243 = 1 ENDIF ;------------------------------------------------- ;First A orgasm ;------------------------------------------------- IF NOWEX:2 > 0 && CFLAG:244 == 0 WSTR:(K++) = CFLAG:244 = 1 ENDIF ;------------------------------------------------- ;First B orgasm ;------------------------------------------------- IF NOWEX:3 > 0 && CFLAG:245 == 0 WSTR:(K++) = CFLAG:245 = 1 ENDIF ;------------------------------------------------- ;Orgasm ;------------------------------------------------- SIF 口上有無確認(0) && K > 0 CALL WSTR書き込み,K - 1 LOCAL = K IF TFLAG:29 > 0 K_CALL:K = PALAM_MESSAGE_B ;Strong orgasm IF TFLAG:29 > 1 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:246 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:246= 3 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:246= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:246= 3 ENDIF ;Generic Fallen IF !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:246= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:246 < 2 || FLAG:7 == 2) && !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:246= 2 ENDIF ;Otherwise IF (CFLAG:246 < 1 || FLAG:7 == 2) && !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:246= 1 ENDIF ENDIF ;Orgasm IF !口上有無確認(LOCAL) IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:246 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:246= 3 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:246= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:246= 3 ENDIF ;Generic Fallen IF !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:246= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:246 < 2 || FLAG:7 == 2) && !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:246= 2 ENDIF ;Otherwise IF (CFLAG:246 < 1 || FLAG:7 == 2) && !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:246= 1 ENDIF ENDIF ENDIF ;------------------------------------------------- ;Trained person ejaculates ;------------------------------------------------- ;Ejaculation SIF 口上有無確認(0) && K > 0 CALL WSTR書き込み,K - 1 LOCAL = K IF TFLAG:10 > 0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:247 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:247= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:247= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:247= 3 ENDIF ;Generic Fallen IF !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:247= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:247 < 2 || FLAG:7 == 2) && !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:247= 2 ENDIF ;Otherwise IF (CFLAG:247 < 1 || FLAG:7 == 2) && !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:247= 1 ENDIF ENDIF ;------------------------------------------------- ;Milk spurt ;------------------------------------------------- SIF 口上有無確認(0) && K > 0 CALL WSTR書き込み,K - 1 LOCAL = K ;Milk overflows IF TFLAG:11 > 0 IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:248 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:248= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:248= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:248= 3 ENDIF ;Generic Fallen IF !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:248= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:248 < 2 || FLAG:7 == 2) && !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:248= 2 ENDIF ;Otherwise IF (CFLAG:248 < 1 || FLAG:7 == 2) && !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:248= 1 ENDIF ENDIF ;------------------------------------------------- ;Urination ;------------------------------------------------- ;Urination SIF 口上有無確認(0) && K > 0 CALL WSTR書き込み,K - 1 LOCAL = K IF TFLAG:29 > 0 && (TEQUIP:27 || TALENT:57) IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:249 < 3 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = CFLAG:249= 4 ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = CFLAG:249= 3 ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = CFLAG:249= 3 ENDIF ;Generic Fallen IF !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:249= 3 ENDIF ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && (CFLAG:249 < 2 || FLAG:7 == 2) && !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:249= 2 ENDIF ;Otherwise IF (CFLAG:249 < 1 || FLAG:7 == 2) && !口上有無確認(LOCAL) WSTR:(K++) = CFLAG:249= 1 ENDIF ENDIF CALL 口上変数表示 ;Defer to another dialogue in case nothing above generated a text to be displayed. IF RESULT == 0 TRYCCALLFORM KOJO_MESSAGE_PALAMCNG_B_ZZZ CATCH CALL PALAM_MESSAGE_B ENDCATCH ENDIF ;------------------------------------------------- ;@KOJO_MESSAGE_PALAMCNG_C function (9001 - charanum) ;After command responses ;------------------------------------------------- @KOJO_MESSAGE_PALAMCNG_C_K9001 ;Uncomment to skip on assistant training ;SIF ASSI > 0 && ASSIPLAY ; RETURN 0 ;Skip on ballgag IF TEQUIP:20 && SELECTCOM != 107 CALL PALAM_MESSAGE_C RETURN 0 ENDIF ;-------------------------------------------------- ;Specific master/assistant call (change Y1 to specific character and define function elsewhere) ;-------------------------------------------------- ;IF NO:MASTER == Y1 ; CALL KOJO_MESSAGE_PALAMCNG_C_PY1_K9001 ; RETURN 0 ;ENDIF ;IF ASSI > 0 && ASSIPLAY ; IF NO:ASSI == Y1 ; CALL KOJO_MESSAGE_PALAMCNG_C_PY1_K9001 ; RETURN 0 ; ENDIF ;ENDIF ;------------------------------------------------- ;After command responses ;------------------------------------------------- ;------------------------------------------------- ;Virginity loss (virgin) ;------------------------------------------------- CALL 口上変数初期化 IF TFLAG:3 > 0 K_CALL:K = PALAM_MESSAGE_C ;Loss by sex with Master while Love IF TFLAG:20 WSTR:(K++) = ;other virginity losses ELSE ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Surrender Mark LV3 IF MARK:2 == 3 && !口上有無確認(0) WSTR:(K++) = ENDIF ;Ordinary IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF ENDIF ;------------------------------------------------- ;After doing nothing ;------------------------------------------------- IF SELECTCOM == 21 K_CALL:K = PALAM_MESSAGE_C ;Desire 5+ IF !口上有無確認(0) && PALAM:5 >= PALAMLV:5 ;Fallen IF 陥落() WSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF ;Desire 3+ and aphrodisiac IF !口上有無確認(0) && PALAM:5 >= PALAMLV:3 && TEQUIP:26 ;Fallen IF 陥落() WSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF ;Desire 3+ IF !口上有無確認(0) && PALAM:5 >= PALAMLV:3 ;Fallen IF 陥落() WSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF ENDIF ;------------------------------------------------- ;Cleaning blowjob ;------------------------------------------------- IF TFLAG:8 > 0 ;ABL:cum addict　ABL:ASSI:cum addict K_CALL:K = PALAM_MESSAGE_C ;Snowball with assistant after double BJ, with cum addiction IF TFLAG:8 >= 2 ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Obedience 3+ IF ABL:0 >= 3 && !口上有無確認(0) WSTR:(K++) = ENDIF ;Ordinary IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF ;Double BJ with assistant IF TFLAG:8 >= 2 && !口上有無確認(0) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Obedience 3+ IF ABL:0 >= 3 && !口上有無確認(0) WSTR:(K++) = ENDIF ;Ordinary IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF ;Cleaning BJ after double BJ IF TFLAG:0 && TFLAG:6 && !口上有無確認(0) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Obedience 3+ IF ABL:0 >= 3 && !口上有無確認(0) WSTR:(K++) = ENDIF ;Ordinary IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF ;Cleaning BJ after BJ IF !口上有無確認(0) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Obedience 3+ IF ABL:0 >= 3 && !口上有無確認(0) WSTR:(K++) = ENDIF ;Ordinary IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF ENDIF CALL 口上変数表示 ;Defer to another dialogue in case nothing above generated a text to be displayed. IF RESULT == 0 TRYCCALLFORM KOJO_MESSAGE_COM_ZZZ CATCH CALL PALAM_MESSAGE_C ENDCATCH ENDIF ;------------------------------------------------- ;@KOJO_MESSAGE_PALAMCNG_D function (9001 - charanum) ;Dialogue in response to parameter changes ;------------------------------------------------- @KOJO_MESSAGE_PALAMCNG_D_K9001 ;Uncomment to skip on assistant training ;SIF ASSI > 0 && ASSIPLAY ; RETURN 0 ;Skip on ballgag IF TEQUIP:20 && SELECTCOM != 107 CALL PALAM_MESSAGE_D RETURN 0 ENDIF ;-------------------------------------------------- ;Specific master/assistant call (change Y1 to specific character and define function elsewhere) ;-------------------------------------------------- ;IF NO:MASTER == Y1 ; CALL KOJO_MESSAGE_PALAMCNG_D_PY1_K9001 ; RETURN 0 ;ENDIF ;IF ASSI > 0 && ASSIPLAY ; IF NO:ASSI == Y1 ; CALL KOJO_MESSAGE_PALAMCNG_D_PY1_K9001 ; RETURN 0 ; ENDIF ;ENDIF ;------------------------------------------------- ;Dialogue in response to parameter changes ;------------------------------------------------- CALL 口上変数初期化 ;------------------------------------------------- ;LUBRIC 3 first time ;------------------------------------------------- P = PALAM:4 + CUP:4 IF P > PALAMLV:4 && CFLAG:250 == 0 K_CALL:K = PALAM_MESSAGE_D ;after lube IF SELECTCOM == 180 WSTR:(K++) = ;Otherwise ELSE WSTR:(K++) = ENDIF CFLAG:250 = 1 ENDIF ;------------------------------------------------- ;DESIRE 3 first time ;------------------------------------------------- P = PALAM:6 + CUP:6 IF P > PALAMLV:3 && CFLAG:251 == 0 K_CALL:K = PALAM_MESSAGE_D ;媚薬を使った場合 IF SELECTCOM == 181 WSTR:(K++) = ;Otherwise ELSE WSTR:(K++) = ENDIF CFLAG:251 = 1 ENDIF ;------------------------------------------------- ;SURREN 3 first time ;------------------------------------------------- P = PALAM:7 + CUP:7 IF P > PALAMLV:3 && CFLAG:252 == 0 K_CALL:K = PALAM_MESSAGE_D WSTR:(K++) = CFLAG:252 = 1 ENDIF ;------------------------------------------------- ;SUBMIT 3 first time ;------------------------------------------------- P = PALAM:5 + CUP:5 IF P > PALAMLV:3 && CFLAG:253 == 0 K_CALL:K = PALAM_MESSAGE_D ;Fallen IF TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8 WSTR:(K++) = ;Otherwise ELSE WSTR:(K++) = ENDIF CFLAG:253 = 1 ENDIF ;------------------------------------------------- ;FEAR 3 first time ;------------------------------------------------- P = PALAM:11 + CUP:11 IF P > PALAMLV:3 && CFLAG:254 == 0 K_CALL:K = PALAM_MESSAGE_D ;Fallen IF TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8 WSTR:(K++) = ;Otherwise ELSE WSTR:(K++) = ENDIF CFLAG:254 = 1 ENDIF CALL 口上変数表示 IF RESULT == 0 TRYCCALLFORM KOJO_MESSAGE_PALAMCNG_D_ZZZ CATCH CALL PALAM_MESSAGE_D ENDCATCH ENDIF ;------------------------------------------------- ;@KOJO_MESSAGE_MARKCNG function (9001 - charanum) ;Mark change responses ;Called after earning a mark ;------------------------------------------------- @KOJO_MESSAGE_MARKCNG_K9001 ;Uncomment to skip on assistant training ;SIF ASSI > 0 && ASSIPLAY ; RETURN 0 ;Skip on ballgag IF TEQUIP:20 && SELECTCOM != 107 CALL MARK_MESSAGE RETURN 0 ENDIF CALL 口上変数初期化 ;-------------------------------------------------- ;Specific master/assistant call (change Y1 to specific character and define function elsewhere) ;-------------------------------------------------- ;IF NO:MASTER == Y1 ; CALL KOJO_MESSAGE_MARKCNG_PY1_K9001 ; RETURN 0 ;ENDIF ;IF ASSI > 0 && ASSIPLAY ; IF NO:ASSI == Y1 ; CALL KOJO_MESSAGE_MARKCNG_PY1_K9001 ; RETURN 0 ; ENDIF ;ENDIF ;------------------------------------------------- ;Pain Mark Lv3 ;------------------------------------------------- LOCAL = K IF TFLAG:22 == 3 K_CALL:K = MARK_MESSAGE_A ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Ordinary IF !口上有無確認(LOCAL) WSTR:(K++) = ENDIF SIF !口上有無確認(LOCAL) CALL MARK_MESSAGE_A ENDIF ;------------------------------------------------- ;Pleasure MarkLv3 ;------------------------------------------------- LOCAL = K IF TFLAG:23 == 3 K_CALL:K = MARK_MESSAGE_P ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Ordinary IF !口上有無確認(LOCAL) WSTR:(K++) = ENDIF SIF !口上有無確認(LOCAL) CALL MARK_MESSAGE_P ENDIF ;------------------------------------------------- ;Surrender Mark LV3 ;------------------------------------------------- LOCAL = K IF TFLAG:24 == 13 || TFLAG:24 == 23 || TFLAG:24 == 33 K_CALL:K = MARK_MESSAGE_S ;快楽による屈服 IF TFLAG:24 == 13 WSTR:(K++) = ;恐怖と苦痛による屈服 ELSEIF TFLAG:24 == 23 WSTR:(K++) = ;屈服と恭順による屈服 ELSEIF TFLAG:24 == 33 WSTR:(K++) = ENDIF SIF !口上有無確認(LOCAL) CALL MARK_MESSAGE_S ENDIF ;------------------------------------------------- ;Hate Mark LV3 ;------------------------------------------------- LOCAL = K IF TFLAG:21 == 3 K_CALL:K = MARK_MESSAGE_R ;Fallen IF TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8 ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(LOCAL) WSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(LOCAL) WSTR:(K++) = ENDIF SIF !口上有無確認(LOCAL) CALL MARK_MESSAGE_R ENDIF CALL 口上変数表示 IF RESULT == 0 TRYCCALLFORM KOJO_MESSAGE_MARKCNG_ZZZ CATCH ENDCATCH ENDIF ;------------------------------------------------- ;Event function CFLAG 261～299 used - called on occasions outside training ;------------------------------------------------- @KOJO_MESSAGE_EVENT_K9001 ;-------------------------------------------------- ;used for specific Master ;-------------------------------------------------- ;IF NO:MASTER == Y1 ; CALL KOJO_MESSAGE_EVENT_PY1_K9001 ; RETURN 0 ;ENDIF CALL 口上変数初期化 SELECTCASE TFLAG:13 ;　　1:朝フェラ ;　　2:朝パイズリ ;　　3:朝騎乗位 ;　　4:調教後レズプレイ ;　　5:調教後セックス ;　　6:強精神薬の反動 ;　　7:調教後搾乳 ;　　8:調教後自慰 ;　　9:調教後夜這い ;　　10:黄色いキャンディ使用時 ;　　11:妊娠発覚時 ;　　12:出産時 ;　　13:育児室でのイベント口上 ;　　14:親離れ時 ;　　15:定食屋台実行時 ;　　16:娼館でのバイト時 ;　　17:レンタル実行時 ;　　18:売却時 ;　　19:ビデオ売却時 ;　　20:コンサート実行時 ;　　21:乱交ライブ実行時 ;　　22:公衆便所プレイ実行時 ;　　23:ビデオ保有時 ;　　24:朝騎乗位A ;　　25:朝キス ;　　26:朝食 ;　　27:起きたら隣で寝てる ;　　28:朝の足コキ ;　　29:朝の搾りたてミルク ;　　30:おねしょ ;　　31:夜這い C/A ;　　32:夜這い V/C ;　　33:夜這い A/C ;　　34:夜這い C/C ;　　35:夜自慰 ;　　36:一緒に寝る ;　　37:起きたら隣で寝てる ;　　38:朝の足コキ ;　　39:朝の搾りたてミルク ;　　40:妻・夫取得 ;　　41:淫魔取得 ;　　42:玩具取得 ;　　43:スト劇場 ;　　44:着替え・胸を出す ;　　45:愛系ＮＴＲイベント ;　　46:淫系ＮＴＲイベント ;　　47:隷系ＮＴＲイベント ;　　48:愛系再陥落イベント ;　　49:淫系再陥落イベント ;　　50:隷系再陥落イベント ;　　51:ＮＴＲ夜這い・乱交パーティ ;　　52:ＮＴＲ夜這い・公園 ;　　53:ＮＴＲ夜這い・便器 ;　　54:ＮＴＲ夜這い・夜の街 ;　　55:ＮＴＲ夜這い・ＮＴＲ前逢引 ;　　56:ＮＴＲ夜這い・ＮＴＲ後初夜這い ;　　57:ＮＴＲ夜這い・デート ;　　58:ＮＴＲ夜這い・本番 ;　　59:ＮＴＲ夜這い・自慰見せ合い ;　　60:ＮＴＲ夜這い・アナルセックス ;　　61:ＮＴＲ夜這い・野外プレイ ;　　62:ＮＴＲ夜這い・野外調教 ;　　63:娼館で実際に働いたとき ;　　65:教会で祈る ;　　66:教会で口奉仕 ;　　67:教会で性奉仕 ;　　70:陰唇・胸同時露出(調教対象) ;　　71:陰唇・胸同時露出(主人) ;　　72:陰唇・胸同時露出(助手) ;　　73:陰唇出(調教対象) ;　　74:陰唇露出(主人) ;　　75:陰唇露出(助手) ;　　76:胸露出(調教対象) ;　　77:胸露出(主人) ;　　78:胸露出(助手) ;　　79:ダンジョン内性欲処理：仲魔とセックス(やられる側) ;　　80:ダンジョン内性欲処理：仲魔に奉仕してもらう(奉仕側) ;　　81:ダンジョン内性欲処理：その場で自慰 ;　　82:ダンジョン内性欲処理：物陰で自慰 ;　　83:ダンジョン内性欲処理：仲魔とセックス(やる側) ;　　84:ダンジョン内性欲処理：仲魔とセックス(奉仕させる側) ;　　85:ダンジョン内性欲処理：輪姦される ;　　90:道場開始 ;　　91:道場終了 ;　　92:盟友 ;　　93:炭鉱 ;------------------------------------------------- ;wake-up blowjob ;------------------------------------------------- CASE 1 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:261 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:261 = 1 ENDIF ;------------------------------------------------- ;wake-up boobjob ;------------------------------------------------- CASE 2 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:262 < 1 || FLAG:7 == 2) ;Lactating IF TALENT:149 ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF ;Normal IF !口上有無確認(0) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF CFLAG:262 = 1 ENDIF ;------------------------------------------------- ;wake-up cowgirl ;------------------------------------------------- CASE 3 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:263 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:263 = 1 ENDIF ;------------------------------------------------- ;wake-up Anal cowgirl ;------------------------------------------------- CASE 24 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:263 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:263 = 1 ENDIF ;------------------------------------------------- ;wake-up kiss ;------------------------------------------------- CASE 25 K_CALL:K = EVENT_MESSAGE IF CFLAG:263 < 1 || FLAG:7 == 2 WSTR:(K++) = CFLAG:263 = 1 ENDIF ;------------------------------------------------- ;wake-up breakfast ;------------------------------------------------- CASE 26 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:263 < 1 || FLAG:7 == 2) ;Singing IF (TALENT:25 || TALENT:28) && ABL:14 >= 2 ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF ;not singing IF !口上有無確認(0) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF CFLAG:263 = 1 ENDIF ;------------------------------------------------- ;wake-up cuddling ;------------------------------------------------- CASE 27 K_CALL:K = EVENT_MESSAGE IF CFLAG:263 < 1 || FLAG:7 == 2 WSTR:(K++) = CFLAG:263 = 1 ENDIF ;------------------------------------------------- ;wake-up footjob ;------------------------------------------------- CASE 28 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:263 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:263 = 1 ENDIF ;------------------------------------------------- ;;wake-up の搾りたてミルク ;------------------------------------------------- CASE 29 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:263 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:263 = 1 ENDIF ;------------------------------------------------- ;bed-wet ;------------------------------------------------- CASE 30 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:263 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:263 = 1 ENDIF ;------------------------------------------------- ;aftertraining - lesbian ;------------------------------------------------- CASE 4 K_CALL:K = EVENT_MESSAGE ;Performed for the first time IF CFLAG:264 == 0 WSTR:(K++) = CFLAG:264 = 1 ;Otherwise ELSEIF CFLAG:264 < 1 || FLAG:7 == 2 WSTR:(K++) = CFLAG:264 = 1 ENDIF ;------------------------------------------------- ;aftertraining - sex ;------------------------------------------------- CASE 5 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:265 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:265 = 1 ENDIF ;------------------------------------------------- ;Strong drugs reaction ;------------------------------------------------- CASE 6 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:266 < 2 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:266 = 2 ENDIF IF (CFLAG:266 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:266 = 1 ENDIF ;------------------------------------------------- ;aftertraining - milking ;------------------------------------------------- CASE 7 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:267 < 2 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:267 = 2 ENDIF IF (CFLAG:267 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:267 = 1 ENDIF ;------------------------------------------------- ;aftertraining - masturbation ;------------------------------------------------- CASE 8 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:268 < 2 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:268 = 2 ENDIF IF (CFLAG:268 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:268 = 1 ENDIF ;------------------------------------------------- ;nightcrawl（MasterC CharacterV） ;------------------------------------------------- CASE 9 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:269 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:269 = 1 ENDIF ;------------------------------------------------- ;nightcrawl（MasterC CharacterA） ;------------------------------------------------- CASE 31 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:269 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:269 = 1 ENDIF ;------------------------------------------------- ;nightcrawl（MasterV CharacterC） ;------------------------------------------------- CASE 32 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:269 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:269 = 1 ENDIF ;------------------------------------------------- ;nightcrawl（MasterA CharacterC） ;------------------------------------------------- CASE 33 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:269 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:269 = 1 ENDIF ;------------------------------------------------- ;nightcrawl (scisorring, gay intercrural) ;------------------------------------------------- CASE 34 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:269 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:269 = 1 ENDIF ;------------------------------------------------- ;masturbating at night ;------------------------------------------------- CASE 35 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:269 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:269 = 1 ENDIF ;------------------------------------------------- ;Sleeping toget%HIS_HER(TARGET)% (love) ;------------------------------------------------- CASE 36 K_CALL:K = EVENT_MESSAGE IF CFLAG:269 < 1 || FLAG:7 == 2 WSTR:(K++) = CFLAG:269 = 1 ENDIF ;------------------------------------------------- ;Egg-laying candy ;------------------------------------------------- CASE 10 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:270 < 2 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:270 = 2 ENDIF IF (CFLAG:270 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:270 = 1 ENDIF ;------------------------------------------------- ;Finding out about pregnancy ;------------------------------------------------- CASE 11 SIF CFLAG:271 >= 1 && FLAG:7 != 2 GOTO 表示 K_CALL:K = EVENT_MESSAGE ;Target stores identity of father, (if it was assistant - in W), (if a slave - in V) ;If collapsed IF TALENT:9 == 1 WSTR:(K++) = ;Fat%HIS_HER(TARGET)% is Master while in love ELSEIF (TALENT:3 || TALENT:6) && CFLAG:102 == 1 WSTR:(K++) = ;Fat%HIS_HER(TARGET)% is another slave while mother's lewd ELSEIF (TALENT:4 || TALENT:7) && (CFLAG:102 == 2 || CFLAG:102 == 3) ;Impregnated by a liked assistant IF CFLAG:102 == 2 && GET_RELATION(TARGET, W) > 125 WSTR:(K++) = ;Impregnated by a liked slave ELSEIF CFLAG:102 == 3 && GET_RELATION(TARGET, V) > 125 WSTR:(K++) = ELSE WSTR:(K++) = ENDIF ;Submission or slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ELSE WSTR:(K++) = ENDIF CFLAG:271 = 1 ;------------------------------------------------- ;Birth ;------------------------------------------------- CASE 12 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:272 < 2 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:272 = 2 ENDIF IF (CFLAG:272 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:272 = 1 ENDIF ;------------------------------------------------- ;Nursery ;------------------------------------------------- CASE 13 K_CALL:K = EVENT_MESSAGE ;Before birth IF TALENT:153 ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:273 < 2 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:273 = 2 ENDIF IF (CFLAG:273 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:273 = 1 ENDIF ;After birth ELSE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:273 < 4 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:273 = 4 ENDIF IF (CFLAG:273 < 3 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:273 = 3 ENDIF ENDIF ;------------------------------------------------- ;Parting with a child ;------------------------------------------------- CASE 14 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:274 < 2 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:274 = 2 ENDIF IF (CFLAG:274 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:274 = 1 ENDIF ;------------------------------------------------- ;Working in Restaurant ;------------------------------------------------- CASE 15 K_CALL:K = EVENT_MESSAGE ;Performed for the first time IF CFLAG:275 == 0 WSTR:(K++) = CFLAG:275 = 1 ;Otherwise ELSEIF CFLAG:275 < 1 || FLAG:7 == 2 WSTR:(K++) = CFLAG:275 = 1 ENDIF ;------------------------------------------------- ;Working in brothel -start ;------------------------------------------------- CASE 16 K_CALL:K = EVENT_MESSAGE ;Performed for the first time IF CFLAG:276 == 0 WSTR:(K++) = CFLAG:276 = 1 ;Otherwise ELSEIF CFLAG:276 < 1 || FLAG:7 == 2 WSTR:(K++) = CFLAG:276 = 1 ENDIF ;------------------------------------------------- ;Working in brothel - while working ;------------------------------------------------- CASE 63 K_CALL:K = EVENT_MESSAGE ;Performed for the first time IF CFLAG:606 == 0 WSTR:(K++) = CFLAG:606 = 1 ;Otherwise ELSEIF CFLAG:276 < 1 || FLAG:7 == 2 WSTR:(K++) = CFLAG:606 = 1 ENDIF ;------------------------------------------------- ;Rental GF ;------------------------------------------------- CASE 17 K_CALL:K = EVENT_MESSAGE ;Performed for the first time IF CFLAG:277 == 0 WSTR:(K++) = CFLAG:277 = 1 ;Otherwise ELSEIF CFLAG:277 < 1 || FLAG:7 == 2 WSTR:(K++) = CFLAG:277 = 1 ENDIF ;------------------------------------------------- ;When sold ;------------------------------------------------- CASE 18 K_CALL:K = EVENT_MESSAGE ;Hate Mark LV3 IF MARK:3 == 3 WSTR:(K++) = ENDIF ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && MARK:3 < 3 && !口上有無確認(0) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) WSTR:(K++) = ENDIF ;------------------------------------------------- ;Selling a video ;------------------------------------------------- CASE 19 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:278 < 2 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:278 = 2 ENDIF IF (CFLAG:278 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:278 = 1 ENDIF ;------------------------------------------------- ;Holding a concert ;------------------------------------------------- CASE 20 K_CALL:K = EVENT_MESSAGE ;Performed for the first time IF CFLAG:279 == 0 WSTR:(K++) = CFLAG:279 = 1 ;Otherwise ELSEIF CFLAG:279 < 1 || FLAG:7 == 2 WSTR:(K++) = CFLAG:279 = 1 ENDIF ;------------------------------------------------- ;Sex Concert ;------------------------------------------------- CASE 21 K_CALL:K = EVENT_MESSAGE ;Performed for the first time IF CFLAG:280 == 0 WSTR:(K++) = CFLAG:280 = 1 ;Otherwise ELSEIF CFLAG:280 < 1 || FLAG:7 == 2 WSTR:(K++) = CFLAG:280 = 1 ENDIF ;------------------------------------------------- ;Working as a toilet ;------------------------------------------------- CASE 22 K_CALL:K = EVENT_MESSAGE ;Performed for the first time IF CFLAG:281 == 0 WSTR:(K++) = CFLAG:281 = 1 ;Otherwise ELSEIF CFLAG:281 < 1 || FLAG:7 == 2 WSTR:(K++) = CFLAG:281 = 1 ENDIF ;------------------------------------------------- ;Being filmed ;------------------------------------------------- CASE 23 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:282 < 2 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:282 = 2 ENDIF IF (CFLAG:282 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:282 = 1 ENDIF ;------------------------------------------------- ;On brainwash drug use (obsolete) ;------------------------------------------------- CASE 30 K_CALL:K = EVENT_MESSAGE ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:283 < 2 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:283 = 2 ENDIF IF (CFLAG:283 < 1 || FLAG:7 == 2) && !口上有無確認(0) WSTR:(K++) = CFLAG:283 = 1 ENDIF ;------------------------------------------------- ;Marriage ;------------------------------------------------- CASE 40 K_CALL:K = EVENT_MESSAGE IF CFLAG:283 < 1 || FLAG:7 == 2 WSTR:(K++) = CFLAG:283 = 1 ENDIF ;------------------------------------------------- ;Lewd Demon ;------------------------------------------------- CASE 41 K_CALL:K = EVENT_MESSAGE IF CFLAG:284 < 1 || FLAG:7 == 2 WSTR:(K++) = CFLAG:284 = 1 ENDIF ;------------------------------------------------- ;Toy ;------------------------------------------------- CASE 42 K_CALL:K = EVENT_MESSAGE IF CFLAG:285 < 1 || FLAG:7 == 2 WSTR:(K++) = CFLAG:285 = 1 ENDIF ;------------------------------------------------- ;Breast (Un)zipping ;------------------------------------------------- CASE 44 K_CALL:K = EVENT_MESSAGE IF TEQUIP:胸前開き ;Opening ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:285 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:285 = 1 ELSE ;Hiding ;Fallen IF (TALENT:3 || TALENT:4 || TALENT:5 || TALENT:6 || TALENT:7 || TALENT:8) && (CFLAG:285 < 1 || FLAG:7 == 2) ;Affection, Love IF (TALENT:3 || TALENT:6) WSTR:(K++) = ;Lust, Whore ELSEIF (TALENT:4 || TALENT:7) WSTR:(K++) = ;Submission, Slave ELSEIF (TALENT:5 || TALENT:8) WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDIF ;Otherwise IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:287 = 1 ENDIF ;------------------------------------------------- ;;[愛ＮＴＲ]イベント時 Don't care, proceed to below 62 ;------------------------------------------------- CASE 45 K_CALL:K = EVENT_MESSAGE ;Fallen IF (CFLAG:288 < 1 || FLAG:7 == 2) IF CFLAG:陥落キャラ == CFLAG:MASTER:キャラ固有の番号 ;主人に陥落しているor誰にも陥落してない状態でＮＴＲ ;Affection, Love IF TALENT:3 || TALENT:6 ;進行度分岐 ;初回 IF CFLAG:愛ＮＴＲ進行度 == 0 WSTR:(K++) = ;二回目（リーチ） ELSEIF CFLAG:愛ＮＴＲ進行度 == 1 WSTR:(K++) = ;三回目（陥落） ELSEIF CFLAG:愛ＮＴＲ進行度 == 2 WSTR:(K++) = ENDIF ;Lust, Whore ELSEIF TALENT:4 || TALENT:7 ;進行度分岐 ;初回 IF CFLAG:愛ＮＴＲ進行度 == 0 WSTR:(K++) = ;二回目（リーチ） ELSEIF CFLAG:愛ＮＴＲ進行度 == 1 WSTR:(K++) = ;三回目（陥落） ELSEIF CFLAG:愛ＮＴＲ進行度 == 2 WSTR:(K++) = ENDIF ;Submission, Slave ELSEIF TALENT:5 || TALENT:8 ;進行度分岐 ;初回 IF CFLAG:愛ＮＴＲ進行度 == 0 WSTR:(K++) = ;二回目（リーチ） ELSEIF CFLAG:愛ＮＴＲ進行度 == 1 WSTR:(K++) = ;三回目（陥落） ELSEIF CFLAG:愛ＮＴＲ進行度 == 2 WSTR:(K++) = ENDIF ENDIF ;Generic Fallen IF !口上有無確認(0) ;進行度分岐 ;初回 IF CFLAG:愛ＮＴＲ進行度 == 0 WSTR:(K++) = ;二回目（リーチ） ELSEIF CFLAG:愛ＮＴＲ進行度 == 1 WSTR:(K++) = ;三回目（陥落） ELSEIF CFLAG:愛ＮＴＲ進行度 == 2 WSTR:(K++) = ENDIF ENDIF ELSE ;主人以外の誰かに陥落している状態で更に別のキャラにＮＴＲ ;進行度分岐 ;初回 IF CFLAG:愛ＮＴＲ進行度 == 0 WSTR:(K++) = ;二回目（リーチ） ELSEIF CFLAG:愛ＮＴＲ進行度 == 1 WSTR:(K++) = ;三回目（陥落） ELSEIF CFLAG:愛ＮＴＲ進行度 == 2 WSTR:(K++) = ENDIF ENDIF CFLAG:288 = 1 ENDIF ;------------------------------------------------- ;;[淫ＮＴＲ]イベント時 ;------------------------------------------------- CASE 46 K_CALL:K = EVENT_MESSAGE ;Fallen IF (CFLAG:289 < 1 || FLAG:7 == 2) IF CFLAG:陥落キャラ == CFLAG:MASTER:キャラ固有の番号 ;主人に陥落しているor誰にも陥落してない状態でＮＴＲ ;Affection, Love IF TALENT:3 || TALENT:6 ;進行度分岐 ;初回 IF CFLAG:淫ＮＴＲ進行度 == 0 WSTR:(K++) = ;二回目（リーチ） ELSEIF CFLAG:淫ＮＴＲ進行度 == 1 WSTR:(K++) = ;三回目（陥落） ELSEIF CFLAG:淫ＮＴＲ進行度 == 2 WSTR:(K++) = ENDIF ;Submission, Slave ELSEIF TALENT:5 || TALENT:8 ;進行度分岐 ;初回 IF CFLAG:淫ＮＴＲ進行度 == 0 WSTR:(K++) = ;二回目（リーチ） ELSEIF CFLAG:淫ＮＴＲ進行度 == 1 WSTR:(K++) = ;三回目（陥落） ELSEIF CFLAG:淫ＮＴＲ進行度 == 2 WSTR:(K++) = ENDIF ENDIF ;Generic Fallen IF !口上有無確認(0) ;進行度分岐 ;初回 IF CFLAG:淫ＮＴＲ進行度 == 0 WSTR:(K++) = ;二回目（リーチ） ELSEIF CFLAG:淫ＮＴＲ進行度 == 1 WSTR:(K++) = ;三回目（陥落） ELSEIF CFLAG:淫ＮＴＲ進行度 == 2 WSTR:(K++) = ENDIF ENDIF ELSE ;主人以外の誰かに陥落している状態で更に別のキャラにＮＴＲ ;進行度分岐 ;初回 IF CFLAG:淫ＮＴＲ進行度 == 0 WSTR:(K++) = ;二回目（リーチ） ELSEIF CFLAG:淫ＮＴＲ進行度 == 1 WSTR:(K++) = ;三回目（陥落） ELSEIF CFLAG:淫ＮＴＲ進行度 == 2 WSTR:(K++) = ENDIF ENDIF CFLAG:289 = 1 ENDIF ;------------------------------------------------- ;;[隷ＮＴＲ]イベント時 ;------------------------------------------------- CASE 47 K_CALL:K = EVENT_MESSAGE ;Fallen IF (CFLAG:290 < 1 || FLAG:7 == 2) IF CFLAG:陥落キャラ == CFLAG:MASTER:キャラ固有の番号 ;主人に陥落しているor誰にも陥落してない状態でＮＴＲ ;Affection, Love IF TALENT:3 || TALENT:6 ;進行度分岐 ;初回 IF CFLAG:隷ＮＴＲ進行度 == 0 WSTR:(K++) = ;二回目（リーチ） ELSEIF CFLAG:隷ＮＴＲ進行度 == 1 WSTR:(K++) = ;三回目（陥落） ELSEIF CFLAG:隷ＮＴＲ進行度 == 2 WSTR:(K++) = ENDIF ;Lust, Whore ELSEIF TALENT:4 || TALENT:7 ;進行度分岐 ;初回 IF CFLAG:隷ＮＴＲ進行度 == 0 WSTR:(K++) = ;二回目（リーチ） ELSEIF CFLAG:隷ＮＴＲ進行度 == 1 WSTR:(K++) = ;三回目（陥落） ELSEIF CFLAG:隷ＮＴＲ進行度 == 2 WSTR:(K++) = ENDIF ;Submission, Slave ELSEIF TALENT:5 || TALENT:8 ;進行度分岐 ;初回 IF CFLAG:隷ＮＴＲ進行度 == 0 WSTR:(K++) = ;二回目（リーチ） ELSEIF CFLAG:隷ＮＴＲ進行度 == 1 WSTR:(K++) = ;三回目（陥落） ELSEIF CFLAG:隷ＮＴＲ進行度 == 2 WSTR:(K++) = ENDIF ENDIF ;Generic Fallen IF !口上有無確認(0) ;進行度分岐 ;初回 IF CFLAG:隷ＮＴＲ進行度 == 0 WSTR:(K++) = ;二回目（リーチ） ELSEIF CFLAG:隷ＮＴＲ進行度 == 1 WSTR:(K++) = ;三回目（陥落） ELSEIF CFLAG:隷ＮＴＲ進行度 == 2 WSTR:(K++) = ENDIF ENDIF ELSE ;主人以外の誰かに陥落している状態で更に別のキャラにＮＴＲ ;進行度分岐 ;初回 IF CFLAG:隷ＮＴＲ進行度 == 0 WSTR:(K++) = ;二回目（リーチ） ELSEIF CFLAG:隷ＮＴＲ進行度 == 1 WSTR:(K++) = ;三回目（陥落） ELSEIF CFLAG:隷ＮＴＲ進行度 == 2 WSTR:(K++) = ENDIF ENDIF CFLAG:290 = 1 ENDIF ;------------------------------------------------- ;;愛系再陥落時 ;;主人に対して恋慕系陥落している、もしくは一度愛系ＮＴＲ状態にされたキャラに再び陥落させられる時 ;------------------------------------------------- CASE 48 K_CALL:K = EVENT_MESSAGE ;再陥落前に陥落しているキャラ→CFLAG:陥落キャラ で取得可能、名前は%NTRNAME(CFLAG:陥落キャラ)% ;再陥落先のキャラ→ FAVORITE_1_ID(TARGET)　で取得可能、名前は%NTRNAME(FAVORITE_1_ID(TARGET))% ;やや煩雑になるのでLOCAL、あるいは#DIM等を使用して分かりやすくする事を推奨します IF (CFLAG:291 < 1 || FLAG:7 == 2) ;主人に対して陥落し直し IF FAVORITE_1_ID(TARGET) == CFLAG:MASTER:キャラ固有の番号 WSTR:(K++) = ;その他のキャラ・ＮＰＣにＮＴＲし直し ELSE WSTR:(K++) = ENDIF CFLAG:291 = 1 ENDIF ;------------------------------------------------- ;;淫系再陥落時 ;;主人に対して淫乱系陥落している、もしくは一度淫系ＮＴＲ状態にされたキャラに再び陥落させられる時 ;------------------------------------------------- CASE 49 K_CALL:K = EVENT_MESSAGE ;再陥落前に陥落しているキャラ→CFLAG:陥落キャラ で取得可能、名前は%NTRNAME(CFLAG:陥落キャラ)% ;再陥落先のキャラ→ FAVORITE_1_ID(TARGET)　で取得可能、名前は%NTRNAME(FAVORITE_1_ID(TARGET))% ;やや煩雑になるのでLOCAL、あるいは#DIM等を使用して分かりやすくする事を推奨します IF (CFLAG:292 < 1 || FLAG:7 == 2) ;主人に対して陥落し直し IF FAVORITE_1_ID(TARGET) == CFLAG:MASTER:キャラ固有の番号 WSTR:(K++) = ;その他のキャラ・ＮＰＣにＮＴＲし直し ELSE WSTR:(K++) = ENDIF CFLAG:292 = 1 ENDIF ;------------------------------------------------- ;;隷系再陥落時 ;;主人に対して服従系陥落している、もしくは一度隷系ＮＴＲ状態にされたキャラに再び陥落させられる時 ;------------------------------------------------- CASE 50 K_CALL:K = EVENT_MESSAGE ;再陥落前に陥落しているキャラ→CFLAG:陥落キャラ で取得可能、名前は%NTRNAME(CFLAG:陥落キャラ)% ;再陥落先のキャラ→ FAVORITE_1_ID(TARGET)　で取得可能、名前は%NTRNAME(FAVORITE_1_ID(TARGET))% ;やや煩雑になるのでLOCAL、あるいは#DIM等を使用して分かりやすくする事を推奨します IF (CFLAG:293 < 1 || FLAG:7 == 2) ;主人に対して陥落し直し IF FAVORITE_1_ID(TARGET) == CFLAG:MASTER:キャラ固有の番号 WSTR:(K++) = ;その他のキャラ・ＮＰＣにＮＴＲし直し ELSE WSTR:(K++) = ENDIF CFLAG:293 = 1 ENDIF ;------------------------------------------------- ;;ＮＴＲ夜這い・乱交パーティ ;;淫ＮＴＲ状態（TALENT:ＮＴＲ == 2 か TALENT:ＮＴＲ == 5）である時のみ ;------------------------------------------------- CASE 51 K_CALL:K = EVENT_MESSAGE IF (CFLAG:294 < 1 || FLAG:7 == 2) IF (TALENT:3 || TALENT:6) ;以前恋慕ルートだった場合 WSTR:(K++) = ELSEIF (TALENT:5 || TALENT:8) ;以前服従ルートだった場合 WSTR:(K++) = ENDIF ;Lust、陥落済み共通 IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:294 = 1 ENDIF ;------------------------------------------------- ;;ＮＴＲ夜這い・公園 ;;淫ＮＴＲ状態（TALENT:ＮＴＲ == 2 か TALENT:ＮＴＲ == 5）である時のみ ;------------------------------------------------- CASE 52 K_CALL:K = EVENT_MESSAGE IF (CFLAG:295 < 1 || FLAG:7 == 2) IF (TALENT:3 || TALENT:6) ;以前恋慕ルートだった場合 WSTR:(K++) = ELSEIF (TALENT:5 || TALENT:8) ;以前服従ルートだった場合 WSTR:(K++) = ENDIF ;Lust、陥落済み共通 IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:295 = 1 ENDIF ;------------------------------------------------- ;;ＮＴＲ夜這い・便器 ;;淫ＮＴＲ状態（TALENT:ＮＴＲ == 2 か TALENT:ＮＴＲ == 5）である時のみ ;------------------------------------------------- CASE 53 K_CALL:K = EVENT_MESSAGE IF (CFLAG:296 < 1 || FLAG:7 == 2) IF (TALENT:3 || TALENT:6) ;以前恋慕ルートだった場合 WSTR:(K++) = ELSEIF (TALENT:5 || TALENT:8) ;以前服従ルートだった場合 WSTR:(K++) = ENDIF ;Lust、陥落済み共通 IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:296 = 1 ENDIF ;------------------------------------------------- ;;ＮＴＲ夜這い・夜の街 ;;淫ＮＴＲ状態（TALENT:ＮＴＲ == 2 か TALENT:ＮＴＲ == 5）である時のみ ;------------------------------------------------- CASE 54 K_CALL:K = EVENT_MESSAGE IF (CFLAG:296 < 1 || FLAG:7 == 2) IF (TALENT:3 || TALENT:6) ;以前恋慕ルートだった場合 WSTR:(K++) = ELSEIF (TALENT:5 || TALENT:8) ;以前服従ルートだった場合 WSTR:(K++) = ENDIF ;Lust、陥落済み共通 IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:296 = 1 ENDIF ;------------------------------------------------- ;;ＮＴＲ夜這い・ＮＴＲ前逢引 ;;ＮＴＲ状態になる前に逢引する時 ;------------------------------------------------- CASE 55 K_CALL:K = EVENT_MESSAGE IF (CFLAG:297 < 1 || FLAG:7 == 2) IF CFLAG:陥落キャラ != 0 ; ;主人以外に陥落している場合 WSTR:(K++) = ELSEIF (TALENT:3 || TALENT:6) ; ;Loveルート WSTR:(K++) = ELSEIF (TALENT:4 || TALENT:7) ; ;Lustルート WSTR:(K++) = ELSEIF (TALENT:5 || TALENT:8) ; ;Submissionルート WSTR:(K++) = ENDIF ;Generic Fallen IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:297 = 1 ENDIF ;------------------------------------------------- ;;ＮＴＲ夜這い・ＮＴＲ後初逢引 ;;愛ＮＴＲか隷ＮＴＲ状態(TALENT:ＮＴＲが 1 か 3 か 4 か 6)になった直後の一日の終了後、一度だけ行う ;別のキャラに陥落する度に起こる。同じキャラに再度陥落した場合は起こらない ;------------------------------------------------- CASE 56 K_CALL:K = EVENT_MESSAGE IF (CFLAG:298 < 1 || FLAG:7 == 2) IF (TALENT:ＮＴＲ == 1 || TALENT:ＮＴＲ == 4) ;&& (RAND:2 == 0) ;愛ＮＴＲ WSTR:(K++) = ELSEIF (TALENT:ＮＴＲ == 3 || TALENT:ＮＴＲ == 6) ;&& (RAND:2 == 0) ;隷ＮＴＲ WSTR:(K++) = ENDIF ;Ordinary IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:298 = 1 ENDIF ;------------------------------------------------- ;;ＮＴＲ夜這い・デート ;;愛ＮＴＲか隷ＮＴＲ状態(TALENT:ＮＴＲが 1 か 3 か 4 か 6)で１日の終了時に発生。 ;------------------------------------------------- CASE 57 K_CALL:K = EVENT_MESSAGE IF (CFLAG:299 < 1 || FLAG:7 == 2) IF (TALENT:ＮＴＲ == 1 || TALENT:ＮＴＲ == 4) ;&& (RAND:2 == 0) ;愛ＮＴＲ WSTR:(K++) = ELSEIF (TALENT:ＮＴＲ == 3 || TALENT:ＮＴＲ == 6) ;&& (RAND:2 == 0) ;隷ＮＴＲ WSTR:(K++) = ENDIF ;Ordinary IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:299 = 1 ENDIF ;------------------------------------------------- ;;ＮＴＲ夜這い・本番 ;;愛ＮＴＲか隷ＮＴＲ状態(TALENT:ＮＴＲが 1 か 3 か 4 か 6)で１日の終了時に発生。 ;女性であれば入れられる側、男性であれば入れる側で固定 ;------------------------------------------------- CASE 58 K_CALL:K = EVENT_MESSAGE IF (CFLAG:601 < 1 || FLAG:7 == 2) IF (TALENT:ＮＴＲ == 1 || TALENT:ＮＴＲ == 4) ;&& (RAND:2 == 0) ;愛ＮＴＲ WSTR:(K++) = ELSEIF (TALENT:ＮＴＲ == 3 || TALENT:ＮＴＲ == 6) ;&& (RAND:2 == 0) ;隷ＮＴＲ WSTR:(K++) = ENDIF ;Ordinary IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:601 = 1 ENDIF ;------------------------------------------------- ;;ＮＴＲ夜這い・自慰見せ合い ;;愛ＮＴＲか隷ＮＴＲ状態(TALENT:ＮＴＲが 1 か 3 か 4 か 6)で１日の終了時に発生。 ;愛ＮＴＲ状態の場合、露出癖3か自慰中毒1のどちらかを満たしている事が条件になります。 ;------------------------------------------------- CASE 59 K_CALL:K = EVENT_MESSAGE IF (CFLAG:602 < 1 || FLAG:7 == 2) IF (TALENT:ＮＴＲ == 1 || TALENT:ＮＴＲ == 4) ;&& (RAND:2 == 0) ;愛ＮＴＲ WSTR:(K++) = ELSEIF (TALENT:ＮＴＲ == 3 || TALENT:ＮＴＲ == 6) ;&& (RAND:2 == 0) ;隷ＮＴＲ WSTR:(K++) = ENDIF ;Ordinary IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:602 = 1 ENDIF ;------------------------------------------------- ;;ＮＴＲ夜這い・アナル ;;愛ＮＴＲか隷ＮＴＲ状態(TALENT:ＮＴＲが 1 か 3 か 4 か 6)で１日の終了時に発生。 ;CFLAG:アナル回数が1以上なら入れられている、CFLAG:挿入回数が1以上なら入れています。 ;両方立っている場合は、地の文では入れられている側が優先されます。 ;------------------------------------------------- CASE 60 K_CALL:K = EVENT_MESSAGE IF (CFLAG:603 < 1 || FLAG:7 == 2) IF (TALENT:ＮＴＲ == 1 || TALENT:ＮＴＲ == 4) ;&& (RAND:2 == 0) ;愛ＮＴＲ WSTR:(K++) = ELSEIF (TALENT:ＮＴＲ == 3 || TALENT:ＮＴＲ == 6) ;&& (RAND:2 == 0) ;隷ＮＴＲ WSTR:(K++) = ENDIF ;Ordinary IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:603 = 1 ENDIF ;------------------------------------------------- ;;ＮＴＲ夜這い・野外プレイ ;;愛ＮＴＲか隷ＮＴＲ状態(TALENT:ＮＴＲが 1 か 3 か 4 か 6)で１日の終了時に発生。 ;愛ＮＴＲの場合、露出癖が4以上でないと発生しません ;------------------------------------------------- CASE 61 K_CALL:K = EVENT_MESSAGE IF (CFLAG:604 < 1 || FLAG:7 == 2) IF (TALENT:ＮＴＲ == 1 || TALENT:ＮＴＲ == 4) ;&& (RAND:2 == 0) ;愛ＮＴＲ WSTR:(K++) = ELSEIF (TALENT:ＮＴＲ == 3 || TALENT:ＮＴＲ == 6) ;&& (RAND:2 == 0) ;隷ＮＴＲ WSTR:(K++) = ENDIF ;Ordinary IF !口上有無確認(0) WSTR:(K++) = ENDIF CFLAG:604 = 1 ENDIF ;------------------------------------------------- ;;ＮＴＲ夜這い・野外調教 ;;隷ＮＴＲ状態(TALENT:ＮＴＲが 3 か 6)でCFLAG:現ＮＴＲ進行度が6以上の場合１日の終了時に発生。 ;------------------------------------------------- CASE 62 K_CALL:K = EVENT_MESSAGE IF (CFLAG:605 < 1 || FLAG:7 == 2) ;隷ＮＴＲ WSTR:(K++) = CFLAG:605 = 1 ENDIF ;------------------------------------------------- ;Sex while exploring: sex with teammate ;Receiving ;refer to other party with PLAYER ;------------------------------------------------- CASE 79 K_CALL:K = EVENT_MESSAGE IF (CFLAG:602 < 1 || FLAG:7 == 2) WSTR:(K++) = CFLAG:602 = 1 ENDIF ;------------------------------------------------- ;Sex while exploring: servicing teammate ;Servicing ;refer to other party with PLAYER ;------------------------------------------------- CASE 80 K_CALL:K = EVENT_MESSAGE IF (CFLAG:603 < 1 || FLAG:7 == 2) WSTR:(K++) = CFLAG:603 = 1 ENDIF ;------------------------------------------------- ;Sex while exploring: Open masturbation ;Servicing ;------------------------------------------------- CASE 81 K_CALL:K = EVENT_MESSAGE IF (CFLAG:604 < 1 || FLAG:7 == 2) WSTR:(K++) = CFLAG:604 = 1 ENDIF ;------------------------------------------------- ;Sex while exploring: Masturbate on the side ;Servicing ;------------------------------------------------- CASE 82 K_CALL:K = EVENT_MESSAGE IF (CFLAG:605 < 1 || FLAG:7 == 2) WSTR:(K++) = CFLAG:605 = 1 ENDIF ;------------------------------------------------- ;Sex while exploring: sex with teammate ;Giving ;refer to other party with PLAYER ;------------------------------------------------- CASE 83 K_CALL:K = EVENT_MESSAGE IF (CFLAG:606 < 1 || FLAG:7 == 2) WSTR:(K++) = CFLAG:606 = 1 ENDIF ;------------------------------------------------- ;Sex while exploring: servicing teammate ;Receiving service ;refer to other party with PLAYER ;------------------------------------------------- CASE 84 K_CALL:K = EVENT_MESSAGE IF (CFLAG:607 < 1 || FLAG:7 == 2) WSTR:(K++) = CFLAG:607 = 1 ENDIF ;------------------------------------------------- ;Sex while exploring: Gangbang ;Servicing ;Refer to the other party with PLAYER ;------------------------------------------------- CASE 85 K_CALL:K = EVENT_MESSAGE IF (CFLAG:608 < 1 || FLAG:7 == 2) WSTR:(K++) = CFLAG:608 = 1 ENDIF ;------------------------------------------------- ;Church praying ;------------------------------------------------- CASE 65 K_CALL:K = EVENT_MESSAGE ;Split according to alignment of church SELECTCASE 店舗("種類",(CFLAG:労役フラグ - 10)) ;Messian CASE 13 ;Performed for the first time IF CFLAG:609 == 0 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:609 = 1 ;Otherwise ELSEIF CFLAG:276 < 1 || FLAG:7 == 2 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:609 = 1 ENDIF ;Gaean CASE 14 ;Performed for the first time IF CFLAG:610 == 0 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:610 = 1 ;Otherwise ELSEIF CFLAG:276 < 1 || FLAG:7 == 2 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:610 = 1 ENDIF ;Neutral church CASE 15 ;Performed for the first time IF CFLAG:611 == 0 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:611 = 1 ;Otherwise ELSEIF CFLAG:276 < 1 || FLAG:7 == 2 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:611 = 1 ENDIF ENDSELECT ;------------------------------------------------- ;Church oral service ;------------------------------------------------- CASE 66 K_CALL:K = EVENT_MESSAGE ;Split according to alignment of church SELECTCASE 店舗("種類",(CFLAG:労役フラグ - 10)) ;Messian CASE 13 ;Performed for the first time IF CFLAG:612 == 0 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:612 = 1 ;Otherwise ELSEIF CFLAG:276 < 1 || FLAG:7 == 2 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:612 = 1 ENDIF ;Gaean CASE 14 ;Performed for the first time IF CFLAG:613 == 0 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:613 = 1 ;Otherwise ELSEIF CFLAG:276 < 1 || FLAG:7 == 2 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:613 = 1 ENDIF ;Neutral church CASE 15 ;Performed for the first time IF CFLAG:614 == 0 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:614 = 1 ;Otherwise ELSEIF CFLAG:276 < 1 || FLAG:7 == 2 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:614 = 1 ENDIF ENDSELECT ;------------------------------------------------- ;Church - sex service ;------------------------------------------------- CASE 67 K_CALL:K = EVENT_MESSAGE ;Split according to alignment of church SELECTCASE 店舗("種類",(CFLAG:労役フラグ - 10)) ;Messian CASE 13 ;Performed for the first time IF CFLAG:615 == 0 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:615 = 1 ;Otherwise ELSEIF CFLAG:276 < 1 || FLAG:7 == 2 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:615 = 1 ENDIF ;Gaean CASE 14 ;Performed for the first time IF CFLAG:616 == 0 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:616 = 1 ;Otherwise ELSEIF CFLAG:276 < 1 || FLAG:7 == 2 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:616 = 1 ENDIF ;Neutral church CASE 15 ;Performed for the first time IF CFLAG:617 == 0 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:617 = 1 ;Otherwise ELSEIF CFLAG:276 < 1 || FLAG:7 == 2 ;Law-aligned IF ABL:属性LC == 1 WSTR:(K++) = ;Chaos-aligned ELSEIF ABL:属性LC == 3 WSTR:(K++) = ;Neutral-aligned ELSE WSTR:(K++) = ENDIF CFLAG:617 = 1 ENDIF ENDSELECT CASEELSE ENDSELECT $表示 CALL 口上変数表示 ;Defer to another dialogue in case nothing above generated a text to be displayed. IF RESULT == 0 TRYCCALLFORM KOJO_MESSAGE_EVENT_ZZZ CATCH CALL EVENT_MESSAGE ENDCATCH ENDIF ;------------------------------------------------- ;Dialogue for when defeated in colosseum. ;------------------------------------------------- @KOJO_MESSAGE_LOSE_COLOSSEUM_K9001 CALL 口上変数初期化 SELECTCASE TFLAG:闘技場敗北 ;------------------------------------------------- ;Oni + plant ;------------------------------------------------- CASE 1 K_CALL:K = MESSAGE_LOSE_COLOSSEUM ;Affection, Love IF TALENT:3 || TALENT:6 WSTR:(K++) = ;Lust, Whore ELSEIF TALENT:4 || TALENT:7 WSTR:(K++) = ;Submission, Slave ELSEIF TALENT:5 || TALENT:8 WSTR:(K++) = ENDIF ;Otherwise IF !口上有無確認(0) WSTR:(K++) = ENDIF ENDSELECT CALL 口上変数表示 ;Defer to another dialogue in case nothing above generated a text to be displayed. IF RESULT == 0 TRYCCALLFORM KOJO_MESSAGE_LOSE_COLOSSEUM_ZZZ CATCH CALL MESSAGE_LOSE_COLOSSEUM ENDCATCH ENDIF ;------------------------------------------------- ;@KOJO_MESSAGE_ENDING function (9001 and X2 are character numbers) ;------------------------------------------------- ;------------------------------------------------- ;Check for whet%HIS_HER(TARGET)% an ending is written ;Uncomment appropriate when adding an ending ;------------------------------------------------- @ENDING_CHECK_K9001 SELECTCASE TSTR:END種別 ;CASE "個別END" ; SIF TALENT:妻 || TALENT:夫 ; RETURN 1 ; SIF TALENT:淫魔 ; RETURN 1 ; SIF TALENT:玩具 ; RETURN 1 ;CASE "調教師END" ; RETURN 1 ;CASE "稀代の調教師END" ; RETURN 1 ;CASE "食堂経営END" ; RETURN 1 ;CASE "娼館経営END" ; RETURN 1 ;CASE "アイドルEND" ; RETURN 1 ENDSELECT RETURN 0 ;------------------------------------------------- ;End text ;------------------------------------------------- @KOJO_MESSAGE_ENDING_K9001 ;-------------------------------------------------- CALL 口上変数初期化 SELECTCASE TSTR:END種別 ;CASE "個別END" ;Love ending ;IF TALENT:妻 || TALENT:夫 && CFLAG:21 == 1 ;DRAWLINE ;WSTR:(K++) = ………… ;WSTR:(K++) = ……… ;WSTR:(K++) = …… ;WSTR:(K++) = ;WSTR:(K++) = ;WSTR:(K++) = 　　　　　　　　―― Extra Ending　（◯◯エンド） ;Lust ending ;ELSEIF TALENT:淫魔 && CFLAG:21 == 1 ;DRAWLINE ;WSTR:(K++) = ………… ;WSTR:(K++) = ……… ;WSTR:(K++) = …… ;WSTR:(K++) = ;WSTR:(K++) = ;WSTR:(K++) = 　　　　　　　　―― Extra Ending　（◯◯エンド） ;Slave ending ;ELSEIF TALENT:玩具 && CFLAG:21 == 1 ;DRAWLINE ;WSTR:(K++) = ………… ;WSTR:(K++) = ……… ;WSTR:(K++) = …… ;WSTR:(K++) = ;WSTR:(K++) = ;WSTR:(K++) = 　　　　　　　　―― Extra Ending　（◯◯エンド） ;ENDIF ;CASE "調教師END" ;CASE "稀代の調教師END" ;CASE "食堂経営END" ;CASE "娼館経営END" ;CASE "アイドルEND" ENDSELECT CALL 口上変数表示 ;After this, call the usual end/continue/NG+ choice if 1 is returned RETURN 1 @ENEMY_BATTLE_EVENT_K9001, ARG, ARG:1, ARG:2 IF TFLAG:戦闘イベント == 1 ;Initiating ＣＯ－ＯＰ shout ; PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ ; PRINTFORML ┃%"",72,LEFT%┃ ; PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ENDIF IF TFLAG:戦闘イベント == 2 ;Participating in ＣＯ－ＯＰ shout ; PRINTFORML ┏>MESSAGE━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ ; PRINTFORML ┃%"",72,LEFT%┃ ; PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ENDIF @BATTLE_EVENT_K9001, ARG, ARG:1, ARG:2 ;■If you need more lines of text, add ; LOCALS:10 = Line 1 ; LOCALS:11 = Line 2 ; LOCALS:12 = Line 3 ; LOCALS:13 = Line 4 ; LOCALS:14 = Line 5 ; SIF ARG < 0 && NO:ARG != 9001 RETURN 0 VARSET LOCALS SELECTCASE TFLAG:戦闘イベント ;COOP initiated CASE 1 LOCALS:10 = Hey! You! Follow up! ;COOP participation CASE 2 ;Master calls it IF FLAG:行動順1 != -1 && FLAG:行動順1 == MASTER PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Humph! You better not screw this up!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Otherwise ELSE LOCALS:10 = I'll help you out! ENDIF ;When summoned to battle CASE 3 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"The Lightning Bolt Taimanin, reporting!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Ally attacking　ARG-teammate、ARG:1-enemy、ARG:2-damage amount in percent CASE 11 CALLFORM SKILL_TYPE_{CFLAG:ARG:入力行動} LOCAL = MAXBASE:(ARG:1):GET_TYPE(RESULT) ;Enemy died IF BASE:(ARG:1):ＨＰ <= 0 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Target eliminated.",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Hitting weakness without a coop ELSEIF LOCAL > 100 && LOCAL < 999 IF CFLAG:(ARG:1):防御フラグ PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"How'd you like that?!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ELSE ;jump to COOP RETURN 0 ENDIF ;Large ELSEIF ダメージ割合(ARG:1, ARG:2) > 50 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"You're finished!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ELSEIF ダメージ割合(ARG:1, ARG:2) > 25 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Here! And here!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ELSEIF ダメージ割合(ARG:1, ARG:2) > 0 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Fufu, feel like running away now?",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;nullified ELSEIF ダメージ割合(ARG:1, ARG:2) <= 0 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Ahhh?! How?!!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ENDIF ;Ally hit ;ARG-hit ally、ARG:1-enemy、ARG:2-damage amount in percentage CASE 12 ;Killed IF BASE:ARG:ＨＰ <= 0 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"No... I...",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Large ELSEIF ダメージ割合(ARG, ARG:2) > 50 || 現HP割合(ARG) < 25 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Urgh! W-why you...",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Null ELSEIF ARG:2 == 0 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Hrumph! You're worthless!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Drained ELSEIF ARG:2 < 0 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Fufu, thanks for the treat!~",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ENDIF ;Reflected CASE 15 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Huh?!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Reflecting CASE 16 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Did you dream that you could ever touch me?",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Evaded CASE 17 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Kuu... how dare you! Stand still!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Evading CASE 18 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Hoh!~ ",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Retaliation skill called CASE 20 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Rakurai!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Victory CASE 90 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Mission success!",72,LEFT%┃ PRINTFORML ┃%"Make sure you thank me properly later~!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Level-up CASE 91 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Fufu~ I've gotten stronger, haven't I?",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Successful escape CASE 92 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Ch! You better watch your back!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Fail to escape CASE 93 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"How did they cut us off?!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Combat start CASE 94 IF FLAG:先制攻撃フラグ PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Engaging the enemy!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ELSEIF 現HP割合(ARG) < 25 ;Near death PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Fu... fuuuu, I-I can do it!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ELSE PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"I'll handle this one!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ENDIF ;Ambushed CASE 95 IF 現HP割合(ARG) < 25 ;Near death PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Khh... this one might be a little tough.",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ELSE PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"W-we're surrounded?!",72,LEFT%┃ PRINTFORML ┃%"Get it together, dummy!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ENDIF ;Preemptive Strike CASE 96 IF 現HP割合(ARG) < 25 ;Near death PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"I-I'm not even nearly done! Not yet!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ELSE PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"You let down your guard, idiot~",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ENDIF ENDSELECT SIF !(LOCALS:10 == "") CALL MESSAGE_B2(CALLNAME:ARG,0, LOCALS:10, LOCALS:11, LOCALS:12, LOCALS:13, LOCALS:14) @BATTLE_MESSAGE_K9001,ARG,ARG:1 = 0 ;■If you need more lines of text, add ; LOCALS:10 = Line 1 ; LOCALS:11 = Line 2 ; LOCALS:12 = Line 3 ; LOCALS:13 = Line 4 ; LOCALS:14 = Line 5 ; VARSET LOCALS ;LOCALS will hold the name of used skill CALLFORM SKILL_NAME_{CFLAG:ARG:入力行動},ARG LOCALS = %RESULTS% ;FLAG:ARG:ターゲット ;Don't use when collapsed ;SIF TALENT:ARG:9 ; RETURN 0 CALLFORM SKILL_EFECT_{CFLAG:ARG:入力行動} ;Easy to comment out IF 1 == 0 ;------------------------------------------------- ;Incapacitating ailment ;------------------------------------------------- ;Charmed ELSEIF CFLAG:ARG:ステート == GET_STATE_NUM("CHARM") ;Waste turn IF CFLAG:ARG:入力行動 == 2314 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"T-this is... my body feels hot...",72,LEFT%┃ PRINTFORML ┃%"N-no, I can't... but it feels so hot...",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ELSE LOCALS:10 = ENDIF ;Confused ELSEIF CFLAG:ARG:ステート == GET_STATE_NUM("PANIC") ;Throw cash IF CFLAG:ARG:入力行動 == 2315 LOCALS:10 = ;Waste turn ELSEIF CFLAG:ARG:入力行動 == 2314 LOCALS:10 = ELSE LOCALS:10 = ENDIF ;------------------------------------------------- ;Specific skill ;------------------------------------------------- ;Normal attack ELSEIF CFLAG:ARG:入力行動 == 0 LOCALS:10 = ;Raigeki ELSEIF CFLAG:ARG:入力行動 == 9008 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Let's see if you can dodge this!",72,LEFT%┃ PRINTFORML ┃%"Come! Raigeki!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Raiijuudan ELSEIF CFLAG:ARG:入力行動 == 9009 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Limiter, 10% release!",72,LEFT%┃ PRINTFORML ┃%"Raiijuudan!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;ThorHammer ELSEIF CFLAG:ARG:入力行動 == 9010 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"I'm going to blow you all away!",72,LEFT%┃ PRINTFORML ┃%"Thor Hammer: The Leap!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;------------------------------------------------- ;Gun attack + special bullet shots ;------------------------------------------------- ELSEIF RANGE(CFLAG:ARG:入力行動,2101, 2200) ;GUN IF CFLAG:ARG:入力行動 == 2101 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Haaa!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ;Special Bullet ELSE PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"And here's something special for you!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ENDIF ;------------------------------------------------- ;Basic Actions ;------------------------------------------------- ELSEIF RANGE(CFLAG:ARG:入力行動,2301, 2400) ;ＣＨＡＮＧＥ IF CFLAG:ARG:入力行動 == 2301 PRINTFORML ┏>＠%NAME:ARG,20,LEFT%━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ PRINTFORML ┃%"Hey, you, swap with me!",72,LEFT%┃ PRINTFORMW ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ ELSE LOCALS:10 = ENDIF ;------------------------------------------------- ;Use item ;------------------------------------------------- ELSEIF RANGE(CFLAG:ARG:入力行動,3001, 3500) LOCALS:10 = ;------------------------------------------------- ;Linkage ;------------------------------------------------- ELSEIF RANGE(CFLAG:ARG:入力行動,4000, 5000) ;Messiah Riser IF CFLAG:ARG:入力行動 == 4160 LOCALS:10 = ;L-Heat Riser ELSEIF CFLAG:ARG:入力行動 == 4200 LOCALS:10 = ;Death Game ELSEIF CFLAG:ARG:入力行動 == 4800 LOCALS:10 = ELSE LOCALS:10 = ENDIF ;------------------------------------------------- ;Otherwise, by element ;------------------------------------------------- ;Slash ELSEIF RANGE(CFLAG:ARG:入力行動,1, 99) LOCALS:10 = ;Pierce ELSEIF RANGE(CFLAG:ARG:入力行動,101, 199) LOCALS:10 = ;Strike ELSEIF RANGE(CFLAG:ARG:入力行動,201, 299) LOCALS:10 = ;Havoc ELSEIF RANGE(CFLAG:ARG:入力行動,301, 400) ;Biting IF RANGE(CFLAG:ARG:入力行動,321, 326) LOCALS:10 = ;Others ELSE LOCALS:10 = ENDIF ;Recovery ELSEIF RANGE(CFLAG:ARG:入力行動,401, 499) ;Full heals IF CFLAG:ARG:ターゲット > 6 LOCALS:10 = ELSE LOCALS:10 = ENDIF ;Support ELSEIF RANGE(CFLAG:ARG:入力行動,501, 599) ;Buff IF RANGE(CFLAG:ARG:入力行動,501, 505) || CFLAG:ARG:入力行動 == 558 LOCALS:10 = ;Debuff ELSEIF RANGE(CFLAG:ARG:入力行動,506, 509) || CFLAG:ARG:入力行動 == 541 || CFLAG:ARG:入力行動 == 556 LOCALS:10 = ;Taunt ELSEIF CFLAG:ARG:入力行動 == 515 LOCALS:10 = ;Other ELSE LOCALS:10 = ENDIF ;Defensive ELSEIF RANGE(CFLAG:ARG:入力行動,601, 699) LOCALS:10 = ;Fire ELSEIF RANGE(CFLAG:ARG:入力行動,701, 799) LOCALS:10 = ;Ice ELSEIF RANGE(CFLAG:ARG:入力行動,801, 899) LOCALS:10 = ;Elec ELSEIF RANGE(CFLAG:ARG:入力行動,901, 999) LOCALS:10 = ;Force ELSEIF RANGE(CFLAG:ARG:入力行動,1001, 1099) LOCALS:10 = ;Nerve ELSEIF RANGE(CFLAG:ARG:入力行動,1101, 1199) LOCALS:10 = ;Mind ELSEIF RANGE(CFLAG:ARG:入力行動,1201, 1299) LOCALS:10 = ;Light ELSEIF RANGE(CFLAG:ARG:入力行動,1301, 1399) LOCALS:10 = ;Dark ELSEIF RANGE(CFLAG:ARG:入力行動,1401, 1499) LOCALS:10 = ;Earth ELSEIF RANGE(CFLAG:ARG:入力行動,1501, 1599) LOCALS:10 = ;Water ELSEIF RANGE(CFLAG:ARG:入力行動,1601, 1699) LOCALS:10 = ;Wind ELSEIF RANGE(CFLAG:ARG:入力行動,1701, 1799) LOCALS:10 = ;Grav ELSEIF RANGE(CFLAG:ARG:入力行動,1801, 1899) LOCALS:10 = ;Nuclear ELSEIF RANGE(CFLAG:ARG:入力行動,1901, 1999) LOCALS:10 = ;Almighty ELSEIF RANGE(CFLAG:ARG:入力行動,2001, 2099) ;Self-destruct IF RANGE(CFLAG:ARG:入力行動,2005, 2007) LOCALS:10 = ELSE LOCALS:10 = ENDIF ;Magical Girl ELSEIF RANGE(CFLAG:ARG:入力行動,2989, 2999) LOCALS:10 = ;------------------------------------------------- ;Otherwise ;------------------------------------------------- ELSE LOCALS:10 = ENDIF ;------------------------------------------------- ;Other-otherwise ;------------------------------------------------- IF LOCALS:10 == "" ;If there's nothing else to talk about LOCALS:10 = ENDIF SIF !(LOCALS:10 == "") CALL MESSAGE_B2(CALLNAME:ARG,1, LOCALS:10, LOCALS:11, LOCALS:12, LOCALS:13, LOCALS:14)