123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524 |
- :: intro_sg_select_custom
- <<set $here = 'intro_sg_select_custom'>>
- <<set $ARGS = $location_var[$here]>>
- <<if $location_var[$here][0] == 'start'>>
- <<actCLA 'Pick a social group'>>
- <<gt 'intro_sg_select_custom' 'modgrup'>>
- <</actCLA>>
- <<actCLA 'Set relationships'>>
- <<gt 'intro_sg_select_custom' 'modrel'>>
- <</actCLA>>
- <<actCLA 'Confirm these options'>>
- <<setinit $grupvalue['+grupTipe+'] = 600>>
- <<if $soc_grup == 'nerd'>>
- <<run $pc.traitSet('nerd_points',60)>>
- <<run $pc.traitSet('nerd_status',2)>>
- <<run $pc.traitSet('nerd_lernHome',5)>>
- <<elseif $soc_grup == 'gopnik'>>
- <<run $pc.traitSet('nerd_points',-20)>>
- <</if>>
- <<if $pc.pcs_inhib < 10>>
- <<set $pc.pcs_inhib = 10>>
- <</if>>
- <!-- !!This line should get sveta to wear school uniform because she has no other clothing with > 50-->
- <<if $pc.pcs_inhib > 50>>
- <<run $wardrobe.wear_clothes_legacy('clothes','gm_school',6)>>
- <</if>>
- <<if $wardrobe.purseEquipped == 1>>
- <!-- !!using current combination should prevent having more than 1 bag at the start of game.-->
- <<run State.setVar('$'+$currentpursetype + '_purses['+$currentpursenumber+']',1)>>
- <<gs 'obj_din' 'old'>>
- <</if>>
- <<set $class_list_institution to null>>
- <<set $class_list_name to null>>
- <!-- !!Setting the shcoll classes such that grades can be assigned-->
- <<run $q.school.func('createclass','math',3,2,'yes','yes',0,0)>>
- <<run $q.school.func('createclass','rus',3,2,'yes','yes',0,0)>>
- <<run $q.school.func('createclass','lit',2,2,'yes','yes',0,0)>>
- <<run $q.school.func('createclass','art',2,2,'yes','no',0,0)>>
- <<run $q.school.func('createclass','bio',2,2,'yes','yes',0,0)>>
- <<run $q.school.func('createclass','pe',3,1,'yes','no',0,0)>>
- <<run $q.school.func('createclass','eng',2,2,'yes','yes',0,0)>>
- <<run $q.school.func('createclass','geo',2,2,'yes','yes',0,0)>>
- <<run $q.school.func('createclass','sci',2,2,'yes','yes',0,0)>>
- <<run $q.school.func('createclass','shop',2,2,'yes','no',0,0)>>
- <<run $q.school.func('createclass','comp',3,2,'yes','yes',0,0)>>
- <<run $q.school.func('createclass','mus',2,2,'yes','no',0,0)>>
- <<run $q.school.func('createclass','his',2,2,'yes','yes',0,0)>>
- <!-- !!Set the greades to be average.-->
- <<run $q.school.func('grade_award','math',55)>>
- <<run $q.school.func('grade_award','rus',55)>>
- <<run $q.school.func('grade_award','lit',55)>>
- <<run $q.school.func('grade_award','art',55)>>
- <<run $q.school.func('grade_award','bio',55)>>
- <<run $q.school.func('grade_award','pe',55)>>
- <<run $q.school.func('grade_award','eng',55)>>
- <<run $q.school.func('grade_award','geo',55)>>
- <<run $q.school.func('grade_award','sci',55)>>
- <<run $q.school.func('grade_award','shop',55)>>
- <<run $q.school.func('grade_award','comp',55)>>
- <<run $q.school.func('grade_award','mus',55)>>
- <<run $q.school.func('grade_award','his',55)>>
- <<gt $location>>
- <</actCLA>>
- <</if>>
- <!-- !!This is used to set value, is used to avoid any values that go below 5.-->
- <<if $location_var[$here][0] == 'setval'>>
- <<set $nstat = 0>>
- <<set $nstat = input 'Enter value in multiples of 5. For example , 5 , 10 , 15 etc.'>>
- <<if getvar("$nstat") > 100>>
- <<msg 'Please enter a value less than or equal to 100'>>
- <<gs 'intro_sg_select_custom' 'setval'>>
- <<elseif getvar("$nstat") < 5>>
- <<msg 'Please enter a value greater than or equal to 5'>>
- <<gs 'intro_sg_select_custom' 'setval'>>
- <<elseif $nstat % 5 != 0>>
- <<msg 'Please enter a value in multiples of 5'>>
- <<gs 'intro_sg_select_custom' 'setval'>>
- <<else>>
- $exit
- <</if>>
- <</if>>
- <!-- !!This is used to set values, that can go below 5 and ranges from 100 to -100.-->
- <<if $location_var[$here][0] == 'setval2'>>
- <<set $nstat = 0>>
- <<set $nstat = input 'Enter value in multiples of 5. For example , 5 , 0 , - 5 etc.'>>
- <<if getvar("$nstat") > 100>>
- <<msg 'Please enter a value less than or equal to 100'>>
- <<gs 'intro_sg_select_custom' 'setval2'>>
- <<elseif getvar("$nstat") < -100>>
- <<msg 'Please enter a value greater than or equal to -100'>>
- <<gs 'intro_sg_select_custom' 'setval2'>>
- <<elseif $nstat % 5 != 0>>
- <<msg 'Please enter a value in multiples of 5'>>
- <<gs 'intro_sg_select_custom' 'setval2'>>
- <<else>>
- $exit
- <</if>>
- <</if>>
- <!-- !!This is used to set values, that can go to 0 and ranges from 0 to 100.-->
- <<if $location_var[$here][0] == 'setval3'>>
- <<set $nstat = 0>>
- <<set $nstat = input 'Enter value in multiples of 5. For example , 0 , 5 , 10 etc.'>>
- <<if getvar("$nstat") > 100>>
- <<msg 'Please enter a value less than or equal to 100'>>
- <<gs 'intro_sg_select_custom' 'setval3'>>
- <<elseif getvar("$nstat") < 0>>
- <<msg 'Please enter a value greater than or equal to 0'>>
- <<gs 'intro_sg_select_custom' 'setval3'>>
- <<elseif $nstat % 5 != 0>>
- <<msg 'Please enter a value in multiples of 5'>>
- <<gs 'intro_sg_select_custom' 'setval3'>>
- <<else>>
- $exit
- <</if>>
- <</if>>
- <<if $location_var[$here][0] == 'modgrup'>>
- <p>Your current social group is $soc_grup.</p>
- <<actCLA 'Nerd'>>
- <<set $grupvalue to null>>
- <<set $soc_grup = 'Nerd'>>
- <<run $q.school.func('groupRelSet','cool',200)>>
- <<run $q.school.func('groupRelSet','jocks',100)>>
- <<run $q.school.func('groupRelSet','nerds',800)>>
- <<run $q.school.func('groupRelSet','gopniks',100)>>
- <<run $q.school.func('groupRelSet','teachers',600)>>
- <<run $q.school.func('setGroupMembership','nerds')>>
- <<gt 'intro_sg_select_custom' 'modgrup'>>
- <</actCLA>>
- <<actCLA 'Jock'>>
- <<set $grupvalue to null>>
- <<set $soc_grup = 'Jock'>>
- <<run $q.school.func('groupRelSet','cool',400)>>
- <<run $q.school.func('groupRelSet','jocks',800)>>
- <<run $q.school.func('groupRelSet','nerds',100)>>
- <<run $q.school.func('groupRelSet','gopniks',200)>>
- <<run $q.school.func('groupRelSet','teachers',400)>>
- <<run $q.school.func('setGroupMembership','jocks')>>
- <<gt 'intro_sg_select_custom' 'modgrup'>>
- <</actCLA>>
- <<actCLA 'Popular'>>
- <<set $grupvalue to null>>
- <<set $soc_grup = 'Cool'>>
- <<run $q.school.func('groupRelSet','cool',800)>>
- <<run $q.school.func('groupRelSet','jocks',400)>>
- <<run $q.school.func('groupRelSet','nerds',200)>>
- <<run $q.school.func('groupRelSet','gopniks',100)>>
- <<run $q.school.func('groupRelSet','teachers',400)>>
- <<run $q.school.func('setGroupMembership','cool')>>
- <<gt 'intro_sg_select_custom' 'modgrup'>>
- <</actCLA>>
- <<actCLA 'Gopnik'>>
- <<set $grupvalue to null>>
- <<set $soc_grup = 'Gopnik'>>
- <<run $q.school.func('groupRelSet','cool',200)>>
- <<run $q.school.func('groupRelSet','jocks',300)>>
- <<run $q.school.func('groupRelSet','nerds',100)>>
- <<run $q.school.func('groupRelSet','gopniks',800)>>
- <<run $q.school.func('groupRelSet','teachers',100)>>
- <<run $q.school.func('setGroupMembership','gopniks')>>
- <<gt 'intro_sg_select_custom' 'modgrup'>>
- <</actCLA>>
- <<actCLA 'Outcast'>>
- <<set $grupvalue to null>>
- <<run $q.school.func('groupRelSet','cool',200)>>
- <<run $q.school.func('groupRelSet','jocks',200)>>
- <<run $q.school.func('groupRelSet','nerds',200)>>
- <<run $q.school.func('groupRelSet','gopniks',200)>>
- <<run $q.school.func('groupRelSet','teachers',200)>>
- <<set $soc_grup = 'Outcast'>>
- <<run $q.school.func('setGroupMembership','outcasts')>>
- <<gt 'intro_sg_select_custom' 'modgrup'>>
- <</actCLA>>
- <<actCLA 'Return'>>
- <<gt 'intro_customization' 'start'>>
- <</actCLA>>
- <</if>>
- <<if $location_var[$here][0] == 'none'>>
- <!-- !!Attributes Reset - I know most of these att&skl are not in need of reset, but I dont know how to use loops and I wanted this to clear all changes made by choosing social group and/or player choices.-->
- <<run $pc.skillSetLevel('strength',30)>>
- <<run $pc.skillSetLevel('agility',30)>>
- <<set $pc.vitality = 30>>
- <<run $pc.skillSetLevel('intelligence',30)>>
- <<run $pc.skillSetLevel('reaction',30)>>
- <<run $pc.skillSetLevel('spirit',30)>>
- <<run $pc.skillSetLevel('charisma',30)>>
- <<run $pc.skillSetLevel('perception',30)>>
- <<set $pcs_grades = 75>>
- <<set $pc.pcs_inhib = 10>>
- <<run $pc.skillSetLevel('highHeels',5)>>
- <!-- !!Mental Skills Reset-->
- <<run $pc.skillSetLevel('people',0)>>
- <<run $pc.skillSetLevel('persuasion',0)>>
- <<run $pc.skillSetLevel('observation',0)>>
- <!-- !!Sport Skills Reset-->
- <<run $pc.skillSetLevel('jabs',0)>>
- <<run $pc.skillSetLevel('punch',0)>>
- <<run $pc.skillSetLevel('kick',0)>>
- <<run $pc.skillSetLevel('defense',0)>>
- <<run $pc.skillSetLevel('run',0)>>
- <<run $pc.skillSetLevel('volleyball',0)>>
- <<run $pc.skillSetLevel('football',0)>>
- <<run $pc.skillSetLevel('wrestling',0)>>
- <<run $pc.skillSetLevel('shoot',0)>>
- <<run $pc.skillSetLevel('bushcraft',0)>>
- <<run $pc.skillSetLevel('chess',0)>>
- <<run $pc.skillSetLevel('iceskating',0)>>
- <<run $pc.skillSetLevel('gaming',0)>>
- <!-- !!Beauty Skills Reset-->
- <<run $pc.skillSetLevel('makeup',20)>>
- <<run $pc.skillSetLevel('dance',0)>>
- <<set $pc.skillLevel("dance")ero = 0>>
- <<set $pc.skillLevel("dance")pol = 0>>
- <<run $pc.skillSetLevel('cheerleading',0)>>
- <<run $pc.skillSetLevel('modelling',0)>>
- <!-- !!Artistic Skills Reset-->
- <<run $pc.skillSetLevel('singing',0)>>
- <<run $pc.skillSetLevel('playInstrument',0)>>
- <<run $pc.skillSetLevel('photo',0)>>
- <<run $pc.skillSetLevel('art',0)>>
- <!-- !!Job Skills Reset-->
- <<run $pc.skillSetLevel('computer',0)>>
- <<run $pc.skillSetLevel('hacking',0)>>
- <<run $pc.skillSetLevel('handyWork',0)>>
- <<run $pc.skillSetLevel('sewing',0)>>
- <<run $pc.skillSetLevel('serving',0)>>
- <<run $pc.skillSetLevel('medicine',0)>>
- <!-- !!social group Reset-->
- <<set $grupTipe = 0>>
- <<run $q.school.func('groupRelSet','cool',0)>>
- <<run $q.school.func('groupRelSet','jocks',0)>>
- <<run $q.school.func('groupRelSet','nerds',0)>>
- <<run $q.school.func('groupRelSet','gopniks',0)>>
- <<run $q.school.func('groupRelSet','teachers',0)>>
- <<gs 'npc_relationship' 'socialgroup_setting' 0 0 0 0 0 0>>
- <!-- !!npc relationship Reset-->
- <<run $npcs.set('A11','rel',60)>>
- <<run $npcs.set('A129','rel',30)>>
- <<run $npcs.set('A133','rel',30)>>
- <<run $npcs.set('A28','rel',50)>>
- <<run $npcs.set('A29','rel',50)>>
- <<run $npcs.set('A33','rel',70)>>
- <<run $npcs.set('A34','rel',50)>>
- <!-- !!items Reset-->
- <<set $finances.cash = 2000>>
- <<set $fakepassport = 0>>
- <<set $fantasybook = 0>>
- <<set $pc.glass = 0>>
- <<run $inventory.set('hairScrunchie',0)>>
- <<run $inventory.set('cosmetics',0)>>
- <<run $pc.decoWear('piercing','ears',0)>>
- <<set $PirsC1_owned = 0>>
- <<run $inventory.set('shampoo',0)>>
- <<set $siga = 0>>
- <<run $inventory.set('razor',0)>>
- <<set $swim_start = 0>>
- <<run $inventory.set('tampon',0)>>
- <!-- !!apprnc & sex stat reset-->
- <<set $pc.genbsize = 22>>
- <<set $pc.pcs_skin = 40>>
- <<set $pc.salo = 80>>
- <<set $pc.tan = 0>>
- <<set $pc.pcs_throat = 0>>
- <<set $pc.pcs_vag = 0>>
- <<run $pc.sexStatSet('bj','aware',0)>>
- <<run $pc.sexStatSet('hj','aware',0)>>
- <<run $pc.sexStatSet('vaginal','aware',0)>>
- <<set $soc_grup = 'outcast'>>
- <<run $q.school.func('setGroupMembership','outcasts')>>
- <</if>>
- <<if $location_var[$here][0] == 'modrel'>>
- <<actCLA 'Family'>>
- <<gt 'intro_sg_select_custom' 'modrel_fam'>>
- <</actCLA>>
- <<actCLA 'Popular Kids'>>
- <<gt 'intro_sg_select_custom' 'modrel_pop'>>
- <</actCLA>>
- <<actCLA 'Athletes'>>
- <<gt 'intro_sg_select_custom' 'modrel_ath'>>
- <</actCLA>>
- <<actCLA 'Nerds'>>
- <<gt 'intro_sg_select_custom' 'modrel_ner'>>
- <</actCLA>>
- <<actCLA 'Gopniks'>>
- <<gt 'intro_sg_select_custom' 'modrel_gop'>>
- <</actCLA>>
- <<actCLA 'Outcasts/Loners'>>
- <<gt 'intro_sg_select_custom' 'modrel_out'>>
- <</actCLA>>
- <<actCLA 'Teachers/Coaches'>>
- <<gt 'intro_sg_select_custom' 'modrel_tea'>>
- <</actCLA>>
- <<actCLA 'Others'>>
- <<gt 'intro_sg_select_custom' 'modrel_oth'>>
- <</actCLA>>
- <<actCLA 'Return'>>
- <<gt 'intro_customization' 'start'>>
- <</actCLA>>
- <</if>>
- <<if $location_var[$here][0] == 'modrel_fam'>>
- <<if $npcs.get('A28','rel') < 0>>
- <<run $npcs.set('A28','rel',0)>>
- <</if>>
- <<if $npcs.get('A29','rel') < 0>>
- <<run $npcs.set('A29','rel',0)>>
- <</if>>
- <<if $npcs.get('A33','rel') < 0>>
- <<run $npcs.set('A33','rel',0)>>
- <</if>>
- <<if $npcs.get('A34','rel') < 0>>
- <<run $npcs.set('A34','rel',0)>>
- <</if>>
- <<if $npcs.get('A28','rel') > 100>>
- <<run $npcs.set('A28','rel',100)>>
- <</if>>
- <<if $npcs.get('A29','rel') > 100>>
- <<run $npcs.set('A29','rel',100)>>
- <</if>>
- <<if $npcs.get('A33','rel') > 100>>
- <<run $npcs.set('A33','rel',100)>>
- <</if>>
- <<if $npcs.get('A34','rel') > 100>>
- <<run $npcs.set('A34','rel',100)>>
- <</if>>
- <center><b>Family relationship levels</b></center>
- <center><table border=0 cellspacing=0 cellpadding=25 bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>
- <!--<TR bgcolor=#ffffff><TD>Stepfather: <<npc_rel[''A28'']>></TD><TD><<link "zero">><<run $npcs.set('A28','rel',0)>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#ff9999><<link "minus 10">><<run $npcs.set('A28','rel') - = 10>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#ff9999><<link "minus 5">><<set <<=$npcs.get('A28','rel')>> - = 5>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#99ff99><<link "plus 5">><<set <<=$npcs.get('A28','rel')>> + = 5>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#99ff99><<link "plus 10">><<set <<=$npcs.get('A28','rel')>> + = 10>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD><<link "100">><<set <<=$npcs.get('A28','rel',100)>>>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD>
- <TR bgcolor=#ffffff><TD>Mother: <<npc_rel[''A29'']>></TD><TD><<link "zero">><<run $npcs.set('A29','rel',0)>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#ff9999><<link "minus 10">><<run $npcs.set('A29','rel') - = 10>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#ff9999><<link "minus 5">><<set <<=$npcs.get('A29','rel')>> - = 5>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#99ff99><<link "plus 5">><<set <<=$npcs.get('A29','rel')>> + = 5>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#99ff99><<link "plus 10">><<set <<=$npcs.get('A29','rel')>> + = 10>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD><<link "100">><<set <<=$npcs.get('A29','rel',100)>>>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD>
- <TR bgcolor=#ffffff><TD>Sister: <<npc_rel[''A33'']>></TD><TD><<link "zero">><<run $npcs.set('A33','rel',0)>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#ff9999><<link "minus 10">><<run $npcs.set('A33','rel') - = 10>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#ff9999><<link "minus 5">><<set <<=$npcs.get('A33','rel')>> - = 5>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#99ff99><<link "plus 5">><<set <<=$npcs.get('A33','rel')>> + = 5>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#99ff99><<link "plus 10">><<set <<=$npcs.get('A33','rel')>> + = 10>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD><<link "100">><<set <<=$npcs.get('A33','rel',100)>>>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD>
- <TR bgcolor=#ffffff><TD>Brother: <<npc_rel[''A34'']>></TD><TD><<link "zero">><<run $npcs.set('A34','rel',0)>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#ff9999><<link "minus 10">><<run $npcs.set('A34','rel') - = 10>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#ff9999><<link "minus 5">><<set <<=$npcs.get('A34','rel')>> - = 5>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#99ff99><<link "plus 5">><<set <<=$npcs.get('A34','rel')>> + = 5>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD bgcolor=#99ff99><<link "plus 10">><<set <<=$npcs.get('A34','rel')>> + = 10>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD><TD><<link "100">><<set <<=$npcs.get('A34','rel',100)>>>> <<gt 'intro_sg_select_custom' 'modrel_fam'>><</link>></TD>-->
- </table></center>
- <<actCLA 'Return'>>
- <<gt 'intro_sg_select_custom' 'modrel'>>
- <</actCLA>>
- <</if>>
- <<if $location_var[$here][0] == 'modrel_setup'>>
- <<if $npcs.get($$ARGS[1,'rel')] < 0>>
- <<setinit $npcs.get($$ARGS[1,'rel')] = 0>>
- <</if>>
- <<if $npcs.get($$ARGS[1,'rel')] > 100>>
- <<setinit $npcs.get($$ARGS[1,'rel')] = 100>>
- <</if>>
- <!-- FAILED TO CONVERT
- $table_display += '<TR bgcolor=<<$bcolor1>>><TD><<$npc_firstname[''<<$ARGS[1]>>'']>> <<$npc_lastname[''<<$ARGS[1]>>'']>>: <<npc_rel[''<<$ARGS[1]>>'']>></TD><TD><a href="exec:npc_rel[''<<$ARGS[1]>>''] = 0 & gt ''intro_sg_select_custom'', $locM_arg">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''<<$ARGS[1]>>''] -= 10 & gt ''intro_sg_select_custom'', $locM_arg">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''<<$ARGS[1]>>''] -= 5 & gt ''intro_sg_select_custom'', $locM_arg">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 5 & gt ''intro_sg_select_custom'', $locM_arg">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 10 & gt ''intro_sg_select_custom'', $locM_arg">plus 10</a></TD><TD><a href="exec:npc_rel[''<<$ARGS[1]>>''] = 100 & gt ''intro_sg_select_custom'', $locM_arg">100</a></TD>'
- -----
- <<set $table_display += ERROR: FAILED TO CONVERT LITERAL: """'<TR bgcolor=$bcolor1><TD>$npcs.get(''+$$ARGS[1,'firstname')+''] $npcs.get(''+$$ARGS[1,'lastname')+'']: <<npc_rel[''+$$ARGS[1]+'']>><""" / ERROR: FAILED TO CONVERT LITERAL: """TD><TD><a href="exec:npc_rel[''+$$ARGS[1]+''] = 0""">> <<set gt ''intro_sg_select_custom'' , ERROR: FAILED TO CONVERT LITERAL: """$locM_arg">zero<""" / ERROR: FAILED TO CONVERT LITERAL: """a><""" / ERROR: FAILED TO CONVERT LITERAL: """TD><TD bgcolor""" = ERROR: FAILED TO CONVERT LITERAL: """#ff9999><a href="exec:npc_rel[''+$$ARGS[1]+'']""" - ERROR: FAILED TO CONVERT LITERAL: """= 10""">> <<set gt ''intro_sg_select_custom'' , ERROR: FAILED TO CONVERT LITERAL: """$locM_arg">minus 10<""" / ERROR: FAILED TO CONVERT LITERAL: """a><""" / ERROR: FAILED TO CONVERT LITERAL: """TD><TD bgcolor""" = ERROR: FAILED TO CONVERT LITERAL: """#ff9999><a href="exec:npc_rel[''+$$ARGS[1]+'']""" - ERROR: FAILED TO CONVERT LITERAL: """= 5""">> <<set gt ''intro_sg_select_custom'' , ERROR: FAILED TO CONVERT LITERAL: """$locM_arg">minus 5<""" / ERROR: FAILED TO CONVERT LITERAL: """a><""" / ERROR: FAILED TO CONVERT LITERAL: """TD><TD bgcolor""" = ERROR: FAILED TO CONVERT LITERAL: """#99ff99><a href="exec:npc_rel[''+$$ARGS[1]+'']""" + ERROR: FAILED TO CONVERT LITERAL: """= 5""">> <<set gt ''intro_sg_select_custom'' , ERROR: FAILED TO CONVERT LITERAL: """$locM_arg">plus 5<""" / ERROR: FAILED TO CONVERT LITERAL: """a><""" / ERROR: FAILED TO CONVERT LITERAL: """TD><TD bgcolor""" = ERROR: FAILED TO CONVERT LITERAL: """#99ff99><a href="exec:npc_rel[''+$$ARGS[1]+'']""" + ERROR: FAILED TO CONVERT LITERAL: """= 10""">> <<set gt ''intro_sg_select_custom'' , ERROR: FAILED TO CONVERT LITERAL: """$locM_arg">plus 10<""" / ERROR: FAILED TO CONVERT LITERAL: """a><""" / ERROR: FAILED TO CONVERT LITERAL: """TD><TD><a href""" = ERROR: FAILED TO CONVERT LITERAL: """"exec:npc_rel[''+$$ARGS[1]+''] = 100""">> <<gt 'intro_sg_select_custom' ERROR: FAILED TO CONVERT LITERAL: """$locM_arg">100<""" / ERROR: FAILED TO CONVERT LITERAL: """a><""" / ERROR: FAILED TO CONVERT LITERAL: """TD>'""">>
- -->
- <<warn "CONVERSION ERROR 65cd7aaa91164be22df75d00017a64ed">>
- <</if>>
- <<if $location_var[$here][0] == 'modrel_pop'>>
- <<set $locM_arg = 'modrel_pop'>>
- <center><b>Popular kids relationship levels</b></center>
- <<set $table_display to null>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A1'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A4'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A14'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A15'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A17'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A22'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A146'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A147'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A148'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A25'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A139'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A140'>>
- <center><table border=0 cellspacing=0 cellpadding=25 bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>
- <<set $table_display += '<TR bgcolor=$bcolor1><TD>Set relationship level for all boys in this group</TD><TD><<link "set value">><<gs 'intro_sg_select_custom' 'setval2' gs 'intro_sg_select_custom' 'pol_grup_set' 0 1 $nstat gt 'intro_sg_select_custom' 'modrel_pop'>><</link>></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'>>
- <<set $table_display += '<TR bgcolor=$bcolor1><TD>Set relationship level for all girls in this group</TD><TD><<link "set value">><<gs 'intro_sg_select_custom' 'setval2' gs 'intro_sg_select_custom' 'pol_grup_set' 1 1 $nstat gt 'intro_sg_select_custom' 'modrel_pop'>><</link>></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'>>
- $table_display
- </table></center>
- <<actCLA 'Return'>>
- <<gt 'intro_sg_select_custom' 'modrel'>>
- <</actCLA>>
- <</if>>
- <<if $location_var[$here][0] == 'modrel_ath'>>
- <<set $locM_arg = 'modrel_ath'>>
- <center><b>Jocks relationship levels</b></center>
- <<set $table_display to null>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A3'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A5'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A8'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A13'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A18'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A19'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A23'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A149'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A150'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A141'>>
- <center><table border=0 cellspacing=0 cellpadding=25 bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>
- <<set $table_display += '<TR bgcolor=$bcolor1><TD>Set relationship level for all boys in this group</TD><TD><<link "set value">><<gs 'intro_sg_select_custom' 'setval2' gs 'intro_sg_select_custom' 'pol_grup_set' 0 2 $nstat gt 'intro_sg_select_custom' 'modrel_ath'>><</link>></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'>>
- <<set $table_display += '<TR bgcolor=$bcolor1><TD>Set relationship level for all girls in this group</TD><TD><<link "set value">><<gs 'intro_sg_select_custom' 'setval2' gs 'intro_sg_select_custom' 'pol_grup_set' 1 2 $nstat gt 'intro_sg_select_custom' 'modrel_ath'>><</link>></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'>>
- $table_display
- </table></center>
- <<actCLA 'Return'>>
- <<gt 'intro_sg_select_custom' 'modrel'>>
- <</actCLA>>
- <</if>>
- <<if $location_var[$here][0] == 'modrel_ner'>>
- <<set $locM_arg = 'modrel_ner'>>
- <center><b>Nerds relationship levels</b></center>
- <<set $table_display to null>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A2'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A6'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A12'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A16'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A151'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A152'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A153'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A142'>>
- <center><table border=0 cellspacing=0 cellpadding=25 bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>
- <<set $table_display += '<TR bgcolor=$bcolor1><TD>Set relationship level for all boys in this group</TD><TD><<link "set value">><<gs 'intro_sg_select_custom' 'setval2' gs 'intro_sg_select_custom' 'pol_grup_set' 0 3 $nstat gt 'intro_sg_select_custom' 'modrel_ner'>><</link>></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'>>
- <<set $table_display += '<TR bgcolor=$bcolor1><TD>Set relationship level for all girls in this group</TD><TD><<link "set value">><<gs 'intro_sg_select_custom' 'setval2' gs 'intro_sg_select_custom' 'pol_grup_set' 1 3 $nstat gt 'intro_sg_select_custom' 'modrel_ner'>><</link>></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'>>
- $table_display
- </table></center>
- <<actCLA 'Return'>>
- <<gt 'intro_sg_select_custom' 'modrel'>>
- <</actCLA>>
- <</if>>
- <<if $location_var[$here][0] == 'modrel_gop'>>
- <<set $locM_arg = 'modrel_gop'>>
- <center><b>Gopnik kids relationship levels</b></center>
- <<set $table_display to null>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A9'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A10'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A11'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A20'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A21'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A24'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A154'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A155'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A156'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A157'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A158'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A143'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A144'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A145'>>
- <center><table border=0 cellspacing=0 cellpadding=25 bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>
- <<set $table_display += '<TR bgcolor=$bcolor1><TD>Set relationship level for all boys in this group</TD><TD><<link "set value">><<gs 'intro_sg_select_custom' 'setval2' gs 'intro_sg_select_custom' 'pol_grup_set' 0 4 $nstat gt 'intro_sg_select_custom' 'modrel_gop'>><</link>></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'>>
- <<set $table_display += '<TR bgcolor=$bcolor1><TD>Set relationship level for all girls in this group</TD><TD><<link "set value">><<gs 'intro_sg_select_custom' 'setval2' gs 'intro_sg_select_custom' 'pol_grup_set' 1 4 $nstat gt 'intro_sg_select_custom' 'modrel_gop'>><</link>></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'>>
- $table_display
- </table></center>
- <<actCLA 'Return'>>
- <<gt 'intro_sg_select_custom' 'modrel'>>
- <</actCLA>>
- <</if>>
- <<if $location_var[$here][0] == 'modrel_out'>>
- <<set $locM_arg = 'modrel_out'>>
- <center><b>Outcast kids relationship levels</b></center>
- <<set $table_display to null>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A7'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A159'>>
- <center><table border=0 cellspacing=0 cellpadding=25 bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>
- <<set $table_display += '<TR bgcolor=$bcolor1><TD>Set relationship level for all boys in this group</TD><TD><<link "set value">><<gs 'intro_sg_select_custom' 'setval2' gs 'intro_sg_select_custom' 'pol_grup_set' 0 5 $nstat gt 'intro_sg_select_custom' 'modrel_out'>><</link>></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'>>
- <!-- !! $table_display += '<TR bgcolor=<<$bcolor1>>><TD>Set relationship level for all girls in this group</TD><TD><<link "set value">><<gs 'intro_sg_select_custom' 'setval2'>> <<gs 'intro_sg_select_custom' 'pol_grup_set' 1 5 $nstat>> <<gt 'intro_sg_select_custom' 'modrel_out'>><</link>></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'-->
- $table_display
- </table></center>
- <<actCLA 'Return'>>
- <<gt 'intro_sg_select_custom' 'modrel'>>
- <</actCLA>>
- <</if>>
- <<if $location_var[$here][0] == 'modrel_tea'>>
- <<set $locM_arg = 'modrel_tea'>>
- <center><b>Teacher relationship levels</b></center>
- <<set $table_display to null>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A26'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A128'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A129'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A130'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A131'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A132'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A133'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A134'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A135'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A136'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A137'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A138'>>
- <center><table border=0 cellspacing=0 cellpadding=25 bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>
- <<set $table_display += '<TR bgcolor=$bcolor1><TD>Set relationship level for all men in this group</TD><TD><<link "set value">><<gs 'intro_sg_select_custom' 'setval2' gs 'intro_sg_select_custom' 'pol_grup_set' 0 6 $nstat gt 'intro_sg_select_custom' 'modrel_tea'>><</link>></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'>>
- <<set $table_display += '<TR bgcolor=$bcolor1><TD>Set relationship level for all women in this group</TD><TD><<link "set value">><<gs 'intro_sg_select_custom' 'setval2' gs 'intro_sg_select_custom' 'pol_grup_set' 1 6 $nstat gt 'intro_sg_select_custom' 'modrel_tea'>><</link>></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'>>
- $table_display
- </table></center>
- <<actCLA 'Return'>>
- <<gt 'intro_sg_select_custom' 'modrel'>>
- <</actCLA>>
- <</if>>
- <<if $location_var[$here][0] == 'modrel_oth'>>
- <<set $locM_arg = 'modrel_oth'>>
- <center><b>Others relationship levels</b></center>
- <<set $table_display to null>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A69'>>
- <<gs 'intro_sg_select_custom' 'modrel_setup' 'A112'>>
- <center><table border=0 cellspacing=0 cellpadding=25 bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>
- $table_display
- </table></center>
- <!-- !!Volleyball Coach is here because it wasnt being controlled by grup6 the teachers/coaches.-->
- <<actCLA 'Return'>>
- <<gt 'intro_sg_select_custom' 'modrel'>>
- <</actCLA>>
- <</if>>
- <<if $location_var[$here][0] == 'pol_grup_set'>>
- <!-- !!ARGS[1] 0 is boys, 1 is girls. ARGS[2] 1nerd 2jock 3cool 4gopnik 5outcast 6teachers. ARGS[3] is changes to value-->
- <<set $r = 1>>
- <<warn 'JUMP MARKER ENCOUNTERED: :pol_grup_set_loop'>>
- <<if $npcs.get('A' + $r,'gender') == $ARGS[1] and $npcs.get('A' + $r,'grupTipe') == $ARGS[2]>>
- <<run $npcs.set('A' + $r,'rel',$ARGS[3])>>
- <</if>>
- <<set $r += 1>>
- <<if $r <= $aarraynumber>>
- <<warn 'JUMP COMMAND ENCOUNTERED: jump pol_grup_set_loop'>>
- <</if>>
- <</if>>
|