12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531 |
- # meet
- if $ARGS[0] = 'start':
- minut += 15
- dayA += 1
- svidanieA = 0
- giftNum = giftNumA
- if night_mode = 1:
- fcolor = rgb(255, 255, 255)
- bcolor = rgb(0, 0, 0)
- lcolor = rgb(106, 90, 205)
- else
- fcolor = rgb(0, 0, 0)
- bcolor = rgb(255, 255, 255)
- lcolor = rgb(106, 90, 205)
- end
- gs 'boyStat', $boyA
- !!$boybody = 1 - tall, 2 - average, 3 - short
- $boybody = $boybodyA
- !!$boybod = 1 - thin, 2 - athletic, 3 - chunky, 4 - fat
- $boybod = $boybodA
- $boyface = $boyfaceA
- !! sexual force of 0 prior_to 2
- silaVag = silaVagA
- !!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
- finance = financeA
- !!check in appearance, a parameter vnesh
- vneshBoy = vneshBoyA
- $boyClo = $boyCloA
-
-
- !!0 - 0 to 2, 1 - 3 to 5, 2, 5 to 6
- !! These variables will be compared to the player value 'salocatnow'.
- figurBoy = figurBoyA
-
-
- if figurBoy = 0:
- figurePrefMin = 0
- figurePrefMax = 2
- elseif figurBoy = 1:
- figurePrefMin = 3
- figurePrefMax = 4
- elseif figurBoy = 2:
- figurePrefMin = 5
- figurePrefMax = 77
- else
- figurePrefMin = 0
- figurePrefMax = 99
- end
-
- !!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
- titBoy = titBoyA
- if titBoy = 0:
- titMin = 0
- titMax = 3
- elseif titBoy = 1:
- titMin = 3
- titMax = 4
- elseif titBoy = 2:
- titMin = 5
- titMax = 999
- end
-
-
- !!favorite hair color 0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
- haerBoy = haerBoyA
- !!character 0 - soft, 1 -norm 2 - aggressor
- harakBoy = harakBoyA
- !!perversity
- izvrat = izvratA
- husb_birth_year = year - boyage
- husbAge = boyage
-
- !!new preferences
-
- !!renaming perversity constant
- pervConstant = izvrat
-
- !!This is for clothing type preference
- !!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.
- clotTypePref = clotTypePrefA
-
- !!This is for the quality of clothing
- !! 0 - no preference, 1 - 1 to 4 units cheap to average (Locked if formal chosen), 2 - 5 to 7 units expensive to ballroom quality (Locked if fetish is chosen)
- clotQualPref = clotQualPrefA
-
- !!Need to add modifiers based on breast size, where larger breasts end up forcing the player to show more cleavage than those with smaller breasts.
- !! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring
- !! The breast size must be adjusted either when the action is being calculeted or we can base it on their ideal breast size :titBoy + 0/3 depending on the players breast size
-
- !! How much they want to see your chest USE THIS FOR NOW
- !! 0 - no preference, 1 - 1 neckline , 2 - 2 or moderate, 3 - 3 to 4 or heavy to severe
- !! It doesn''t matter if your poor or rich, everyone loves tits.
- clotTopPref = clotTopPrefA
-
- !!This part helps calculate the constant to add to the
-
-
- !!This is to set the max/min of the clotTop variables. This is so you dont need to go through the code changing individual numbers.
- if clotTopPref = 1:
- clotTopMin = 1
- clotTopMax = 4
- elseif clotTopPref = 2:
- clotTopMin = 3
- clotTopMax = 5
- elseif clotTopPref = 3:
- clotTopMin = 5
- clotTopMax = 7
- else
- clotTopMin = 0
- clotTopMax = 999
- end
-
-
-
-
- !!THIS IS THE EQUATION FOR THE TIT ADDITION
- if tits < 2:
- titConstant = 0
- elseif tits >= 2 and tits < 4:
- titConstant = 1
- elseif tits >= 4 and tits < 6:
- titConstant = 2
- elseif tits >= 6:
- titConstant = 3
- else
- titConstant = 0
- end
-
-
-
-
- !! This is for pants and skirt shortness and will be grouped together as such.
- !! 0 - no preference, 1 - 1 to 2 units or ankle to calf length, 2 - 3 to 5 units or knee to miniskirt, 3 - 5 units to 6 or slut to hoe.
- bottShorPref = bottShorPrefA
-
-
- !!This is to set the max/min of the bottShor variables. This is so you dont need to go through the code changing individual numbers.
- if bottShorPref = 1:
- bottShorMin = 0
- bottShorMax = 2
- elseif bottShorPref = 2:
- bottShorMin = 3
- bottShorMax = 5
- elseif bottShorPref = 3:
- bottShorMin = 5
- bottShorMax = 6
- else
- bottShorMin = 0
- bottShorMax = 999
- end
-
-
- !! This is for clothes thinness.
- !! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)
- !! I see the moderate to really thin overlapping. Its intentional.
-
- !!This is to set the max/min of the clotThinness variables. This is so you dont need to go through the code changing individual numbers.
- clotThinPref = clotThinPrefA
- if clotThinPref = 1:
- clotThinMin = 0
- clotThinMax = 2
- elseif clotThinPref = 2:
- clotThinMin = 3
- clotThinMax = 4
- elseif clotThinPref = 3:
- clotThinMin = 4
- clotThinMax = 6
- else
- pierPrefMin = 0
- clotThinMax = 999
- end
-
-
-
- !!This is to find out if they want you to wear bimbo clothing
- !! 0 - no preference, 1 - Prefers bimbo clothing.
- bimbPref = bimbPrefA
-
- !!This is to find out if they want you to wear piercings.
- !! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.
- pierPref = pierPrefA
-
- !!This is to set the max min
- if pierPref = 1:
- pierPrefMin = 0
- pierPrefMax = 2
- elseif pierPref = 2:
- pierPrefMin = 3
- pierPrefMax = 5
- elseif pierPref = 3:
- pierPrefMin = 6
- pierPrefMax = 999
- else
- pierPrefMin = 0
- pierPrefMax = 999
- end
-
-
-
-
- !!This is to find out if they want you to have tattoos.
- !! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.
- tattPref = tattPrefA
-
- !!This is to set the max min for tattoos
-
- if tattPref = 1:
- tattPrefMin = 0
- tattPrefMax = 2
- elseif tattPref = 2:
- tattPrefMin = 3
- tattPrefMax = 5
- elseif tattPref = 3:
- tattPrefMin = 6
- tattPrefMax = 999
- else
- tattPrefMin = 0
- tattPrefMax = 999
- end
-
- !!This is to find out how big they want your lips.
- !! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
- lipsPref = lipsPrefA
-
- if lipsPref = 1:
- lipsPrefMin = 2
- lipsPrefMax = 3
- elseif lipsPref = 2:
- lipsPrefMin = 3
- lipsPrefMax = 99
- else
- lipsPrefMin = 0
- lipsPrefMax = 99
- end
-
-
-
- !!This is to find out how big they want YOU.
- !! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)
- !! Notice how this one overlaps. I believe that it should because changing ones weight is very hard.
- bodyPref = bodyPrefA
-
- !!This is to find out how much makeup they want you to wear.
- !! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)
- makePref = makePrefA
-
-
- !! This is to see if they like a ditz, average, or a smartypants
- !!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence.
- IQPref = IQPrefA
-
- !!This is the new hair color preference
- !! 0 - black, 1 - brown, 2 - redhead, 3 - blonde, 4 - no preference,
- hairPref = haerBoy
-
- !!This keeps track in the change action what it plans to change
- $changeFind = ''
- !!This keeps track on how many
-
- !!How many days until the boyfriend starts to comment.
-
- clotDay = 3
- bodyDay = 7
-
-
- !!How many days until he wants you to change.
- pierDay = 7
- tattDay = 7
- lipsDay = 9
- titsDay = 12
- figureDay = 15
-
-
- if love = 3:
- '<<$boydescA>> has hired a wedding limousine and it''s outside waiting for you. This is it, you are getting married today.'
- act 'Sit in the limousine':
- cla
- 'You get into the limo, and it drives off. Soon you arrive at the wedding, <<$boydescA>> is waiting for you as you walk down the aisle.'
- act 'Marry husband':
- cla
- minut += 60
- love = 0
- bfA = 0
- husband = 100
- husbanday = 0
- $husName = $boyA
- $husHair = $boyfaceA
- $husBody = $boybodyA
- $husFat = $boybodA
- husDick = dickA
- harakHusb = harakBoyA
- izvratH = izvratA
- silavagH = silavagA
- husbFin = financeA
- husbandMark = 1
- 'The wedding reception takes place at a cafe. There aren''t many guests since neither you nor the groom have that many friends or family members. There is a lot of congratulations, toasts, merrymaking and crying. By the evening, everybody is drunk and you and your husband stagger into a taxi, which takes you home.'
- act 'Wedding night':gt 'husbsex', 'room'
- end
- end
- exit
- elseif love = 2:
- '<<$boydescA>> looks very excited and suddenly pulls a ring out of a box.'
- '<<$boydescA>> says "<<$pcs_nickname>>. I offer you my hand and heart. Would you marry me?"'
- act 'No (turn him down)':
- minut += 60
- bfA = 0
- pregtalk = 0
-
- end
- act 'Yes':
- cla
- 'You agree and put the ring on your finger. <<$boydescA>> rejoices and happily hugs and kisses you.'
- '<<$boydescA>> says "Now you need to find a wedding dress."'
- act 'Go looking for the dress':
- cla
- minut += 60
- love = 3
- 'You get into a taxi with your soon to be husband and go to the store to choose a dress. You choose an expensive and luxurious dress. <<$boydescA>> pays for the purchase.'
- 'After a long day you feel tired and ask <<$boydescA>> to drive you home, warning him that the next time you''ll meet you will get married.'
- dynamic $go_home
- end
- end
- exit
- end
- if pcs_makeup > 1 and ($clothingworntype = 'expensive' or $clothingworntype = 'formal') and curly > 0 and love = 1 and harakBoyA = 0:
- '<<$boydescA>> looks very excited. He decides that you are now ready to meet his mother.'
- act 'Meet the parents':gt 'love', 'mother'
- exit
- elseif pcs_makeup > 1 and ($clothingworntype = 'expensive' or $clothingworntype = 'formal') and curly > 0 and love = 1 and harakBoyA = 1 and tanga = 1:
- '<<$boydescA>> examins you and decides that you are ready to meet his friends.'
- act 'Meet his friends':gt 'love', 'frends'
- exit
- end
-
-
- !!I WILL START HERE!
-
- !!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.
- if clotTypePref = 0:
- $clotTypePref = ''
- elseif clotTypePref = 1:
- $clotTypePref = 'cheap'
- elseif clotTypePref = 2:
- $clotTypePref = 'average'
- elseif clotTypePref = 3:
- $clotTypePref = 'formal'
- elseif clotTypePref = 4:
- $clotTypePref = 'fetish'
- end
-
- !! 0 - no preference, 1 - 1 to 4 units cheap to average (Locked if formal chosen), 2 - 5 to 7 units expensive to ballroom quality (Locked if fetish is chosen)
- if clotQualPref = 0:
- $clotQualPref = 'any type of'
- elseif clotQualPref = 1:
- $clotQualPref = 'anything but expensive'
- elseif clotQualPref = 2:
- $clotQualPref = 'expensive'
- end
-
- !! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring
- if clotTopPref = 0:
- $clotTopPref = 'any amount of'
- elseif clotTopPref = 1:
- $clotTopPref = 'a little bit of'
- elseif clotTopPref = 2:
- $clotTopPref = 'a lot of'
- elseif clotTopPref = 3:
- $clotTopPref = 'a huge amount of'
- end
-
- !! 0 - no preference, 1 - 1 to 2 units or ankle to calf length, 2 - 3 to 4 units or knee to miniskirt, 3 - 5 units to 6 or slut to hoe.
- if bottShorPref = 0:
- $bottShorPref= 'any length'
- elseif bottShorPref = 1:
- $bottShorPref= 'modest length'
- elseif bottShorPref = 2:
- $bottShorPref= 'slightly short length'
- elseif bottShorPref = 3:
- $bottShorPref= 'really short length'
- end
-
- !! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)
- if clotThinPref = 0:
- $clotThinPref= ''
- elseif clotThinPref = 1:
- $clotThinPref= 'thick'
- elseif clotThinPref = 2:
- $clotThinPref= 'a little thin'
- elseif clotThinPref = 3:
- $clotThinPref= 'really thin or even see through'
- end
-
- !! 0 - no preference, 1 - Prefers bimbo clothing.
- if bimbPref = 0:
- $bimboPref = ''
- else
- $bimboPref = 'a bimbo'
- end
-
- !! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.
- if pierPref = 0:
- $pierPref = 'any amount'
- elseif pierPref = 1:
- $pierPref = 'a couple'
- elseif pierPref = 2:
- $pierPref = 'a good amount'
- elseif pierPref = 3:
- $pierPref = 'a lot'
- end
-
- !! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.
- if tattPref = 0:
- $tattPref = 'any amount'
- elseif tattPref = 1:
- $tattPref = 'a couple'
- elseif tattPref = 2:
- $tattPref = 'a good amount'
- elseif tattPref = 3:
- $tattPref = 'a lot'
- end
-
- !! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
- if lipsPref = 0:
- $lipsPref = 'any sized lips'
- elseif lipsPref = 1:
- $lipsPref = 'average sized lips'
- elseif lipsPref = 2:
- $lipsPref = 'thick lips'
- end
-
- !!This is the Players lip description, this allows flexibility when writing
- if pcs_lip = 0:
- $lipDesc = 'thin'
- elseif pcs_lip = 1:
- $lipDesc = 'soft'
- elseif pcs_lip = 2:
- $lipDesc = 'plump'
- elseif pcs_lip = 3:
- $lipDesc = 'juicy'
- elseif pcs_lip = 4:
- $lipDesc = 'thick'
- end
-
-
-
- !! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)
- if bodyPref = 0:
- $bodyPref = 'any weight'
- elseif bodyPref = 1:
- $bodyPref = 'should be skinny'
- elseif bodyPref = 2:
- $bodyPref = ' should be not to skinny or fat'
- elseif bodyPref = 3:
- $bodyPref = 'should be thick and curvy'
- end
-
- !! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)
- if makePref = 0:
- $makePref = 'any amount of makeup'
- elseif makePref = 1:
- $makePref = 'a sutle amount of makeup'
- elseif makePref = 2:
- $makePref = 'a good amount of makeup'
- elseif makePref = 3:
- $makePref = 'a heavy amount of makeup'
- end
-
- !!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence.
- if IQPref = 0:
- $IQPref = 'nice'
- elseif IQPref = 1:
- $IQPref = 'ditzy'
- elseif IQPref = 2:
- $IQPref = 'with at least a little brain power'
- elseif IQPref = 3:
- $IQPref = 'genius'
- end
-
- !! 0 - black, 1 - brown, 2 - redhead, 3 - blonde, 4 - no preference,
- if hairPref = 0:
- $hairPref = 'black'
- elseif hairPref = 1:
- $hairPref = 'brown'
- elseif hairPref = 2:
- $hairPref = 'redhead'
- elseif hairPref = 3:
- $hairPref = 'blond'
- elseif hairPref = 4:
- $hairPref = 'any color'
- end
-
-
- !!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
- if titBoy = 0:
- $titBoy = 'petite breasts'
- elseif titBoy = 1:
- $titBoy = 'good sized breasts'
- elseif titBoy = 2:
- $titBoy = 'huge breasts'
- end
-
- if pcs_hairbsh = 1 and curly > 0:
- bfA += 2 &
- $meetHair = 'Your hair looks very beautiful.'
- end
- if pcs_hairbsh = 1 and curly = 0:
- bfA += 1
- $meetHair = 'You have pretty hair today.'
- end
- if pcs_hairbsh = 0:
- bfA -= 1
- $meetHair = 'You look like you were in a hurry.'
- end
-
- !!This are generic things your boyfriend will call you based on how much he likes you.
- if bfA > 80:
- randchan = rand(0,2)
- if randchan = 0 and harakBoyA ! 0:
- $giveNick = 'angel'
- elseif randchan = 1:
- $giveNick = 'beautiful'
- elseif randchan = 2:
- $giveNick = 'love'
- end
- elseif bfA > 20:
- randchan = rand(0,1)
- if randchan = 0:
- $giveNick = 'babe'
- elseif randchan = 1:
- $giveNick = '<<$pcs_nickname>>'
- end
- else
- $giveNick = '<<$pcs_firstname>>'
- end
-
-
- !! This is the start of the usual talk
- !!character 0 - soft, 1 -norm 2 - aggressor
- if harakBoyA = 0:
- if bfA > 70:
- randchan = rand(0, 1)
- if randchan = 0:
- $greet = 'says with love in his eyes, "Hey <<$pcs_nickname>>."'
- elseif randchan = 1:
- $greet = 'says lovingly, "Hello love. I''m glad so see you."'
- else
- $greet = 'says quietly while looking into your eyes, "Hello love." '
- end
- elseif bfA > 20:
- randchan = rand(0, 1)
- if randchan = 0:
- $greet = 'says with a faint smile,"Hey <<$pcs_nickname>>."'
- elseif randchan = 1:
- $greet = 'says with a smile , "Hi <<$pcs_nickname>>."'
- end
- else
- $greet = 'says, "Hi <<$pcs_firstname>>."'
- end
- end
- if harakBoyA = 1:
- if bfA > 70:
- randchan = rand(0, 1)
- if randchan = 0:
- $greet = 'says, "Hey love. I am so happy to see you."'
- elseif randchan = 1:
- $greet = 'says intimately, "Hello my angel."'
- else
- $greet = 'says while admiring you, "Hello <<$pcs_nickname>> beautiful."'
- end
- elseif bfA > 20:
- randchan = rand(0, 1)
- if randchan = 0:
- $greet = 'says with a smile, "Hey <<$pcs_nickname>>, glad to see you."'
- elseif randchan = 1:
- $greet = 'says with a soft tone, "Hello beautiful."'
- end
- else
- $greet = 'says, "Hello <<$pcs_nickname>>."'
- end
- end
- if harakBoyA = 2:
- if bfA > 70:
- randchan = rand(0, 1)
- if randchan = 0:
- $greet = 'says with a loving voice, "Theres my sexy gal."'
- elseif randchan = 1:
- $greet = 'says with a toothful grin, "There is my goddess."'
- else
- $greet = 'says with a rather loud enduring voice, "Hey babe!"'
- end
- elseif bfA > 20:
- randchan = rand(0, 1)
- if randchan = 0:
- $greet = 'says with a grin, "Hey <<$pcs_nickname>>."'
- elseif randchan = 1:
- $greet = 'says with a chuckle, "Hey''ya <<$pcs_nickname>>."'
- end
- else
- $greet = 'says, "Hey <<$pcs_nickname>>."'
- end
- end
-
-
-
- !! QUEST VARIABLES!!! WOOOT ALMOST TIME!
- didPushAway = 0
-
-
-
- !!How beautiful you are
- if pcs_skin < 20:
- bfa -= 2 & $meetskin = 'looking at his feet'
- elseif pcs_skin < 40:
- bfa -= 1 & $meetskin = 'giving you a quick glance'
- elseif pcs_skin < 60:
- $meetskin = 'looking at you'
- elseif pcs_skin < 80:
- bfa += 1 & $meetskin = 'smiling at you'
- else
- bfa += 2 & $meetskin = 'smiling at you'
- end
-
- !! Your lip size
- if pcs_lip = 0:$meetlip = 'thin lips'
- if pcs_lip = 1:$meetlip = 'soft lips'
- if pcs_lip = 2:$meetlip = 'plump lips'
- if pcs_lip = 3:$meetlip = 'large, plump lips'
- if pcs_lip = 4:$meetlip = 'thick and huge lips'
-
-
-
- if financeA = 0:$clom = 'dressed in a tracksuit.'
- if financeA = 1:$clom = 'dressed in jeans and a sweater.'
- if financeA = 2:$clom = 'dressed in a respectable and expensive jacket.'
-
- !!Greeting start
-
- 'At the entrance <<$meetskin>> stands <<$boydescA>>. He comes over to you and <<$greet>>'
-
-
- gs 'boy_likes', 'hairPref'
- gs 'boy_likes', 'makePref'
-
- if harakBoyA = 0:'<<$boydescA>> looks like a timid and not very confident young man <<$clom>>'
- if harakBoyA = 1:'<<$boydescA>> looks like a average young man <<$clom>>'
- if harakBoyA = 2:'<<$boydescA>> looks like a cocky and brash young man <<$clom>>'
-
-
-
-
- !!This is to reset the like part later
-
- likeCount = 0
- like1 = 99
- like2 = 99
- like3 = 99
-
- !! This is the greeting kissy kissy part
- if harakBoyA >= 0:
- if bfa > -20:
- bfa += 0
- '<<$boydescA>> gets close to you, and you can tell by his body movements he wants to kiss you.'
- act 'Kiss with tongue':
- *clr
- 'You take the initiative and when he opens his mouth you thrust your tongue into his mouth.'
- gs 'arousal', 'kiss', 5
- pcs_dom += 1
- pcs_mood += 10
- gs 'stat'
- if venera > 4:
- bfa = 0
- '<<$boydescA>> takes a closer look at you and says, "What is wrong with your lips? They are very sore. Is that genital herpes? I better go, I do not want to get infected. I''m sorry, goodbye."'
- pcs_mood -= 20
- dynamic $go_home
- exit
- elseif venera < 4 and cumloc[11] = 0 and (cumloc[6] = 0 and cumloc[7] = 0):
- if harakBoyA = 0:
- bfa += 2
- 'Normally this would have made him feel uncomfortable, but as you pull away he smiles and sighs contently.'
- elseif harakBoyA = 1:
- bfa += 1
- 'He goes with it a blink and in moments your tongues are intertwined.'
- elseif harakBoyA = 2:
- 'It seems as <<$boydescA>> had the same idea, as he pushes his tongue into your mouth as much as you push into his.'
- bfa += 2
- else
- 'This should not fire off at all: TongueKiss'
- end
- elseif cumloc[11] = 1 or (cumloc[6] = 1 or cumloc[7] = 1) and pervConstant = 1:
- if cumloc[11] = 1:
- if harakBoyA = 0:
- bfa += 2
- pcs_horny += 5
- 'He can see sperm on your face, but underneath his shy demener you know that it only turns him on.'
- elseif harakBoyA = 1:
- bfa += 2
- pcs_horny += 5
- 'He can see sperm on your face, but you know that it only turns him on more.'
- elseif harakBoyA = 2:
- 'He can see sperm on your face, but by the bulge in his pants you know it only turns him on.'
- end
- elseif (cumloc[6] = 1 or cumloc[7] = 1):
- if harakBoyA = 0:
- bfa += 2
- pcs_horny += 5
- 'He can see sperm on your ass, but underneath his shy demener you know that it only turns him on.'
- elseif harakBoyA = 1:
- bfa += 2
- pcs_horny += 5
- 'He can see sperm on your ass, but you know that it only turns him on more.'
- elseif harakBoyA = 2:
- bfa += 3
- pcs_horny += 5
- 'He can see sperm on your ass, but by the bulge in his pants you know it only turns him on.'
- end
- end
- elseif cumloc[11] = 1 or (cumloc[6] = 1 or cumloc[7] = 1) and pervConstant ! 1:
- if cumloc[11] = 1:
- bfa = 0
- 'He notices the sperm on your face, "H-Hey- <<$pcs_firstname>>! What the...?! You dirty whore!", he then pushes you out of his face. "We are through, I don''t want to see your face again!'
- pcs_mood -= 20
- dynamic $go_home
- exit
- elseif (cumloc[6] = 1 or cumloc[7] = 1):
- bfa += 2
- 'He notices the sperm on your ass, "<<$pcs_firstname>>! What the...?! You dirty whore!", he then pushes you away. "We are through, I don''t want to see your face again!'
- pcs_mood -= 20
- dynamic $go_home
- exit
- end
- end
- cla
- act 'Continue':
- xgt 'meet', 'likes'
-
- end
- exit
- end
- act 'Kiss with lips':
- *clr
- 'You press your <<$meetlip>> softly against his, and for a split second time seems to stop.'
- pcs_mood += 10
- if cumloc[11] = 0 and (cumloc[6] = 0 and cumloc[7] = 0):
- if harakBoyA = 0:
- bfa += 2
- 'He wraps arms around you, you both stay like this for at least a couple of seconds and as you pull away he looks into your eyes and smiles.'
- gs 'arousal', 'kiss', 5
- gs 'stat'
- elseif harakBoyA = 1:
- bfa += 2
- 'He kisses you back with such skill it turns you on.'
- gs 'arousal', 'kiss', 5
- gs 'stat'
- elseif harakBoyA = 2:
- bfa += 2
- 'He kisses you back with such passion you feel a tingle within you.'
- gs 'arousal', 'kiss', 5
- gs 'stat'
- end
- elseif cumloc[11] = 1 or (cumloc[6] = 1 or cumloc[7] = 1) or cumloc[12] = 1 and pervConstant = 1:
- if cumloc[11] = 1:
- if harakBoyA = 0:
- bfa += 2
- pcs_horny += 5
- 'He can see sperm on your face, but underneath his shy demener you know that it only turns him on.'
- elseif harakBoyA = 1:
- bfa += 2
- pcs_horny += 5
- 'He can see sperm on your face, but you know that it only turns him on more.'
- elseif harakBoyA = 2:
- bfa += 3
- pcs_horny += 5
- 'He can see sperm on your face, but by the bulge in his pants you know it only turns him on.'
- end
- elseif (cumloc[6] = 1 or cumloc[7] = 1):
- if harakBoyA = 0:
- bfa += 2
- pcs_horny += 5
- 'He can see sperm on your ass, but underneath his shy demener you know that it only turns him on.'
- elseif harakBoyA = 1:
- bfa += 2
- pcs_horny += 5
- 'He can see sperm on your ass, but you know that it only turns him on more.'
- elseif harakBoyA = 2:
- bfa += 3
- pcs_horny += 5
- 'He can see sperm on your ass, but by the bulge in his pants you know it only turns him on.'
- end
- elseif cumloc[12] = 1:
- if harakBoyA = 0:
- bfa += 2
- pcs_horny += 5
- 'He can smell the scent of sperm on you, but underneath his shy demener you know that it only turns him on.'
- elseif harakBoyA = 1:
- bfa += 2
- pcs_horny += 5
- 'He can smell the scent of sperm on you, but you know that it only turns him on more.'
- elseif harakBoyA = 2:
- bfa += 3
- pcs_horny += 5
- 'He can smell the scent of sperm on you, but you know by the bulge in his pants it only turns him on more.'
- end
- end
- else if cumloc[11] = 1 or (cumloc[6] = 1 or cumloc[7] = 1) and pervConstant ! 1:
- if cumloc[11] = 1:
- bfa = 0
- 'He notices the sperm on your face, "<<$pcs_firstname>>! What the...?! You dirty whore!", he then pushes you out of his face. "We are through, I don''t want to see your face again!'
- pcs_mood -= 20
- dynamic $go_home
- exit
- elseif (cumloc[6] = 1 or cumloc[7] = 1):
- bfa = 0
- 'He notices the sperm on your ass, "<<$pcs_firstname>>! What the...?! You dirty whore!", he then pushes you away. "We are through, I don''t want to see your face again!'
- pcs_mood -= 20
- dynamic $go_home
- exit
- end
- end
- cla
- act 'Continue':
- xgt 'meet', 'likes'
-
- end
- exit
- end
- act 'Hint for a kiss on the cheek':
- *clr
- 'You make a cute pouty face and turn your cheek toward <<$boydescA>>. He understands and though he wanted to kiss you, he settles with giving you a peck on the cheek'
- pcs_mood += 10
- if cumloc[11] = 0 and (cumloc[6] = 0 and cumloc[7] = 0):
- if harakBoyA = 0:
- bfa += 2
- 'He gives you a soft kiss on the cheek, and you can tell he finds this act very cute.'
- gs 'arousal', 'kiss', 5
- gs 'stat'
- elseif harakBoyA = 1:
- bfa += 1
- 'He kisses you on the cheek and before he pulls away you feel a quick kiss on the forhead.'
- gs 'arousal', 'kiss', 5
- gs 'stat'
- elseif harakBoyA = 2:
- bfa += 0
- 'Though you can tell he is a bit disappointed, he gives you a kiss on the cheek. As he pulls away he gives your ass a quick squeeze.'
- gs 'arousal', 'kiss', 5
- gs 'stat'
- end
- elseif cumloc[11] = 1 or (cumloc[6] = 1 or cumloc[7] = 1) or cumloc[12] = 1 and pervConstant = 1:
- if cumloc[11] = 1:
- if harakBoyA = 0:
- bfa += 2
- pcs_horny += 5
- 'He can see sperm on your face, but underneath his shy demener you know that it only turns him on.'
- elseif harakBoyA = 1:
- bfa += 2
- pcs_horny += 5
- 'He can see sperm on your face, but you know that it only turns him on more.'
- elseif harakBoyA = 2:
- bfa += 3
- pcs_horny += 5
- 'He can see sperm on your face, but by the bulge in his pants you know it only turns him on.'
- end
- elseif (cumloc[6] = 1 or cumloc[7] = 1):
- if harakBoyA = 0:
- bfa += 1
- pcs_horny += 5
- 'He can see sperm on your ass, but underneath his shy demener you know that it only turns him on.'
- elseif harakBoyA = 1:
- bfa += 1
- pcs_horny += 5
- 'He can see sperm on your ass, but you know that it only turns him on more.'
- elseif harakBoyA = 2:
- bfa += 1
- pcs_horny += 5
- 'He can see sperm on your ass, but by the bulge in his pants you know it only turns him on.'
- end
- end
- elseif cumloc[11] = 1 or (cumloc[6] = 1 or cumloc[7] = 1) and pervConstant ! 1:
- if cumloc[11] = 1:
- bfa = 0
- 'He notices the sperm on your face, "H-Hey- <<$pcs_firstname>>! What the...?! You dirty whore!", he then pushes you out of his face. "We are through, I don''t want to see your face again!'
- pcs_mood -= 20
- dynamic $go_home
- exit
- elseif (cumloc[6] = 1 or cumloc[7] = 1):
- bfa = 0
- 'He notices the sperm on your ass, "H-Hey- <<$pcs_firstname>>! What the...?! You dirty whore!", he then pushes you away. "We are through, I don''t want to see your face again!'
- pcs_mood -= 20
- dynamic $go_home
- exit
- elseif (cumloc[6] = 1 or cumloc[7] = 1):
- bfa = 0
- 'He realizes your mouth smells like sperm, "H-Hey- <<$pcs_firstname>>! What the...?! You dirty whore!", he then pushes you away. "We are through, I don''t want to see your face again!'
- pcs_mood -= 20
- dynamic $go_home
- exit
- end
- end
- cla
- act 'Continue':
- xgt 'meet', 'likes'
-
- end
- exit
- end
- act 'Push his face away':
- *clr
- didPushAway = 1
- 'Maybe you had a bad day, maybe you don''t want a kiss, you rudely push his face away, and by the looks of it, hurting his feelings in the process.'
- if harakBoyA = 0:
- bfa -= 7
- 'He stands there slightly embarrassed, and you can tell this hurt your relationship a good amount.'
- elseif harakBoyA = 1:
- bfa -= 5
- 'He looks at you slightly concerned, but backs off and gives you your space.'
- elseif harakBoyA = 2:
- bfa -= 10
- 'He begins to get angry, he takes a deep breath and gives you space.'
- end
- cla
- act 'Continue':
- xgt 'meet', 'likes'
-
- end
- exit
- end
- end
- end
-
- end
-
- if $ARGS[0] = 'likes':
- cla
- if dayA >= clotDay:
- gs 'boy_likes', 'clothesPref'
-
- end
- if DayA >= bodyDay:
- gs 'boy_likes', 'bodyPref'
- end
-
- xgt 'meet', 'actions'
-
- end
-
- if $ARGS[0] = 'actions':
- cls
- act 'Can I ask you how you think I look?':
- '<<$boydescA>> says "If you insist" and tells you exactly how he thinks you look based on what he likes:'
- gs 'boy_likes', 'allPref'
- act 'Okay, lets talk about something else.':
- xgt 'meet', 'actions'
- end
- end
- act 'What do you want to do today?':
- cla
- randchan = rand(0, 1)
- if randchan = 0:
- sub += 1
- end
- 'You tell him you would rather him decide what we do today.'
- if harakBoyA = 0:
- bfa += 0
- 'Not used to being given the opportunity to choose, he thinks what to do...'
- elseif harakBoyA = 1:
- bfa += 0
- 'He thinks about what to do today.'
- elseif harakBoyA = 2:
- bfa += 1
- 'You can tell he is happy you gave him the ability to choose what to do today.'
- end
- !!This is the choice maker!
- if financeA = 0:
- !! 0 - change player, 1 - beer in stairwell, 2 - walk in park,
- randchan = rand(0, 2)
- !! 1 = does like, 0 = not like
- if (pierWearCount >= pierPrefMin and pierWearCount <= pierPrefMax) or pierPref = 0:
- pierCheck = 1
- else
- pierCheck = 0
- end
- if (tattCount >= tattPrefMin and tattCount <= tattPrefMax) or tattPref = 0:
- tattCheck = 1
- else
- tattCheck = 0
- end
- if (makeupSetting = makePref) or makePref = 0:
- makeupCheck = 1
- else
- makeupCheck = 0
- end
- if pcs_haircol = hairPref:
- hairCheck = 1
- else
- hairCheck = 0
- end
- if (pierWearCount >= pierPrefMin and pierWearCount <= pierPrefMax) or pierPref = 0:
- pierCheck = 1
- else
- pierCheck = 0
- end
- if (tattCount >= tattPrefMin and tattCount <= tattPrefMax) or tattPref = 0:
- tattCheck = 1
- else
- tattCheck = 0
- end
-
-
- if randchan = 0 and (pierCheck + tattCheck + makeupCheck + hairCheck) = 4:
- randchan = rand(1, 2)
- end
- if randchan = 0:
- cls
- !!Some things you can change.
- !!financeA = 0 - hair, makeup, tattoo, piercings.
- if harakBoyA = 0:
- '"Actually can I talk to you about something?", <<$boydescA>> asks you.'
- elseif harakBoyA = 1:
- '"Actually can I talk to you about something?", <<$boydescA>> asks you.'
- elseif harakBoyA = 2:
- '"Actually can I talk to you about something?", <<$boydescA>> asks you.'
- end
- '"Whats up <<$boydescA>>?"'
- '"There is just a trait about you that bugs me, can we change that?"'
- if compliance > 0:
- 'You know you have changed for him before, and you want to avoid to changing into something you are not.'
- end
-
- gs 'boy_likes', 'compliance'
-
- '"And what did you want to change about me?"'
- !!This is to make a last check on how many piercings they are WEARING
- gs 'boy_likes', 'checkPier'
- if pcs_haircol ! hairPref:
- '<<$boydescA>> looks at your hair and says, "can we get your hair dyed?"'
- !!act 'I''d rather not...':
- if sub < 20 and bfa < 60 and compliance < 6:
- act 'I like my hair just the way it is.':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change it, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
- dynamic $go_home
- end
- end
- act 'Go with him':
- gt 'boy_likes', 'changeHair'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much...':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to do that. He tells you he has something to do and heads off'
- dynamic $go_home
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him you are who you are.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You mumble "I would rather not..."':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change it, but you successfully inform him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. He smiles happily and takes you to the salon.'
- sub += 2
- bfa += 5
- act 'Go to Salon':
- gt 'boy_likes', 'changeHair'
- end
- exit
- end
- end
- end
- elseif makeupSetting ! makePref and makePref ! 0:
- '<<$boydescA>> thinks about it and says "Can you wear <<$makePref>> from now on?"'
- !!act 'I''d rather not...':
- if sub < 20 and bfa < 60 and compliance < 6:
- act 'I like my makeup just the way it is.':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change it, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
- end
- end
- act 'Agree to change the makeup you usually wear.':
- gt 'boy_likes', 'changeMake'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much...':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to do that. You can tell that he is bummed when he tells you he has something to do and heads off.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him you like the makeup you usually wear.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You mumble "What''s wrong with my makeup...?"':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change it, but you successfully inform him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. You tell him from now on you will wear <<$makePref>>.'
- sub += 2
- bfa += 5
- act 'Continue':
- gt 'boy_likes', 'changeMake'
- end
- exit
- end
- end
- end
- elseif pierWearCount < pierPrefMin or pierWearCount > pierPrefMax and pierPref ! 0 and pierDay <= dayA:
- '<<$boydescA>> talks about how you just don''t have the right amount of piercings.'
- if pierWearCount < pierPrefMin:
- 'He tells you that you should have more piercings.'
- else
- 'He tells you that you should have less piercings.'
- end
- if sub < 20 and bfa < 60 and compliance < 6:
- act 'I am not going to change my piercings!':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change it, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Agree to change the amount of piercings you have.':
- gt 'boy_likes', 'changePier'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much...':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to do that. He tells you he has something to do and heads off'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him you are who you are.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You mumble "I would rather not..."':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change the amount of piercings you have, but you successfully inform him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. He smiles happily and then gets down to how to get the right amount of piercings.'
- sub += 2
- bfa += 5
- act 'Continue':
- gt 'boy_likes', 'changePier'
- end
- exit
- end
- end
- end
- elseif tattCount < tattPrefMin or tattCount > tattPrefMax and tattPref ! 0 and tattDay <= dayA:
- '<<$boydescA>> talks about how you just don''t have the right amount of tattoos.'
- if tattCount < tattPrefMin:
- 'He tells you that you should have more tattoos.'
- else
- 'He tells you that you should have less tattoos.'
- end
- if sub < 20 and bfa < 60 and compliance < 6:
- act 'I am not going to change my tattoos!':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change it, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Agree to change the amount of tattoos you have.':
- gt 'boy_likes', 'changeTatt'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much...':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to do that. He tells you he has something to do and heads off'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him you are who you are.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You mumble "I would rather not..."':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change the amount of tattoos you have, but you successfully inform him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. He smiles happily then starts to take you to the tattoo parlor to get the right amount of tattoos.'
- sub += 2
- bfa += 5
- act 'Go to tattoo parlor':
- gt 'boy_likes', 'changeTatt'
- end
- exit
- end
- end
- end
-
- else
- 'Erm... Nothing..."'
- act 'Well then...':
- xgt 'meet', 'actions'
- exit
- end
- end
- elseif randchan = 1:
- '<<$boydescA>> suggest you and him drink a beer in the stairwell.'
- act 'Sorry, but I need to go':
- cla
- bfa -= (harakBoyA + 1)
-
- end
- act 'Go with him':gt 'podezdM', 'start'
- exit
-
- elseif randchan = 2:
- '<<$boydescA>> suggests that you take a walk in the park.'
- act 'Sorry, but I need to go':
- cla
- bfa -= (harakBoyA + 1)
-
- end
- act 'Go with him':gt 'parkM', 'start'
- exit
-
- end
- elseif financeA = 1:
- !! 0 - change player, 1 - go to the movies, 2 - walk in park, 3 , suggests that you go to a cafe.
- randchan = rand(0, 3)
- !! 1 = does like, 0 = not like
- if (pierWearCount >= pierPrefMin and pierWearCount <= pierPrefMax) or pierPref = 0:
- pierCheck = 1
- else
- pierCheck = 0
- end
- if (tattCount >= tattPrefMin and tattCount <= tattPrefMax) or tattPref = 0:
- tattCheck = 1
- else
- tattCheck = 0
- end
- if (makeupSetting = makePref) or makePref = 0:
- makeupCheck = 1
- else
- makeupCheck = 0
- end
- if pcs_haircol = hairPref:
- hairCheck = 1
- else
- hairCheck = 0
- end
- if tits >= titMin and tits <= titMax:
- titCheck = 1
- else
- titCheck = 0
- end
-
- if pcs_lips >= lipsPrefMin and tits <= lipsPrefMax:
- lipsCheck = 1
- else
- lipsCheck = 0
- end
-
-
- if randchan = 0 and (pierCheck + tattCheck + makeupCheck + hairCheck + titCheck + lipsCheck) = 6:
- 'Takes one look at your body and loves every part of it.'
- randchan = rand(1, 3)
- end
- if randchan = 0:
- cls
- !!Some things you can change.
- !!financeA = 1 - hair, makeup, tattoo, piercings, lips, tits.
- if harakBoyA = 0:
- '"Actually can I talk to you about something?", <<$boydescA>> asks you.'
- elseif harakBoyA = 1:
- '"Actually can I talk to you about something?", <<$boydescA>> asks you.'
- elseif harakBoyA = 2:
- '"Actually can I talk to you about something?", <<$boydescA>> asks you.'
- end
- '"Whats up <<$boydescA>>?"'
- '"There is just a trait about you that bugs me, can we change that?"'
- if compliance > 0:
- 'You know you have changed for him before, and you want to avoid to changing into something you are not.'
- end
-
- gs 'boy_likes', 'compliance'
-
- '"And what did you want to change about me?"'
- !!This is to make a last check on how many piercings they are WEARING
- gs 'boy_likes', 'checkPier'
-
-
-
- if pcs_haircol ! hairPref:
- '<<$boydescA>> looks at your hair and says, "can we get your hair dyed?"'
- !!act 'I''d rather not...':
- if sub < 20 and bfa < 60 and compliance < 6:
- act 'I like my hair just the way it is.':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change it, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Go with him':
- gt 'boy_likes', 'changeHair'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much...':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to do that. He tells you he has something to do and heads off'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him you are who you are.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You mumble "I would rather not..."':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change it, but you successfully inform him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. He smiles happily and takes you to the salon.'
- sub += 2
- bfa += 5
- act 'Go to Salon':
- gt 'boy_likes', 'changeHair'
- end
- exit
- end
- end
- end
- elseif makeupSetting ! makePref and makePref ! 0:
- '<<$boydescA>> thinks about it and says "Can you wear <<$makePref>> from now on?"'
- !!act 'I''d rather not...':
- if sub < 20 and bfa < 60 and compliance < 6:
- act 'I like my makeup just the way it is.':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change it, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Agree to change the makeup you usually wear.':
- gt 'boy_likes', 'changeMake'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much...':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to do that. You can tell that he is bummed when he tells you he has something to do and heads off.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him you like the makeup you usually wear.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You mumble "What''s wrong with my makeup...?"':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change it, but you successfully inform him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. You tell him from now on you will wear <<$makePref>>.'
- sub += 2
- bfa += 5
- act 'Continue':
- gt 'boy_likes', 'changeMake'
- end
- exit
- end
- end
- end
- elseif pierWearCount < pierPrefMin or pierWearCount > pierPrefMax and pierPref ! 0 and pierDay <= dayA:
- '<<$boydescA>> talks about how you just don''t have the right amount of piercings.'
- if pierWearCount < pierPrefMin:
- 'He tells you that you should have more piercings.'
- else
- 'He tells you that you should have less piercings.'
- end
- if sub < 20 and bfa < 60 and compliance < 6:
- act 'I am not going to change my piercings!':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change it, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Agree to change the amount of piercings you have.':
- gt 'boy_likes', 'changePier'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much...':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to do that. He tells you he has something to do and heads off'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him you are who you are.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You mumble "I would rather not..."':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change the amount of piercings you have, but you successfully inform him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. He smiles happily and then gets down to how to get the right amount of piercings.'
- sub += 2
- bfa += 5
- act 'Continue':
- gt 'boy_likes', 'changePier'
- end
- exit
- end
- end
- end
- elseif tattCount < tattPrefMin or tattCount > tattPrefMax and tattPref ! 0 and tattDay <= dayA:
- '<<$boydescA>> talks about how you just don''t have the right amount of tattoos.'
- if tattCount < tattPrefMin:
- 'He tells you that you should have more tattoos.'
- else
- 'He tells you that you should have less tattoos.'
- end
- if sub < 20 and bfa < 60 and compliance < 6:
- act 'I am not going to change my tattoos!':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change it, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Agree to change the amount of tattoos you have.':
- gt 'boy_likes', 'changeTatt'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much...':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to do that. He tells you he has something to do and heads off'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him you are who you are.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You mumble "I would rather not..."':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change the amount of tattoos you have, but you successfully inform him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. He smiles happily then starts to take you to the tattoo parlor to get the right amount of tattoos.'
- sub += 2
- bfa += 5
- act 'Go to tattoo parlor':
- gt 'boy_likes', 'changeTatt'
- end
- exit
- end
- end
- end
-
- elseif pcs_lip < lipsPrefMin or pcs_lip > lipsPrefMax and lipsDay <= dayA:
- '<<$boydescA>> tells you your lips are just not the right size.'
- if pcs_lip < lipsPrefMin:
- 'He tells you that you should get lip injections.'
- else
- 'He tells you that you should have lip reduction.'
- end
- if sub < 20 and bfa < 60 and compliance < 6:
- act '"My lips are fine the way they are!", you say slightly offended.':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change your lip size, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Go with him':
- gt 'boy_likes', 'changeLips'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much to get work done on my lips.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to get work done on your lips. He tells you he has something to do and heads off.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him that you decide what size lips you look good with.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You squeek, "But I like the size of my lips..."':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change the size, but you successfully tell him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. He grins widely and takes you to the clinic.'
- sub += 4
- bfa += 5
- act 'Go to the clinic':
- gt 'boy_likes', 'changeLips'
- end
- exit
- end
- end
- end
-
- elseif tits < titMin or tits > titMax and titsDay <= dayA:
- '<<$boydescA>> tells you your breasts are just not right.'
- if tits < titMin:
- 'He tells you that you should get breast implants.'
- else
- 'He tells you that you should have a breast reduction.'
- end
- if sub < 20 and bfa < 60 and compliance < 6:
- act '"My breasts are fine the way they are!", you say slightly offended.':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change your breast size, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Go with him':
- gt 'boy_likes', 'changeTits'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much to get work done on my breasts.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to get work done on your breasts. He tells you he has something to do and heads off.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him that you decide what size breasts you look good with.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You squeek, "But I like the size of my breasts..."':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change the size, but you successfully tell him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. He grins widely and takes you to the clinic.'
- sub += 4
- bfa += 5
- act 'Go to the clinic':
- gt 'boy_likes', 'changeTits'
- end
- exit
- end
- end
- end
- else
- '"Erm... Nothing..."'
- act '"Well then..."':
- *clr
- xgt 'meet', 'actions'
- exit
- end
- end
- elseif randchan = 1:
- '<<$boydescA>> suggests that you go to the movies.'
- act 'Sorry, but I need to go.':
- cla
- bfa -= (harakBoyA + 1)
-
- end
- act 'Go with him':gt 'kinoM', 'start'
- exit
- elseif randchan = 2:
- '<<$boydescA>> suggest that you take a walk in the park'
- act 'Sorry, but I need to go.':
- cla
- bfa -= (harakBoyA + 1)
-
- end
- act 'Go with him':gt 'parkM', 'start'
- exit
- elseif randchan = 3:
- '<<$boydescA>> suggests that you go to a cafe.'
- act 'Sorry, but I need to go.':
- cla
- bfa -= (harakBoyA + 1)
-
- end
- act 'Go with him':gt 'kafeM', 'start'
- exit
- end
-
- elseif financeA = 2:
- !!Some things you can change.
- !!financeA = 2 - hair, makeup, tattoo, piercings, lips, tits
- !! 0 - change player, 1 - go to a cafe, 2 - go to a restaurant, 3 - to the movies.
- randchan = rand(0, 3)
- !! 1 = does like, 0 = not like
- if (pierWearCount >= pierPrefMin and pierWearCount <= pierPrefMax) or pierPref = 0:
- pierCheck = 1
- else
- pierCheck = 0
- end
- if (tattCount >= tattPrefMin and tattCount <= tattPrefMax) or tattPref = 0:
- tattCheck = 1
- else
- tattCheck = 0
- end
- if (makeupSetting = makePref) or makePref = 0:
- makeupCheck = 1
- else
- makeupCheck = 0
- end
- if pcs_haircol = hairPref:
- hairCheck = 1
- else
- hairCheck = 0
- end
- if tits >= titMin and tits <= titMax:
- titCheck = 1
- else
- titCheck = 0
- end
-
- if pcs_lips >= lipsPrefMin and tits <= lipsPrefMax:
- lipsCheck = 1
- else
- lipsCheck = 0
- end
-
- if salocatnow <= figurePrefMax:
- figureCheck = 1
- else
- figureCheck = 0
- end
-
-
- if randchan = 0 and (pierCheck + tattCheck + makeupCheck + hairCheck + titCheck + lipsCheck + figureCheck) = 7:
- 'Takes one look at your body and loves every part of it.'
- randchan = rand(1, 3)
- end
-
- randchan = 0
-
- if randchan = 0:
- cls
- !!Some things you can change.
- !!financeA = 2 - hair, makeup, tattoo, piercings, lips, tits, figure.
- if harakBoyA = 0:
- '"Actually can I talk to you about something?", <<$boydescA>> asks you.'
- elseif harakBoyA = 1:
- '"Actually can I talk to you about something?", <<$boydescA>> asks you.'
- elseif harakBoyA = 2:
- '"Actually can I talk to you about something?", <<$boydescA>> asks you.'
- end
- '"Whats up <<$boydescA>>?"'
- '"There is just a trait about you that bugs me, can we change that?"'
- if compliance > 0:
- 'You know you have changed for him before, and you want to avoid to changing into something you are not.'
- end
-
- gs 'boy_likes', 'compliance'
-
- '"And what did you want to change about me?"'
- !!This is to make a last check on how many piercings they are WEARING
- gs 'boy_likes', 'checkPier'
-
-
-
- if pcs_haircol ! hairPref:
- '<<$boydescA>> looks at your hair and says, "can we get your hair dyed?"'
- !!act 'I''d rather not...':
- if sub < 20 and bfa < 60 and compliance < 6:
- act 'I like my hair just the way it is.':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change it, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Go with him':
- gt 'boy_likes', 'changeHair'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much...':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to do that. He tells you he has something to do and heads off'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him you are who you are.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You mumble "I would rather not..."':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change it, but you successfully inform him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. He smiles happily and takes you to the salon.'
- sub += 2
- bfa += 5
- act 'Go to Salon':
- gt 'boy_likes', 'changeHair'
- end
- exit
- end
- end
- end
- elseif makeupSetting ! makePref and makePref ! 0:
- '<<$boydescA>> thinks about it and says "Can you wear <<$makePref>> from now on?"'
- !!act 'I''d rather not...':
- if sub < 20 and bfa < 60 and compliance < 6:
- act 'I like my makeup just the way it is.':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change it, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Agree to change the makeup you usually wear.':
- gt 'boy_likes', 'changeMake'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much...':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to do that. You can tell that he is bummed when he tells you he has something to do and heads off.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him you like the makeup you usually wear.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You mumble "What''s wrong with my makeup...?"':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change it, but you successfully inform him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. You tell him from now on you will wear <<$makePref>>.'
- sub += 2
- bfa += 5
- act 'Continue':
- gt 'boy_likes', 'changeMake'
- end
- exit
- end
- end
- end
- elseif pierWearCount < pierPrefMin or pierWearCount > pierPrefMax and pierPref ! 0 and pierDay <= dayA:
- '<<$boydescA>> talks about how you just don''t have the right amount of piercings.'
- if pierWearCount < pierPrefMin:
- 'He tells you that you should have more piercings.'
- else
- 'He tells you that you should have less piercings.'
- end
- if sub < 20 and bfa < 60 and compliance < 6:
- act 'I am not going to change my piercings!':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change it, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Agree to change the amount of piercings you have.':
- gt 'boy_likes', 'changePier'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much...':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to do that. He tells you he has something to do and heads off'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him you are who you are.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You mumble "I would rather not..."':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change the amount of piercings you have, but you successfully inform him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. He smiles happily and then gets down to how to get the right amount of piercings.'
- sub += 2
- bfa += 5
- act 'Continue':
- gt 'boy_likes', 'changePier'
- end
- exit
- end
- end
- end
- elseif tattCount < tattPrefMin or tattCount > tattPrefMax and tattPref ! 0 and tattDay <= dayA:
- '<<$boydescA>> talks about how you just don''t have the right amount of tattoos.'
- if tattCount < tattPrefMin:
- 'He tells you that you should have more tattoos.'
- else
- 'He tells you that you should have less tattoos.'
- end
- if sub < 20 and bfa < 60 and compliance < 6:
- act 'I am not going to change my tattoos!':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change it, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Agree to change the amount of tattoos you have.':
- gt 'boy_likes', 'changeTatt'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much...':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to do that. He tells you he has something to do and heads off'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him you are who you are.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You mumble "I would rather not..."':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change the amount of tattoos you have, but you successfully inform him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. He smiles happily then starts to take you to the tattoo parlor to get the right amount of tattoos.'
- sub += 2
- bfa += 5
- act 'Go to tattoo parlor':
- gt 'boy_likes', 'changeTatt'
- end
- exit
- end
- end
- end
-
- elseif pcs_lip < lipsPrefMin or pcs_lip > lipsPrefMax and lipsDay <= dayA:
- '<<$boydescA>> tells you your lips are just not the right size.'
- if pcs_lip < lipsPrefMin:
- 'He tells you that you should get lip injections.'
- else
- 'He tells you that you should have lip reduction.'
- end
- if sub < 20 and bfa < 60 and compliance < 6:
- act '"My lips are fine the way they are!", you say slightly offended.':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change your lip size, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Go with him':
- gt 'boy_likes', 'changeLips'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much to get work done on my lips.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to get work done on your lips. He tells you he has something to do and heads off.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him that you decide what size lips you look good with.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You squeek, "But I like the size of my lips..."':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change the size, but you successfully tell him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. He grins widely and takes you to the clinic.'
- sub += 4
- bfa += 5
- act 'Go to the clinic':
- gt 'boy_likes', 'changeLips'
- end
- exit
- end
- end
- end
-
- elseif tits < titMin or tits > titMax and titsDay <= dayA:
- '<<$boydescA>> tells you your breasts are just not right.'
- if tits < titMin:
- 'He tells you that you should get breast implants.'
- else
- 'He tells you that you should have a breast reduction.'
- end
- if sub < 20 and bfa < 60 and compliance < 6:
- act '"My breasts are fine the way they are!", you say slightly offended.':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change your breast size, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Go with him':
- gt 'boy_likes', 'changeTits'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much to get work done on my breasts.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to get work done on your breasts. He tells you he has something to do and heads off.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him that you decide what size breasts you look good with.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You squeek, "But I like the size of my breasts..."':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change the size, but you successfully tell him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. He grins widely and takes you to the clinic.'
- sub += 4
- bfa += 5
- act 'Go to the clinic':
- gt 'boy_likes', 'changeTits'
- end
- exit
- end
- end
- end
- elseif salocatnow > figurePrefMax and figureDay <= dayA:
- '<<$boydescA>> tells you your body is just too thick.'
- 'He offers to pay for you to get lyposuction.'
- if sub < 20 and bfa < 60 and compliance < 6:
- act '"My body weight is fine the way it is!", you say slightly offended.':
- cla
- cls
- bfa -= 3
- '<<$boydescA>> tries to push you to change your body weight, but you are not that submissive to be pressured by him, nor do your emotions make you make a choice you may regret.'
-
- dynamic $go_home
-
- end
- end
- act 'Go with him':
- gt 'boy_likes', 'changeFigure'
- end
- exit
- elseif bfa <= 60 and compliance < 6:
- act 'You think to yourself, its not like I like him THAT much to get lyposuction.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> he realizes you adoration for him isn''t enough to pressure you to get work done on your weight. He tells you he has something to do and heads off.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub <= 20 and compliance < 6:
- act 'Your personality is not something that can be dominated that easily, and you brush him off, telling him that you decide what size your body looks good at.':
- cla
- pcs_dom += 1
- bfa -=3
- '<<$boydescA>> realizes you will not give in this situation, and walks away mumbling to himself.'
- dynamic $go_home
-
- end
- end
- exit
- elseif sub > 20 or compliance >= 6:
- act 'You squeek, "But I like being this weight..."':
- cla
- bfa -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*compliance
- if wantRand > sub:
- cla
- '<<$boydescA>> tries to push you to change your weight, but you successfully tell him that you do not want to. This makes him rather upset.'
- ''
- dynamic $go_home
-
- end
- exit
- elseif wantRand <= sub:
- cla
- '<<$boydescA>> keeps up the pressure, and because of your demeaner, and you give in. He grins widely and takes you to the clinic.'
- sub += 4
- bfa += 5
- act 'Go to the clinic':
- gt 'boy_likes', 'changeFigure'
- end
- exit
- end
- end
- end
- else
- '"Erm... Nothing..."'
- act '"Well then..."':
- *clr
- xgt 'meet', 'actions'
- exit
- end
- end
- elseif randchan = 1:
- '<<$boydescA>> suggests that you go to a cafe.'
- act 'Sorry, but I need to leave':
- cla
- bfa -= (harakBoyA + 1)
-
- end
- act 'Go with him':gt 'kafeM', 'start'
- exit
- elseif randchan = 2:
- '<<$boydescA>> suggests that you go to a restaurant.'
- act 'Sorry, but I need to leave':
- cla
- bfa -= (harakBoyA + 1)
-
- end
- act 'Go with him':gt 'restoranM', 'start'
- exit
- elseif randchan = 3:
- '<<$boydescA>> suggests that you go to the movies.'
- act 'Sorry, but I need to go.':
- cla
- bfa -= (harakBoyA + 1)
-
- end
- act 'Go with him':gt 'kinoM', 'start'
- exit
- end
- end
- end
- act 'I want to do something today.':
- cla
-
-
- randchan = rand(0, 1)
- if randchan = 0:
- pcs_dom += 1
- end
- '"What do you want to do?", he asks'
- act '"Lets go just relax in the stairwell and drink some beer."':
- act 'Go with him':gt 'podezdM', 'start'
- end
- act '"Lets take a walk in the park"':
- act 'Go with him':gt 'parkM', 'start'
- end
- act '"Lets go see a movie"':
- act 'Go with him':gt 'kinoM', 'start'
- end
- act '"Lets go to the cafe."':
- act 'Go with him':gt 'kafeM', 'start'
- end
-
- act 'Never mind...':
- gt 'meet', 'actions'
- exit
- end
- end
- act 'I think we should break up...':
- cla
- 'He looks hurt, but you insist it is for the best. You both say goodbye and part ways.'
- bfA = 0
- act 'Continue':
-
- exit
- end
-
- end
- end
- --- meet ---------------------------------
|