123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842 |
- # lover_meet
- if $ARGS[0] =
- menu_off = 1
- $location_type =
- minut += 15
- loverdays[lover_number] += 1
- svidanie[lover_number] = 0
- giftNum = giftNum[lover_number]
- gs
- gs
- gs
- gs
- !!This keeps track in the change action what it plans to change
- $changeFind =
- !!How many days until the lover starts to comment.
- clotDay = 3
- bodyDay = 7
- !!How many days until they want you to change.
- pierDay = 7
- tattDay = 7
- lipsDay = 9
- titsDay = 12
- figureDay = 15
- !! This is the start of the usual talk
- !!character 0 - soft, 1 -norm 2 - aggressor
-
- if haraklover[lover_number] = 0:
- if loverrelation[lover_number] > 70:
- randchan = rand(0, 2)
- if randchan = 0:
- $greet =
- elseif randchan = 1:
- $greet =
- elseif randchan = 2:
- $greet =
- end
- elseif loverrelation[lover_number] > 20:
- randchan = rand(0, 1)
- if randchan = 0:
- $greet =
- elseif randchan = 1:
- $greet =
- end
- else
- $greet =
- end
- end
- if haraklover[lover_number] = 1:
- if loverrelation[lover_number] > 70:
- randchan = rand(0, 2)
- if randchan = 0:
- $greet =
- elseif randchan = 1:
- $greet =
- elseif randchan = 2:
- $greet =
- end
- elseif loverrelation[lover_number] > 20:
- randchan = rand(0, 1)
- if randchan = 0:
- $greet =
- elseif randchan = 1:
- $greet =
- end
- else
- $greet =
- end
- end
- if haraklover[lover_number] = 2:
- if loverrelation[lover_number] > 70:
- randchan = rand(0, 2)
- if randchan = 0:
- $greet =
- elseif randchan = 1:
- $greet =
- elseif randchan = 2:
- $greet =
- end
- elseif loverrelation[lover_number] > 20:
- randchan = rand(0, 1)
- if randchan = 0:
- $greet =
- elseif randchan = 1:
- $greet =
- end
- else
- $greet =
- end
- end
- gs
- !! QUEST VARIABLES!!! WOOOT ALMOST TIME!
- didPushAway = 0
- !!How beautiful you are
- if pcs_skin < 20:
- loverrelation[lover_number] -= 2 & $meetskin =
- elseif pcs_skin < 40:
- loverrelation[lover_number] -= 1 & $meetskin =
- elseif pcs_skin < 60:
- $meetskin =
- elseif pcs_skin < 80:
- loverrelation[lover_number] += 1 & $meetskin =
- else
- loverrelation[lover_number] += 2 & $meetskin =
- end
- !! Your lip size
- if pcs_lip = 0:$meetlip =
- if pcs_lip = 1:$meetlip =
- if pcs_lip = 2:$meetlip =
- if pcs_lip = 3:$meetlip =
- if pcs_lip = 4:$meetlip =
- if loverfinance[lover_number] = 0:$clom =
- if loverfinance[lover_number] = 1:$clom =
- if loverfinance[lover_number] = 2 and loverGender[lover_number] = 0:$clom =
- if loverfinance[lover_number] = 2 and loverGender[lover_number] = 1:$clom =
- !!Greeting start
-
- gs
- gs
- if haraklover[lover_number] = 0:
- if haraklover[lover_number] = 1:
- if haraklover[lover_number] = 2:
- !!This is to reset the like part later
- likeCount = 0
- like1 = 99
- like2 = 99
- like3 = 99
- !! This is the greeting kissy part
- if haraklover[lover_number] >= 0:
- if loverrelation[lover_number] > -20:
- loverrelation[lover_number] += 0
-
- act
- *clr & cla
-
-
- gs
- pcs_dom += 1
- pcs_mood += 10
- gs
- if venera > 4:
- gs
-
- pcs_mood -= 20
- dynamic $go_home
- exit
- elseif venera < 4 and cumloc[11] = 0 and (cumloc[6] = 0 and cumloc[7] = 0):
- if haraklover[lover_number] = 0:
- loverrelation[lover_number] += 2
-
- elseif haraklover[lover_number] = 1:
- loverrelation[lover_number] += 1
-
- elseif haraklover[lover_number] = 2:
-
- loverrelation[lover_number] += 2
- else
-
- end
- elseif (cumloc[11] = 1 or cumloc[6] = 1 or cumloc[7] = 1) and pervConstant = 1 and loverGender[lover_number] = 0:
- if cumloc[11] = 1:
- if haraklover[lover_number] = 0:
- loverrelation[lover_number] += 2
- pcs_horny += 5
-
- elseif haraklover[lover_number] = 1:
- loverrelation[lover_number] += 2
- pcs_horny += 5
-
- elseif haraklover[lover_number] = 2:
-
- end
- elseif (cumloc[6] = 1 or cumloc[7] = 1):
- if haraklover[lover_number] = 0:
- loverrelation[lover_number] += 2
- pcs_horny += 5
-
- elseif haraklover[lover_number] = 1:
- loverrelation[lover_number] += 2
- pcs_horny += 5
-
- elseif haraklover[lover_number] = 2:
- loverrelation[lover_number] += 3
- pcs_horny += 5
-
- end
- end
- elseif (cumloc[11] = 1 or cumloc[6] = 1 or cumloc[7] = 1) and (pervConstant ! 1 or loverGender[lover_number] = 0):
- if cumloc[11] = 1:
- gs
-
- pcs_mood -= 20
- dynamic $go_home
- exit
- elseif (cumloc[6] = 1 or cumloc[7] = 1):
- loverrelation[lover_number] += 2
-
- pcs_mood -= 20
- dynamic $go_home
- exit
- end
- end
- act
- end
- act
- *clr & cla
-
-
- pcs_mood += 10
- if cumloc[11] = 0 and (cumloc[6] = 0 and cumloc[7] = 0):
- if haraklover[lover_number] = 0:
- loverrelation[lover_number] += 2
-
- gs
- gs
- elseif haraklover[lover_number] = 1:
- loverrelation[lover_number] += 2
-
- gs
- gs
- elseif haraklover[lover_number] = 2:
- loverrelation[lover_number] += 2
-
- gs
- gs
- 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 haraklover[lover_number] = 0:
- loverrelation[lover_number] += 2
- pcs_horny += 5
-
- elseif haraklover[lover_number] = 1:
- loverrelation[lover_number] += 2
- pcs_horny += 5
-
- elseif haraklover[lover_number] = 2:
- loverrelation[lover_number] += 3
- pcs_horny += 5
-
- end
- elseif (cumloc[6] = 1 or cumloc[7] = 1):
- if haraklover[lover_number] = 0:
- loverrelation[lover_number] += 2
- pcs_horny += 5
-
- elseif haraklover[lover_number] = 1:
- loverrelation[lover_number] += 2
- pcs_horny += 5
-
- elseif haraklover[lover_number] = 2:
- loverrelation[lover_number] += 3
- pcs_horny += 5
-
- end
- elseif cumloc[12] = 1:
- if haraklover[lover_number] = 0:
- loverrelation[lover_number] += 2
- pcs_horny += 5
-
- elseif haraklover[lover_number] = 1:
- loverrelation[lover_number] += 2
- pcs_horny += 5
-
- elseif haraklover[lover_number] = 2:
- loverrelation[lover_number] += 3
- pcs_horny += 5
-
- end
- end
- else
- if (cumloc[11] = 1 or cumloc[6] = 1 or cumloc[7] = 1) and pervConstant ! 1:
- if cumloc[11] = 1:
- gs
-
- pcs_mood -= 20
- dynamic $go_home
- exit
- elseif (cumloc[6] = 1 or cumloc[7] = 1):
- gs
-
- pcs_mood -= 20
- dynamic $go_home
- exit
- end
- end
- end
- act
- end
- act
- *clr & cla
-
-
- pcs_mood += 10
- if cumloc[11] = 0 and (cumloc[6] = 0 and cumloc[7] = 0):
- if haraklover[lover_number] = 0:
- loverrelation[lover_number] += 2
-
- gs
- gs
- elseif haraklover[lover_number] = 1:
- loverrelation[lover_number] += 1
-
- gs
- gs
- elseif haraklover[lover_number] = 2:
- loverrelation[lover_number] += 0
-
- gs
- gs
- 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 haraklover[lover_number] = 0:
- loverrelation[lover_number] += 2
- pcs_horny += 5
-
- elseif haraklover[lover_number] = 1:
- loverrelation[lover_number] += 2
- pcs_horny += 5
-
- elseif haraklover[lover_number] = 2:
- loverrelation[lover_number] += 3
- pcs_horny += 5
-
- end
- elseif (cumloc[6] = 1 or cumloc[7] = 1):
- if haraklover[lover_number] = 0:
- loverrelation[lover_number] += 1
- pcs_horny += 5
-
- elseif haraklover[lover_number] = 1:
- loverrelation[lover_number] += 1
- pcs_horny += 5
-
- elseif haraklover[lover_number] = 2:
- loverrelation[lover_number] += 1
- pcs_horny += 5
-
- end
- end
- elseif (cumloc[11] = 1 or cumloc[6] = 1 or cumloc[7] = 1) and pervConstant ! 1:
- if cumloc[11] = 1:
- gs
-
- pcs_mood -= 20
- dynamic $go_home
- exit
- elseif (cumloc[6] = 1 or cumloc[7] = 1):
- gs
-
- pcs_mood -= 20
- dynamic $go_home
- exit
- elseif (cumloc[6] = 1 or cumloc[7] = 1):
- gs
-
- pcs_mood -= 20
- dynamic $go_home
- exit
- end
- end
- act
- end
- act
- *clr & cla
- didPushAway = 1
-
-
- if haraklover[lover_number] = 0:
- loverrelation[lover_number] -= 7
-
- elseif haraklover[lover_number] = 1:
- loverrelation[lover_number] -= 5
-
- elseif haraklover[lover_number] = 2:
- loverrelation[lover_number] -= 10
-
- end
- act
- end
- end
- end
- end
- if $ARGS[0] =
- cla
- if loverdays[lover_number] >= clotDay:
- gs
- end
- if loverdays[lover_number] >= bodyDay:
- gs
- end
- xgt
- end
- if $ARGS[0] =
- act
- *clr & cla
-
-
- gs
- act
- end
- act
- *clr & cla
- if rand(0,1) = 0: sub += 1
-
-
- if haraklover[lover_number] = 0:
- loverrelation[lover_number] += 0
-
- elseif haraklover[lover_number] = 1:
- loverrelation[lover_number] += 0
-
- elseif haraklover[lover_number] = 2:
- loverrelation[lover_number] += 1
-
- end
- !!This is the choice maker!
- if loverfinance[lover_number] = 0:
- !! 0 - change player, 1 - beer in stairwell, 2 - walk in park,
- randchan = rand(0, 2)
- !! 1 = does like, 0 = not like
- if (pierWearCount >= pierPrefTmpMin and pierWearCount <= pierPrefTmpMax) or pierPrefTmp = 0:
- pierCheck = 1
- else
- pierCheck = 0
- end
- if (tattCount >= tattPrefTmpMin and tattCount <= tattPrefTmpMax) or tattPrefTmp = 0:
- tattCheck = 1
- else
- tattCheck = 0
- end
- if (makeupSetting = makePrefTmp) or makePrefTmp = 0:
- makeupCheck = 1
- else
- makeupCheck = 0
- end
- if pcs_haircol = hairPref:
- hairCheck = 1
- else
- hairCheck = 0
- end
- if (pierWearCount >= pierPrefTmpMin and pierWearCount <= pierPrefTmpMax) or pierPrefTmp = 0:
- pierCheck = 1
- else
- pierCheck = 0
- end
- if (tattCount >= tattPrefTmpMin and tattCount <= tattPrefTmpMax) or tattPrefTmp = 0:
- tattCheck = 1
- else
- tattCheck = 0
- end
- if randchan = 0 and (pierCheck + tattCheck + makeupCheck + hairCheck) = 4: randchan = rand(1, 2)
- if randchan = 0:
- *clr & cla
- !!Some things you can change.
- !!loverfinance[lover_number] = 0 - hair, makeup, tattoo, piercings.
-
- if haraklover[lover_number] = 0:
-
- elseif haraklover[lover_number] = 1:
-
- elseif haraklover[lover_number] = 2:
-
- end
-
-
- if loverscompliance[lover_number] > 0:
- gs
-
- !!This is to make a last check on how many piercings they are WEARING
- gs
- if pcs_haircol ! hairPref:
- *clr & cla
-
-
- !!act
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -=3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -=3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 2
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- elseif makeupSetting ! makePrefTmp and makePrefTmp ! 0:
-
-
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -=3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -=3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 2
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- elseif pierWearCount < pierPrefTmpMin or pierWearCount > pierPrefTmpMax and pierPrefTmp ! 0 and pierDay <= loverdays[lover_number]:
-
-
- if pierWearCount < pierPrefTmpMin:
-
- else
-
- end
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -=3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -=3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 2
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- elseif tattCount < tattPrefTmpMin or tattCount > tattPrefTmpMax and tattPrefTmp ! 0 and tattDay <= loverdays[lover_number]:
-
-
- if tattCount < tattPrefTmpMin:
-
- else
-
- end
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -=3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -=3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 2
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- else
- *clr & cla
-
-
- act
- end
- elseif randchan = 1 and loverGender[lover_number] = 0:
- *clr & cla
-
-
- act
- cla
- loverrelation[lover_number] -= (haraklover[lover_number] + 1)
- dynamic $go_home
- end
- act
- elseif randchan = 2 or loverGender[lover_number] = 1:
- *clr & cla
-
-
- act
- cla
- loverrelation[lover_number] -= (haraklover[lover_number] + 1)
- dynamic $go_home
- end
- act
- if loverGender[lover_number] = 0: gt
- if loverGender[lover_number] = 1: $telsob =
- end
- end
- elseif loverfinance[lover_number] = 1:
- *clr & cla
-
- !! 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 >= pierPrefTmpMin and pierWearCount <= pierPrefTmpMax) or pierPrefTmp = 0:
- pierCheck = 1
- else
- pierCheck = 0
- end
- if (tattCount >= tattPrefTmpMin and tattCount <= tattPrefTmpMax) or tattPrefTmp = 0:
- tattCheck = 1
- else
- tattCheck = 0
- end
- if (makeupSetting = makePrefTmp) or makePrefTmp = 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 >= lipsPrefTmpMin and tits <= lipsPrefTmpMax:
- lipsCheck = 1
- else
- lipsCheck = 0
- end
- if randchan = 0 and (pierCheck + tattCheck + makeupCheck + hairCheck + titCheck + lipsCheck) = 6:
-
- randchan = rand(1, 3)
- end
- if randchan = 0:
- *clr & cla
- !!Some things you can change.
- !!loverfinance[lover_number] = 1 - hair, makeup, tattoo, piercings, lips, tits.
-
- if haraklover[lover_number] = 0:
-
- elseif haraklover[lover_number] = 1:
-
- elseif haraklover[lover_number] = 2:
-
- end
-
-
- if loverscompliance[lover_number] > 0:
- gs
-
- !!This is to make a last check on how many piercings they are WEARING
- gs
- if pcs_haircol ! hairPref:
-
- !!act
- if sub < 20 and loverrelation[lover_number] < 60 and compliance < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -=3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 2
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- elseif makeupSetting ! makePrefTmp and makePrefTmp ! 0:
- *clr & cla
-
-
- !!act
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 2
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- elseif pierWearCount < pierPrefTmpMin or pierWearCount > pierPrefTmpMax and pierPrefTmp ! 0 and pierDay <= loverdays[lover_number]:
- *clr & cla
-
-
- if pierWearCount < pierPrefTmpMin:
-
- else
-
- end
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 2
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- elseif tattCount < tattPrefTmpMin or tattCount > tattPrefTmpMax and tattPrefTmp ! 0 and tattDay <= loverdays[lover_number]:
- *clr & cla
-
-
- if tattCount < tattPrefTmpMin:
-
- else
-
- end
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 2
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- elseif pcs_lip < lipsPrefTmpMin or pcs_lip > lipsPrefTmpMax and lipsDay <= loverdays[lover_number]:
- *clr & cla
-
-
- if pcs_lip < lipsPrefTmpMin:
-
- else
-
- end
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 4
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- elseif tits < titMin or tits > titMax and titsDay <= loverdays[lover_number]:
- *clr & cla
-
-
- if tits < titMin:
-
- else
-
- end
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 4
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- else
- *clr & cla
-
-
- act
- end
- elseif randchan = 1:
- *clr & cla
-
-
- act
- cla
- loverrelation[lover_number] -= (haraklover[lover_number] + 1)
- dynamic $go_home
- end
- act
- if loverGender[lover_number] = 0: gt
- if loverGender[lover_number] = 1: $telsob =
- end
- elseif randchan = 2:
- *clr & cla
-
-
- act
- cla
- loverrelation[lover_number] -= (haraklover[lover_number] + 1)
- dynamic $go_home
- end
- act
- if loverGender[lover_number] = 0: gt
- if loverGender[lover_number] = 1: $telsob =
- end
- elseif randchan = 3:
- *clr & cla
-
-
- act
- cla
- loverrelation[lover_number] -= (haraklover[lover_number] + 1)
- dynamic $go_home
- end
- act
- if loverGender[lover_number] = 0: gt
- if loverGender[lover_number] = 1: $telsob =
- end
- end
- elseif loverfinance[lover_number] = 2:
- *clr & cla
-
- !!Some things you can change.
- !!loverfinance[lover_number] = 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 >= pierPrefTmpMin and pierWearCount <= pierPrefTmpMax) or pierPrefTmp = 0:
- pierCheck = 1
- else
- pierCheck = 0
- end
- if (tattCount >= tattPrefTmpMin and tattCount <= tattPrefTmpMax) or tattPrefTmp = 0:
- tattCheck = 1
- else
- tattCheck = 0
- end
- if (makeupSetting = makePrefTmp) or makePrefTmp = 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 >= lipsPrefTmpMin and tits <= lipsPrefTmpMax:
- 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:
-
- randchan = rand(1, 3)
- end
- if randchan = 0:
- *clr & cla
- !!Some things you can change.
- !!loverfinance[lover_number] = 2 - hair, makeup, tattoo, piercings, lips, tits, figure.
-
- if haraklover[lover_number] = 0:
-
- elseif haraklover[lover_number] = 1:
-
- elseif haraklover[lover_number] = 2:
-
- end
-
-
- if loverscompliance[lover_number] > 0:
- gs
-
- !!This is to make a last check on how many piercings they are WEARING
- gs
- if pcs_haircol ! hairPref:
-
- !!act
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 2
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- elseif makeupSetting ! makePrefTmp and makePrefTmp ! 0:
-
- !!act
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 2
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- elseif pierWearCount < pierPrefTmpMin or pierWearCount > pierPrefTmpMax and pierPrefTmp ! 0 and pierDay <= loverdays[lover_number]:
- *clr & cla
-
-
- if pierWearCount < pierPrefTmpMin:
-
- else
-
- end
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 2
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- elseif tattCount < tattPrefTmpMin or tattCount > tattPrefTmpMax and tattPrefTmp ! 0 and tattDay <= loverdays[lover_number]:
- *clr & cla
-
-
- if tattCount < tattPrefTmpMin:
-
- else
-
- end
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 2
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- elseif pcs_lip < lipsPrefTmpMin or pcs_lip > lipsPrefTmpMax and lipsDay <= loverdays[lover_number]:
- *clr & cla
-
-
- if pcs_lip < lipsPrefTmpMin:
-
- else
-
- end
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 4
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- elseif tits < titMin or tits > titMax and titsDay <= loverdays[lover_number]:
- *clr & cla
-
-
- if tits < titMin:
-
- else
-
- end
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 4
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- elseif salocatnow > figurePrefMax and figureDay <= loverdays[lover_number]:
- *clr & cla
-
-
-
- if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- exit
- elseif sub <= 20 and loverscompliance[lover_number] < 6:
- act
- *clr & cla
- pcs_dom += 1
- loverrelation[lover_number] -= 3
-
-
- dynamic $go_home
- end
- act
- exit
- elseif sub > 20 or loverscompliance[lover_number] >= 6:
- act
- *clr & cla
- loverrelation[lover_number] -= 2
- wantRand = rand(0, 100)
- wantRand -= 4*loverscompliance[lover_number]
-
- if wantRand > sub:
-
- *nl
- dynamic $go_home
- elseif wantRand <= sub:
-
- sub += 4
- loverrelation[lover_number] += 5
- act
- end
- end
- act
- end
- else
- *clr & cla
-
-
- act
- end
- elseif randchan = 1:
- *clr & cla
-
-
- act
- cla
- loverrelation[lover_number] -= (haraklover[lover_number] + 1)
- dynamic $go_home
- end
- act
- if loverGender[lover_number] = 0: gt
- if loverGender[lover_number] = 1: $telsob =
- end
- exit
- elseif randchan = 2:
- *clr & cla
-
-
- act
- cla
- loverrelation[lover_number] -= (haraklover[lover_number] + 1)
- dynamic $go_home
- end
- act
- if loverGender[lover_number] = 0: gt
- if loverGender[lover_number] = 1: $telsob =
- end
- exit
- elseif randchan = 3:
- *clr & cla
-
-
- act
- cla
- loverrelation[lover_number] -= (haraklover[lover_number] + 1)
- dynamic $go_home
- end
- act
- if loverGender[lover_number] = 0: gt
- if loverGender[lover_number] = 1: $telsob =
- end
- exit
- end
- end
- end
- act
- *clr & cla
- if rand(0,1): pcs_dom += 1
-
-
- if loverGender[lover_number] = 0:
- act
- act
- act
- act
- elseif loverGender[lover_number] = 1:
- $telsob =
- if month > 5 and temper > 20 and sunWeather = 1:
- act
- end
- act
- act
- act
- act
- end
- act
- gt
- exit
- end
- end
- act
- *clr & cla
-
-
- gs
- act
- dynamic $go_home
- exit
- end
- end
- end
- --- lover_meet ---------------------------------
|