bestmod.qproj

@@ -13,6 +13,7 @@
             <Location name="mod_bestmod_margo"/>
             <Location name="mod_bestmod_petshop"/>
             <Location name="mod_bestmod_park_dog"/>
+            <Location name="mod_bestmod_lake_dog"/>
         </Folder>
         <Folder name="setup">
             <Location name="mod_bestmod_options"/>

locations/mod_bestmod_lake_dog.qsrc

@@ -0,0 +1,20 @@
+# mod_bestmod_lake_dog
+
+if $ARGS[0] = 'start':
+	*clr & cla
+	pcs_willpwr -= 5
+	pcs_mood -= 5
+	inhib_exp += rand(1,3)
+	'<center><img <<$set_imgh>> src="images/beast/dogcaine.jpg"></center>'
+	'As you lie down on your towel to catch some rays of sun and hopefully work on your tan a little, a stray dog appears out of nowhere. It keeps sniffing between your legs, which makes you feel very uncomfortable since you''re not wearing anything.'
+	if bm_beast['exp'] = 0: 'You spend most of the hour trying to chase the dog away, but it comes back every time you think you got rid of it. You don''t get much sunbathing done as a result.'
+	act 'Give up on sunbathing': gt'glake'
+	!!if bm_beast['exp'] > 5: act 'Spread your legs a little...': gt 'mod_bestmod_lake_dog', 'ld1' 
+end
+
+!!if $ARGS[0] = 'ld1':
+!!end
+
+!!Generate lake dog here
+
+--- mod_bestmod_lake_dog ---------------------------------