QSP HTML Vicindio [v1.99.40] [Solid Snekk]

Le_Flemard · May 22, 2023

Solid Snekk said:
2. Possible, but finding some art for things is monumental task. Finding appropriate art for the tentacle dungeon took almost all day, which is why no horsecock.

try gelbooru.com and other image database likes it.

SBT01 · May 22, 2023

Sometimes I hit a "dead end" At the scene with the text: "The guards approach you from multiple angles, cutting off your immediate escape." There are no options in the "Actions" field

Solid Snekk · May 22, 2023

Laughingfox said:
1. Silly question, but can you find the goblin cave after completing the shrine liberation/rescue? I assume so, but then again, if the only source of gobo attacks go away, then it's not like the player will be dragged away to the gobo cave.

2. Welp. Found the first oddity. Fresh start, male Steelwind, fresh out of the gate. After checking on Percy just before Amel's funeral this is written:

3. Still a blank image or error on goblinloss as a futa, seems like.

4. Servicing a group of goblins drains health instead of vitality. Edit: Maybe it's just being used for anal, but the player not getting the blurbs of it being so intense or vexing at low skill?

5. Messing around in cave, player seems to get re pregnant with gobbo kids every day. I wonder if this is what is affecting Percy as well.

6. Also a crash/error on encountering your goblin son, freshly raised in the cave. Still trying to figure out how meet your gobo daughter, unless it's rng or something.

7. Seems like the player should be able to give birth in the gob caves, but it's not functioning. If I escape outside and head to a clinic the baby seems to deliver without issue.

1. As a goblin they tell you if you're a goblin or if you accept the king's gift, otherwise you learn of it if you go there or grab the map they nailed to the wall. I'll also add goblin wife telling you.
2. Fixed.
3. Fixed.
4. I cannot replicate this. I did change how surrender worked so it exhausts you instead of reducing your health, which may be a part.
5. There was a bug I fixed while also fixing Percy so it might be that
6. They weren't meant to be available yet. I'll fix it when I get off work
7. Meant to add it to the Shaman.

Le_Flemard said:
try gelbooru.com and other image database likes it.

I'm using r34.xxx, gelbooru and google at the moment. It's hard finding pics I like.

SBT01 said:
Sometimes I hit a "dead end" At the scene with the text: "The guards approach you from multiple angles, cutting off your immediate escape." There are no options in the "Actions" field

Fixed

Le_Flemard · May 22, 2023

I found a good enough syntax highlighter

Loc :AnnetteCaught
group of line for arg[0]='2' has one too many end

if I read the russian wiki right, it is recommended to always use the input function as $input.

also loc is a qsp function and shouldn't be used as a variable

loc : adeclean
curloc condition not using $curloc format, altho it will work, it's bad practice
also in

Code:

if curloc='adelib':
    *nl
    if adebooks=0:
        'All of the books are in their proper place.'
    elseif adebooks=1
        'There is a single book laying on a nearby table.'
    elseif adebooks>0:
        'There are <<adebooks>> books laying around.'
    end

elseif adebooks=1 should be elseif adebooks=1:

# spiderloss
elseif race=1 and vagina=0 and penis>0 and rand(1, 5)=1 or race=2 and vagina=0 and penis>0and rand(1, 5)=1 : should be elseif race=1 and vagina=0 and penis>0 and rand(1, 5)=1 or race=2 and vagina=0 and penis>0 and rand(1, 5)=1 : (sticky and)

# bath
if race=1 and penis>0 and vagina=0 or race=2 and penis>0 and vagina=0: bloc has one too many end

loc : liminalspace
group of line for arg[0]='1' has one too many end

More to come :3

Le_Flemard · May 22, 2023

oh, boy long one :
# fights
current:

Code:

if $args[0]='1':
    '<center><img <<$set_imgh>> src="images/enemy/zom/zom.jpg"></center>'
    'You have stumbled across a horde of zombies!'
        act'Defend yourself':set prt=1&dynamic $ohota
            set protivnik=1
            dynamic $vozmonapadenia
        end
end

! Wolf Pack
if $args[0]='2':
    '<center><img <<$set_imgh>> src="images/enemy/hound/wolf2.jpg"></center>'
    'You have stumbled across a pack of wolves!'
        act'Defend yourself':set prt=3&dynamic $ohota
            set protivnik=3
            dynamic $vozmonapadenia
        end
end

! Drunk
if $args[0]='3':
    '<center><img <<$set_imgh>> src="images/enemy/drunk/drunk.jpg"></center>'
    'A drunk man accosts you, threatening rape and more.'
        act'Defend yourself':set prt=2&dynamic $solo
            set protivnik=2
            dynamic $vozmonapadenia
        end
end

! Abomination
if $args[0]='4':
    '<center><img <<$set_imgh>> src="images/enemy/abomin/corrupt<<rand(1, 6)>>.jpg"></center>'
    *nl
    'An abomination attacks, uttering something awful in their language before lunging at you'
        act'Defend yourself':set prt=5&dynamic $solo
            set protivnik=5
            dynamic $vozmonapadenia
        end
end

! Goblin Guard
if $args[0]='5':
    '<center><img <<$set_imgh>> src="images/enemy/goblin/goblin.jpg"></center>'
    *nl
    'You are attacked a lone goblin.'
        act'Defend yourself':set prt=6&dynamic $solo
            set protivnik=6
            dynamic $vozmonapadenia
        end
end

! FoxQuest Boss, Gang of Goblins
if $args[0]='6':
    '<center><img <<$set_imgh>> src="images/enemy/goblin/goblin.jpg"></center>'
    'You are attacked by a group of goblins!'
        act'Defend yourself':set prt=6&dynamic $gang
            set protivnik=6
            dynamic $vozmonapadenia
        end
end

! Hive Wasps
if $args[0]='7':
    '<center><img <<$set_imgh>> src="images/enemy/insect/wasp.jpg"></center>'
    'Angry insects fly up to attack you!'
        act'Defend yourself':set prt=7&dynamic $gang
            set protivnik=7
            dynamic $vozmonapadenia
        end
end

! 1 spider, MineSpider1 quest
if $args[0]='8':
    '<center><img <<$set_imgh>> src="images/enemy/spider/spider.jpg"></center>'
    'You have stumbled across a spider!'
        act'Defend yourself':set prt=18&dynamic $solo
            set protivnik=18
            dynamic $vozmonapadenia
        end
end

! X spiders, MineSpider6 quest
if $args[0]='9':
    '<center><img <<$set_imgh>> src="images/enemy/spider/spider.jpg"></center>'
    'You are ambushed by spiders!'
        act'Defend yourself':set prt=18&dynamic $ohota
            set protivnik=18
            dynamic $vozmonapadenia
        end
end

! 9 spiders, MineSpider8 quest
if $args[0]='10':
    '<center><img <<$set_imgh>> src="images/enemy/spider/spider.jpg"></center>'
    'You are attacked by a horde of spiders!'
        act'Defend yourself':set prt=18&dynamic $gang
            set protivnik=18
            dynamic $vozmonapadenia
        end
end

! 11 Guards
if $args[0]='11':
    '<center><img <<$set_imgh>> src="images/enemy/guards/guards.jpg"></center>'
    'Several guards approach, attempting to arrest you!'
        act'Defend yourself':set prt=14&dynamic $ohota
            set protivnik=14
            dynamic $vozmonapadenia
        end
end

! Feral Wasps
if $args[0]='12':
    '<center><img <<$set_imgh>> src="images/enemy/insect/wasp.jpg"></center>'
    'Feral insects fly up to attack you!'
        act'Defend yourself':set prt=7&dynamic $ohota
            set protivnik=7
            dynamic $vozmonapadenia
        end
end

! X Bandits
if $args[0]='13':
    '<center><img <<$set_imgh>> src="images/enemy/bandit/bandits.jpg"></center>'
    'Several bandits approach with their weapons drawn!'
        act'Defend yourself':set prt=8&dynamic $ohota
            set protivnik=8
            dynamic $vozmonapadenia
        end
end

! 1 Bandit
if $args[0]='14':
    '<center><img <<$set_imgh>> src="images/enemy/bandit/bandits.jpg"></center>'
    'The thief approaches with their weapons drawn!'
        act'Defend yourself':set prt=8&dynamic $solo
            set protivnik=8
            dynamic $vozmonapadenia
        end
end

! 1 wolf
if $args[0]='15':
    '<center><img <<$set_imgh>> src="images/enemy/hound/wolf2.jpg"></center>'
    'You are fighting a lone wolf!'
        act'Defend yourself':set prt=3&dynamic $solo
            set protivnik=3
            dynamic $vozmonapadenia
        end
end

! Prisoners
if $args[0]='16':
    '<center><img <<$set_imgh>> src="images/avedon/prison/prisoner<<rand(1, 4)>>.jpg"></center>'
    'A prisoner accosts you, threatening rape and more.'
        act'Defend yourself':set prt=2&dynamic $solo
            set protivnik=2
            dynamic $vozmonapadenia
        end
end

if $args[0]='17':
    '<center><img <<$set_imgh>> src="images/enemy/order/pal.jpg"></center>'
    'A Paladin approaches you for your transgressions against God.'
        act'Defend yourself':set prt=28&dynamic $solo
            set protivnik=28
            dynamic $vozmonapadenia
        end
end

! Fake you, Temple Basement
if $args[0]='18':
    '<center><img <<$set_imgh>> src="images/jobs/paladin/self.jpg"></center>'
    *nl
    'You are fighting a false shape of you.'
        act'Kill It':set prt=5&dynamic $solo
            set protivnik=5
            dynamic $vozmonapadenia
        end
end

! 1 slime
if $args[0]='19':
    '<center><img <<$set_imgh>> src="images/enemy/slime/slime.jpg"></center>'
    *nl
    'The slime makes no noise as it charges at you.'
        act'Kill It':set prt=4&dynamic $solo
            set protivnik=4
            dynamic $vozmonapadenia
        end
end


! South Forest Solo Werewolf Fight
if $args[0]='20':
    '<center><img <<$set_imgh>> src="images/enemy/werewolf/werewolf.jpg"></center>'
    *nl
    'A werewolf emerges from the underbrush, a throbbing erection and its claws outstretched!'
    act'Defend yourself':set prt=20&dynamic $solo
        set protivnik=20
        dynamic $vozmonapadenia
    end
end

! 1 minotaur
if $args[0]='21':
    '<center><img <<$set_imgh>> src="images/enemy/mino/mino.jpg"></center>'
    'The minotaur pulls its cock from Percy`s throat, tossing her aside as it approaches you.'
    act'Defend yourself':set prt=26&dynamic $solo
        set protivnik=26
        dynamic $vozmonapadenia
    end
end


! Spooky scary skelemons
if $args[0]='22':
    '<center><img <<$set_imgh>> src="images/enemy/zom/mrskel.jpg"></center>'
    'Death has summoned a skeleton to fight you!'
        act'Defend yourself':set prt=1&dynamic $solo
            set protivnik=1
            dynamic $vozmonapadenia
        end
end

! Witch One - Woodland Witch
if $args[0]='23':
    '<center><img <<$set_imgh>> src="images/enemy/woodland/student1.jpg"></center>'
    'One, a student of Circe, attacks you!'
        act'Defend yourself':set prt=13&dynamic $solo
            set protivnik=13
            dynamic $vozmonapadenia
        end
end

! Witch Two - Harpy
if $args[0]='24':
    '<center><img <<$set_imgh>> src="images/enemy/woodland/student2.jpg"></center>'
    'Two, a student of Circe, attacks you!'
        act'Defend yourself':set prt=10&dynamic $solo
            set protivnik=10
            dynamic $vozmonapadenia
        end
end

! Abomination
if $args[0]='25':
    '<center><img <<$set_imgh>> src="images/enemy/abomin/room.jpg"></center>'
    *nl
    'An abomination attacks, uttering something awful in their language before lunging at you'
        act'Defend yourself':set prt=37&dynamic $solo
            set protivnik=37
            dynamic $vozmonapadenia
        end
end

! Kitsune
if $args[0]='26':
    '<center><img <<$set_imgh>> src="images/enemy/fox/kitsune.jpg"></center>'
    *nl
    'Three kitsune attack you, lust in their eyes'
        act'Defend yourself':set prt=12&dynamic $solo
            set protivnik=12
            dynamic $vozmonapadenia
        end
end

! 1 Demon
if $args[0]='27':
    '<center><img <<$set_imgh>> src="images/enemy/doppel/doppel.jpg"></center>'
    'The pale creature shrieks at you in some ancient language.'
    act'Defend yourself':set prt=36&dynamic $solo
        set protivnik=36
        dynamic $vozmonapadenia
    end
end



! x goblin
if $args[0]='28':
    '<center><img <<$set_imgh>> src="images/enemy/goblin/goblin.jpg"></center>'
    *nl
    'You are attacked a several goblins.'
        act'Defend yourself':set prt=6&dynamic $ohota
            set protivnik=6
            dynamic $vozmonapadenia
        end
end

! 1 tentacle
if $args[0]='29':
    '<center><img <<$set_imgh>> src="images/enemy/tentacle/tentacle.jpg"></center>'
    'The pale creature shrieks at you in some ancient language.'
    act'Defend yourself':set prt=25&dynamic $solo
        set protivnik=25
        dynamic $vozmonapadenia
    end
end

! Death fake fight
if $args[0]='36':
    '<center><img <<$set_imgh>> src="images/enemy/death/deathskel.jpg"></center>'
    'Death towers over you as she realizes you`re not moving.'
    act'Defend yourself':set prt=36&dynamic $solo
        set protivnik=36
        dynamic $vozmonapadenia
    end
end

fixed (removed all the unnecessary end:

Code:

if $args[0]='1':
    '<center><img <<$set_imgh>> src="images/enemy/zom/zom.jpg"></center>'
    'You have stumbled across a horde of zombies!'
    act'Defend yourself':set prt=1&dynamic $ohota
    set protivnik=1
    dynamic $vozmonapadenia
end

! Wolf Pack
if $args[0]='2':
    '<center><img <<$set_imgh>> src="images/enemy/hound/wolf2.jpg"></center>'
    'You have stumbled across a pack of wolves!'
    act'Defend yourself':set prt=3&dynamic $ohota
    set protivnik=3
    dynamic $vozmonapadenia
end

! Drunk
if $args[0]='3':
    '<center><img <<$set_imgh>> src="images/enemy/drunk/drunk.jpg"></center>'
    'A drunk man accosts you, threatening rape and more.'
    act'Defend yourself':set prt=2&dynamic $solo
    set protivnik=2
    dynamic $vozmonapadenia
end

! Abomination
if $args[0]='4':
    '<center><img <<$set_imgh>> src="images/enemy/abomin/corrupt<<rand(1, 6)>>.jpg"></center>'
    *nl
    'An abomination attacks, uttering something awful in their language before lunging at you'
    act'Defend yourself':set prt=5&dynamic $solo
    set protivnik=5
    dynamic $vozmonapadenia
end

! Goblin Guard
if $args[0]='5':
    '<center><img <<$set_imgh>> src="images/enemy/goblin/goblin.jpg"></center>'
    *nl
    'You are attacked a lone goblin.'
    act'Defend yourself':set prt=6&dynamic $solo
    set protivnik=6
    dynamic $vozmonapadenia
end

! FoxQuest Boss, Gang of Goblins
if $args[0]='6':
    '<center><img <<$set_imgh>> src="images/enemy/goblin/goblin.jpg"></center>'
    'You are attacked by a group of goblins!'
    act'Defend yourself':set prt=6&dynamic $gang
    set protivnik=6
    dynamic $vozmonapadenia
end

! Hive Wasps
if $args[0]='7':
    '<center><img <<$set_imgh>> src="images/enemy/insect/wasp.jpg"></center>'
    'Angry insects fly up to attack you!'
    act'Defend yourself':set prt=7&dynamic $gang
    set protivnik=7
    dynamic $vozmonapadenia
end

! 1 spider, MineSpider1 quest
if $args[0]='8':
    '<center><img <<$set_imgh>> src="images/enemy/spider/spider.jpg"></center>'
    'You have stumbled across a spider!'
    act'Defend yourself':set prt=18&dynamic $solo
    set protivnik=18
    dynamic $vozmonapadenia
end

! X spiders, MineSpider6 quest
if $args[0]='9':
    '<center><img <<$set_imgh>> src="images/enemy/spider/spider.jpg"></center>'
    'You are ambushed by spiders!'
    act'Defend yourself':set prt=18&dynamic $ohota
    set protivnik=18
    dynamic $vozmonapadenia
end

! 9 spiders, MineSpider8 quest
if $args[0]='10':
    '<center><img <<$set_imgh>> src="images/enemy/spider/spider.jpg"></center>'
    'You are attacked by a horde of spiders!'
    act'Defend yourself':set prt=18&dynamic $gang
    set protivnik=18
    dynamic $vozmonapadenia
end

! 11 Guards
if $args[0]='11':
    '<center><img <<$set_imgh>> src="images/enemy/guards/guards.jpg"></center>'
    'Several guards approach, attempting to arrest you!'
    act'Defend yourself':set prt=14&dynamic $ohota
    set protivnik=14
    dynamic $vozmonapadenia
end

! Feral Wasps
if $args[0]='12':
    '<center><img <<$set_imgh>> src="images/enemy/insect/wasp.jpg"></center>'
    'Feral insects fly up to attack you!'
    act'Defend yourself':set prt=7&dynamic $ohota
    set protivnik=7
    dynamic $vozmonapadenia
end

! X Bandits
if $args[0]='13':
    '<center><img <<$set_imgh>> src="images/enemy/bandit/bandits.jpg"></center>'
    'Several bandits approach with their weapons drawn!'
    act'Defend yourself':set prt=8&dynamic $ohota
    set protivnik=8
    dynamic $vozmonapadenia
end

! 1 Bandit
if $args[0]='14':
    '<center><img <<$set_imgh>> src="images/enemy/bandit/bandits.jpg"></center>'
    'The thief approaches with their weapons drawn!'
    act'Defend yourself':set prt=8&dynamic $solo
    set protivnik=8
    dynamic $vozmonapadenia
end

! 1 wolf
if $args[0]='15':
    '<center><img <<$set_imgh>> src="images/enemy/hound/wolf2.jpg"></center>'
    'You are fighting a lone wolf!'
    act'Defend yourself':set prt=3&dynamic $solo
    set protivnik=3
    dynamic $vozmonapadenia
end

! Prisoners
if $args[0]='16':
    '<center><img <<$set_imgh>> src="images/avedon/prison/prisoner<<rand(1, 4)>>.jpg"></center>'
    'A prisoner accosts you, threatening rape and more.'
    act'Defend yourself':set prt=2&dynamic $solo
    set protivnik=2
    dynamic $vozmonapadenia
end

if $args[0]='17':
    '<center><img <<$set_imgh>> src="images/enemy/order/pal.jpg"></center>'
    'A Paladin approaches you for your transgressions against God.'
    act'Defend yourself':set prt=28&dynamic $solo
    set protivnik=28
    dynamic $vozmonapadenia
end

! Fake you, Temple Basement
if $args[0]='18':
    '<center><img <<$set_imgh>> src="images/jobs/paladin/self.jpg"></center>'
    *nl
    'You are fighting a false shape of you.'
    act'Kill It':set prt=5&dynamic $solo
    set protivnik=5
    dynamic $vozmonapadenia
end

! 1 slime
if $args[0]='19':
    '<center><img <<$set_imgh>> src="images/enemy/slime/slime.jpg"></center>'
    *nl
    'The slime makes no noise as it charges at you.'
    act'Kill It':set prt=4&dynamic $solo
    set protivnik=4
    dynamic $vozmonapadenia
end


! South Forest Solo Werewolf Fight
if $args[0]='20':
    '<center><img <<$set_imgh>> src="images/enemy/werewolf/werewolf.jpg"></center>'
    *nl
    'A werewolf emerges from the underbrush, a throbbing erection and its claws outstretched!'
    act'Defend yourself':set prt=20&dynamic $solo
    set protivnik=20
    dynamic $vozmonapadenia
end

! 1 minotaur
if $args[0]='21':
    '<center><img <<$set_imgh>> src="images/enemy/mino/mino.jpg"></center>'
    'The minotaur pulls its cock from Percy`s throat, tossing her aside as it approaches you.'
    act'Defend yourself':set prt=26&dynamic $solo
    set protivnik=26
    dynamic $vozmonapadenia
end


! Spooky scary skelemons
if $args[0]='22':
    '<center><img <<$set_imgh>> src="images/enemy/zom/mrskel.jpg"></center>'
    'Death has summoned a skeleton to fight you!'
    act'Defend yourself':set prt=1&dynamic $solo
    set protivnik=1
    dynamic $vozmonapadenia
end

! Witch One - Woodland Witch
if $args[0]='23':
    '<center><img <<$set_imgh>> src="images/enemy/woodland/student1.jpg"></center>'
    'One, a student of Circe, attacks you!'
    act'Defend yourself':set prt=13&dynamic $solo
    set protivnik=13
    dynamic $vozmonapadenia
end

! Witch Two - Harpy
if $args[0]='24':
    '<center><img <<$set_imgh>> src="images/enemy/woodland/student2.jpg"></center>'
    'Two, a student of Circe, attacks you!'
    act'Defend yourself':set prt=10&dynamic $solo
    set protivnik=10
    dynamic $vozmonapadenia
end

! Abomination
if $args[0]='25':
    '<center><img <<$set_imgh>> src="images/enemy/abomin/room.jpg"></center>'
    *nl
    'An abomination attacks, uttering something awful in their language before lunging at you'
    act'Defend yourself':set prt=37&dynamic $solo
    set protivnik=37
    dynamic $vozmonapadenia
end

! Kitsune
if $args[0]='26':
    '<center><img <<$set_imgh>> src="images/enemy/fox/kitsune.jpg"></center>'
    *nl
    'Three kitsune attack you, lust in their eyes'
    act'Defend yourself':set prt=12&dynamic $solo
    set protivnik=12
    dynamic $vozmonapadenia
end

! 1 Demon
if $args[0]='27':
    '<center><img <<$set_imgh>> src="images/enemy/doppel/doppel.jpg"></center>'
    'The pale creature shrieks at you in some ancient language.'
    act'Defend yourself':set prt=36&dynamic $solo
    set protivnik=36
    dynamic $vozmonapadenia
end



! x goblin
if $args[0]='28':
    '<center><img <<$set_imgh>> src="images/enemy/goblin/goblin.jpg"></center>'
    *nl
    'You are attacked a several goblins.'
    act'Defend yourself':set prt=6&dynamic $ohota
    set protivnik=6
    dynamic $vozmonapadenia
end

! 1 tentacle
if $args[0]='29':
    '<center><img <<$set_imgh>> src="images/enemy/tentacle/tentacle.jpg"></center>'
    'The pale creature shrieks at you in some ancient language.'
    act'Defend yourself':set prt=25&dynamic $solo
    set protivnik=25
    dynamic $vozmonapadenia
end

! Death fake fight
if $args[0]='36':
    '<center><img <<$set_imgh>> src="images/enemy/death/deathskel.jpg"></center>'
    'Death towers over you as she realizes you`re not moving.'
    act'Defend yourself':set prt=36&dynamic $solo
    set protivnik=36
    dynamic $vozmonapadenia
end

coretex · May 22, 2023

Hey Solid Snekk - this thread got on my radar, I vaguely remember this or at least Rubedo so interested to see what you do with this in the future. I'm wondering since you have mentioned using Notepad to edit, are you working on this with a local/personal git at all? or thought about posting for viewing at least on something like gitgud.io ?

Le_Flemard · May 22, 2023

To be exact:
LOC [$example] is the operation of checking the presence of a location in the game. True if the game has a location called [$example]
(with [$example] being an expression of text (string) type (but if necessary, the engine will automatically convert the number to a string))
(took that from wiki)

Le_Flemard · May 22, 2023

# kitsuneloss is missing an end at the end

Le_Flemard · May 22, 2023

# bedstats

Code:

if curloc='gate' or curloc='gobgate':
    'Avee`s tail is exceptionally soft.'
    if YellowRooms=3 and GateBedTouch=0:
        act 'Zone the Gate into the White Space'
            GateBedTouch=1
        end
    end
end

should be

Code:

if $curloc='gate' or $curloc='gobgate':
    "Avee's tail is exceptionally soft."
    if YellowRooms=3 and GateBedTouch=0:
        act 'Zone the Gate into the White Space':
            GateBedTouch=1
        end
    end
end

and

Code:

if curloc='FortReachBarracks':
    'There is a seperate set of rooms for travelers that are free to use, but you`re the only one using them.'
    if FortSlut>5:
        *nl
        'Your slutty reputation does have a few perks, as occasionally a soldier will peek into the room to check on you.'
    end
    if YellowRooms=3 and FortBedTouch=0:
        act 'Zone the Gate into the White Space'
            FortBedTouch=1
        end
    end
end

should be

Code:

if $curloc='FortReachBarracks':
    'There is a seperate set of rooms for travelers that are free to use, but you`re the only one using them.'
    if FortSlut>5:
        *nl
        'Your slutty reputation does have a few perks, as occasionally a soldier will peek into the room to check on you.'
    end
    if YellowRooms=3 and FortBedTouch=0:
        act 'Zone the Gate into the White Space':
            FortBedTouch=1
        end
    end
end

Le_Flemard · May 22, 2023

same location as above

Code:

!! Reach
!! ---------------------------------
if curloc='adebed' or curloc='adesparebed':
    'This bed feels like you`re floating on air.'
    if YellowRooms=3 and AdeBedTouch=0:
        act 'Zone the Adelaide Manor into the White Space'
            AdeBedTouch=1
        end
    end
end

if curloc='adeservant':
    'The bed is much larger than any of the other servant beds you`ve seen.'
    if YellowRooms=3 and AdeBedTouch=0:
        act 'Zone the Adelaide Manor into the White Space'
            AdeBedTouch=1
        end
    end
end

if curloc='manorhomespare' or curloc='manorhomebed':
    'The bed feels exquisite.'
    if YellowRooms=3 and ManorBedTouch=0:
        act 'Zone your Manor into the White Space'
            ManorBedTouch=1
        end
    end
end

should be

Code:

!! Reach
!! ---------------------------------
if $curloc='adebed' or $curloc='adesparebed':
    'This bed feels like you`re floating on air.'
    if YellowRooms=3 and AdeBedTouch=0:
        act 'Zone the Adelaide Manor into the White Space':
            AdeBedTouch=1
        end
    end
end

if $curloc='adeservant':
    "The bed is much larger than any of the other servant beds you've seen."
    if YellowRooms=3 and AdeBedTouch=0:
        act 'Zone the Adelaide Manor into the White Space':
            AdeBedTouch=1
        end
    end
end

if $curloc='manorhomespare' or $curloc='manorhomebed':
    'The bed feels exquisite.'
    if YellowRooms=3 and ManorBedTouch=0:
        act 'Zone your Manor into the White Space':
            ManorBedTouch=1
        end
    end
end

Le_Flemard · May 22, 2023

that ":" missing is for every act in that location apparently

Code:

!! Suburb
!! ---------------------------------
if curloc='farmhouse':
    'Your bed in your farmhouse is comfortable and spacious..'
        if goblinwife=1 and gobwife=6 and PercyGF=1 and PercyLoc=5:
            *nl
            '<<$gobname>></a> and Percy lie in bed with you, and you wrap an arm around each of them'
        elseif goblinwife=1 and gobwife=6:
            *nl
            '<<$gobname>> attaches herself to your side, and you wrap an arm around her.'
        elseif PercyGF=1 and PercyLoc=5:
            *nl
            'Percy lays beside you on, draping her arms around you.'
        end
    if YellowRooms=3 and FarmBedTouch=0:
        act 'Zone your farm into the White Space'
            FarmBedTouch=1
        end
    end
end

if curloc='sawmilldorm':
    if SawDormGHole>0:
        arousal+=10
        'Hearing cocks being sucked only a few dozen feet away from you is not making resting very easy.'
    else
        arousal+=10
        'You hear odd noises when you lay down, unsure of the source.'
    end
    if YellowRooms=3 and DormBedTouch=0:
        act 'Zone the Sawmill Dorm into the White Space'
            DormBedTouch=1
        end
    end
end

should be

Code:

!! Suburb
!! ---------------------------------
if $curloc='farmhouse':
    'Your bed in your farmhouse is comfortable and spacious..'
        if goblinwife=1 and gobwife=6 and PercyGF=1 and PercyLoc=5:
            *nl
            '<<$gobname>></a> and Percy lie in bed with you, and you wrap an arm around each of them'
        elseif goblinwife=1 and gobwife=6:
            *nl
            '<<$gobname>> attaches herself to your side, and you wrap an arm around her.'
        elseif PercyGF=1 and PercyLoc=5:
            *nl
            'Percy lays beside you on, draping her arms around you.'
        end
    if YellowRooms=3 and FarmBedTouch=0:
        act 'Zone your farm into the White Space':
            FarmBedTouch=1
        end
    end
end

if $curloc='sawmilldorm':
    if SawDormGHole>0:
        arousal+=10
        'Hearing cocks being sucked only a few dozen feet away from you is not making resting very easy.'
    else
        arousal+=10
        'You hear odd noises when you lay down, unsure of the source.'
    end
    if YellowRooms=3 and DormBedTouch=0:
        act 'Zone the Sawmill Dorm into the White Space':
            DormBedTouch=1
        end
    end
end

Le_Flemard · May 22, 2023

If you need to include quotes of the same type in a constant, you need to write them twice in a row ( escaping through duplication )

If you were wondering about escape character...

Le_Flemard · May 22, 2023

Code:

!! Town/Market
!! ---------------------------------
if curloc='town' and TownBFView=1:
    '<<$TownBoy>> joins you in bed, cuddling next to you.'
    if YellowRooms=3 and TownBfBedTouch=0:
        act 'Zone <<$TownBoy>>`s apartment into the White Space'
            TownBfBedTouch=1
        end
    end
end

if curloc='markettavernroom':
    'Your room at the inn is comfortable, obviously well taken care of.'
    if YellowRooms=3 and AldBedTouch=0:
        act 'Zone the Aldmar Tavern into the White Space'
            AldBedTouch=1
        end
    end
end

if curloc='market' and MarketGfView=1:
    '<<$MarketGirl>> joins you in bed, cuddling next to you.'
    if YellowRooms=3 and MarketGfBedTouch=0:
        act 'Zone <<$MarketGirl>>`s apartment into the White Space'
            MarketGfBedTouch=1
        end
    end
end

should be

Code:

!! Town/Market
!! ---------------------------------
if $curloc='town' and TownBFView=1:
    '<<$TownBoy>> joins you in bed, cuddling next to you.'
    if YellowRooms=3 and TownBfBedTouch=0:
        act 'Zone <<$TownBoy>>`s apartment into the White Space':
            TownBfBedTouch=1
        end
    end
end

if $curloc='markettavernroom':
    'Your room at the inn is comfortable, obviously well taken care of.'
    if YellowRooms=3 and AldBedTouch=0:
        act 'Zone the Aldmar Tavern into the White Space':
            AldBedTouch=1
        end
    end
end

if $curloc='market' and MarketGfView=1:
    '<<$MarketGirl>> joins you in bed, cuddling next to you.'
    if YellowRooms=3 and MarketGfBedTouch=0:
        act 'Zone <<$MarketGirl>>`s apartment into the White Space':
            MarketGfBedTouch=1
        end
    end
end

Le_Flemard · May 22, 2023

I think I'm just gonna post all that location modified, would take less space...

Le_Flemard · May 22, 2023

here's whole bedstats location edited:

Code:

if CorruptedNun=1 and YellowRooms<3:'<a href="exec: gt ''bede''">Bede</a> is just at the corner of your vision as you lay down.'&*nl
if CorruptedNun=1 and YellowRooms<3:'The <a href="exec: gt ''whitespace''">white void</a> is somewhere you can travel from beds.'&*nl

if Criminal=1 and PetRat=1 and Cellmate=1: gt 'ratevent', '1'
if RoomBarricade=1 and RatKing=3 and HolyVow=0: gt 'ratevent', '4'
if RoomBarricade=1 and RatKing=3 and HolyVow=1: gt 'ratevent', '5'

if buttplug>0: 'Manage your <a href="exec: gt ''plugstatus''">buttplug</a>'&*nl

if womb=1 and PregKnow=1:
    'Your pregnant stomach is getting pretty obvious.'
    *nl
end

if $loc='goblairbed' and NogitsuneBorn=1 and rand(1, 10)=1:
    gt 'foxxymeet'
end

if HoundPuppies>0 or WerewolfPuppies>0:
    act 'Have your puppies join you in battle':
        HoundPuppies+=WarHounds
        HoundPuppies+=WarhoundDog
        HoundPuppies=0
        WerewolfPuppies+=WarHounds
        WerewolfPuppies+=WarHoundWerewolf
        WerewolfPuppies=0
        gt $locP
    end   
end

if AdePreg=1 and creampie>0:
    SemenSatiety+=creampie
    *nl
    'You have gained <<creampie*5>> satiety from the cum inside your pussy.'
    creampie=0
end

if AdePreg=1 and analcreampie>0:
    SemenSatiety+=analcreampie
    'You have gained <<creampie*5>> satiety from the cum inside your ass.'
    analcreampie=0
end



if CorruptedNun=1 and BedeMeet=0:
    BedeMeet=1
    cla
    *clr
    '<center><img <<$set_imgh>> src="images/bed/bede.jpg"></center>'
    *nl
    '"Hello <<$name>>, I heard you were the one who saved me from perpetual torment?", she says with a smile that shows she still isn`t close to being human.'
    *nl
    '"You were so angry every time we fought, calling me an abomination and beating me with your fists. It made sense, I suppose."'
    *nl
    '"I do have some...unfortunate news. I reproduced, quite a lot, and there are dozens more of those mindless abominations out there. They scattered when Carver was destroyed so they are no longer contained inside the prison."'
    *nl
    '"I`ll let you sleep, but please speak to me when you have a moment."'
end



if $curloc='cell':
    'The slab the prison calls a bed is rather uncomfortable.'
    *nl
    if vagina>0 and Cellmate=0 and RoomBarricade=0: 'You should also be careful as you may get attacked in your sleep.'
end




!! Mountain
!! ---------------------------------
if $curloc='gate' or $curloc='gobgate':
    "Avee's tail is exceptionally soft."
    if YellowRooms=3 and GateBedTouch=0:
        act 'Zone the shrine''s gate into the White Space':
            GateBedTouch=1
        end
    end
end

if $curloc='FortReachBarracks':
    'There is a seperate set of rooms for travelers that are free to use, but you`re the only one using them.'
    if FortSlut>5:
        *nl
        'Your slutty reputation does have a few perks, as occasionally a soldier will peek into the room to check on you.'
    end
    if YellowRooms=3 and FortBedTouch=0:
        act 'Zone Fort Reach''s barracks into the White Space':
            FortBedTouch=1
        end
    end
end

!! Reach
!! ---------------------------------
if $curloc='adebed' or $curloc='adesparebed':
    'This bed feels like you`re floating on air.'
    if YellowRooms=3 and AdeBedTouch=0:
        act 'Zone the Adelaide Manor into the White Space':
            AdeBedTouch=1
        end
    end
end

if $curloc='adeservant':
    'The bed is much larger than any of the other servant beds you''ve seen.'
    if YellowRooms=3 and AdeBedTouch=0:
        act 'Zone the Adelaide Manor into the White Space':
            AdeBedTouch=1
        end
    end
end

if $curloc='manorhomespare' or $curloc='manorhomebed':
    'The bed feels exquisite.'
    if YellowRooms=3 and ManorBedTouch=0:
        act 'Zone your Manor into the White Space':
            ManorBedTouch=1
        end
    end
end


!! Suburb
!! ---------------------------------
if $curloc='farmhouse':
    'Your bed in your farmhouse is comfortable and spacious..'
        if goblinwife=1 and gobwife=6 and PercyGF=1 and PercyLoc=5:
            *nl
            '<<$gobname>></a> and Percy lie in bed with you, and you wrap an arm around each of them'
        elseif goblinwife=1 and gobwife=6:
            *nl
            '<<$gobname>> attaches herself to your side, and you wrap an arm around her.'
        elseif PercyGF=1 and PercyLoc=5:
            *nl
            'Percy lays beside you on, draping her arms around you.'
        end
    if YellowRooms=3 and FarmBedTouch=0:
        act 'Zone your farm into the White Space':
            FarmBedTouch=1
        end
    end
end

if $curloc='sawmilldorm':
    if SawDormGHole>0:
        arousal+=10
        'Hearing cocks being sucked only a few dozen feet away from you is not making resting very easy.'
    else
        arousal+=10
        'You hear odd noises when you lay down, unsure of the source.'
    end
    if YellowRooms=3 and DormBedTouch=0:
        act 'Zone the Sawmill Dorm into the White Space':
            DormBedTouch=1
        end
    end
end

!! Town/Market
!! ---------------------------------
if $curloc='town' and TownBFView=1:
    '<<$TownBoy>> joins you in bed, cuddling next to you.'
    if YellowRooms=3 and TownBfBedTouch=0:
        act 'Zone <<$TownBoy>>`s apartment into the White Space':
            TownBfBedTouch=1
        end
    end
end

if $curloc='markettavernroom':
    'Your room at the inn is comfortable, obviously well taken care of.'
    if YellowRooms=3 and AldBedTouch=0:
        act 'Zone the Aldmar Tavern into the White Space':
            AldBedTouch=1
        end
    end
end

if $curloc='market' and MarketGfView=1:
    '<<$MarketGirl>> joins you in bed, cuddling next to you.'
    if YellowRooms=3 and MarketGfBedTouch=0:
        act 'Zone <<$MarketGirl>>`s apartment into the White Space':
            MarketGfBedTouch=1
        end
    end
end

!! Temple
!! ---------------------------------
if $curloc='templeroom':
    'Religious iconography fills the room and the bed is as stiff as a board.'
    if YellowRooms=3 and TempleBedTouch=0:
        act 'Zone the Temple into the White Space':
            TempleBedTouch=1
            Faith-=1
        end
    end
end

if $curloc='tomb':
    'Laying on the slab is uncomfortable as it is a literal piece of rock.'
    if YellowRooms=3 and DeathBedTouch=0:
        act 'Zone Death`s tomb into the White Space':
            DeathBedTouch=1
        end
    end
end


! Slum
!! ---------------------------------
if $curloc='homeslum':
    'Your bed in the slums is a bit small.'
    if goblinwife=1 and gobwife=2 and PercyGF=1 and PercyLoc=1:
        *nl
        '<<$gobname>> lies next to you as she''s able to fit, while Percy sleeps on a nearby couch.'
    elseif goblinwife=1 and gobwife=2:
        *nl
        '<<$gobname>> lies next to you, as you`re both able to fit on the bed.'
    elseif PercyGF=1 and PercyLoc=1:
        *nl
        'Percy lies on a nearby couch since the bed is too small for the two of you.'
    end
    if YellowRooms=3 and SlumBedTouch=0:
        act 'Zone your slum home into the White Space':
            SlumBedTouch=1
        end
    end
end

if $curloc='SlumClinicOffice':
    'Your office couch is as comfortable as a bed, but the constant noise outside of your room makes sleep difficult.'
    if YellowRooms=3 and ClinicBedTouch=0:
        act 'Zone your slum home into the White Space':
            ClinicBedTouch=1
        end
    end   
end

if $curloc='flophouse':
    'The cots are all rather close together.'
    *nl
    if vagina>0: 'You should also be careful as you may get attacked in your sleep.'
    if goblinwife=1 and gobwife=2 and PercyGF=1 and PercyLoc=1:
        *nl
        '<<$gobname>> and Percy are both here and while Percy lays next to you, <<$GobName>> seems to be keeping watch.'
    elseif goblinwife=1 and gobwife=3:
        *nl
        '<<$gobname>> lay next to you but is not asleep, obviously keeping watch in this potentially dangerous room.'
    elseif PercyGF=1 and PercyLoc=1:
        *nl
        'Percy covers her self up, doing their best to hide.'
    end
    if YellowRooms=3 and FlopBedTouch=0:
        act 'Zone the Flophouse into the White Space':
            FlopBedTouch=1
        end
    end
end

if $curloc='tomasroom':
    'The bed is ancient, creaking lightly under your weight.'
end

if $curloc='thievesroom':
    'The bed feels fantastic, the sheets are of foreign silk and the pillows are made of something else, you''re unsure what.'
    if YellowRooms=3 and ThiefBedTouch=0:
        act 'Zone the Thieve Guild into the White Space':
            ThiefBedTouch=1
        end
    end
end


!! Port
!! ---------------------------------

if $curloc='dawnroom':
    'Your room aboard the Dawn of a New Hope is as comfortable as a ship''s room can be, as things rock gently.'
    if YellowRooms=3 and DawnBedTouch=0:
        act 'Zone th Dawn of a New Hope into the White Space':
            DawnBedTouch=1
        end
    end   
end

if $curloc='femmeroom':
    'Your room aboard the Femme Fatalis is as comfortable as a ship`s room can be, as things rock gently.'
    if PortGf=1:
        '<<$PortGirl>> joins you in bed after awhile, wrapping your arm around her.'
    end
    if YellowRooms=3 and FemmeBedTouch=0:
        act 'Zone the Femme Fatalis into the White Space':
            FemmeBedTouch=1
        end
    end
end


!! Britmor
!! ---------------------------------
if $curloc='annetteroom':
    'Annette`s bed is expensive and soft, with lace and pillows everywhere.'
    if ChosenOne=1:
        *nl
        'She used to get so upset if you ever went in her room as a kid, now she doesn`t really care.'
    end
    if YellowRooms=3 and SteelBedTouch=0:
        act 'Zone your family farm into the White Space':
            SteelBedTouch=1
        end
    end
end

if $curloc='billroom':
    'Bill`s bed is rock-hard, just like he likes it.'
    *nl
    'Even the ground is softer than this.'
    *nl
    if ChosenOne=1:
        'You have a lot of good memories of hanging out with Bill as he read to you.'
    end
    if YellowRooms=3 and SteelBedTouch=0:
        act 'Zone your family farm the White Space':
            SteelBedTouch=1
        end
    end
end

if $curloc='BritmorShack':
    if britshackrepair=0:
        'The shack is in poor condition, but its somewhere to sleep.'
        *nl
        'The bed is adjusted in such a way so you don`t get wet if it rains.'
    else
        'Your bed is very comfortable, the carpenters did a good job.'
    end
    if YellowRooms=3 and ShackBedTouch=0:
        act 'Zone the Britmor''s schack into the White Space':
            ShackBedTouch=1
        end
    end
end

if $curloc='britmorshopback':
    'Dana''s bed is perpetually gritty, as if some fine powder was spilled and she`s okay with it.'
    if YellowRooms=3 and ShopBedTouch=0:
        act 'Zone Danna''s shop into the White Space':
            ShopBedTouch=1
        end
    end
end



if $curloc='minestop':
    'The rest stop beds in the mine are little more than cots, but they`re not too uncomfortable.'
    if YellowRooms=3 and MineBedTouch=0:
        act 'Zone the mine''s rest stop into the White Space':
            MineBedTouch=1
        end
    end
end

if $curloc='yourroom':
    'The bed is comfortable as it''s yours.'
    if rand(1, 100)=1:
        *nl
        'Opening your eyes you see your mother, a worried look on her face as a memory of her taking care of you when you were sick plays out before you, before you`re alone again on her old bed.'
    end
    if YellowRooms=3 and SteelBedTouch=0:
        act 'Zone your family farm into the White Space':
            SteelBedTouch=1
        end
    end
end

!! ---------------------------------




if $curloc='monhotelroom':
    'The high class hotel room is luxuriously comfortable.'
    if YellowRooms=3 and ElBedTouch=0:
        act 'Zone your this hotel room into the White Space':
            ElBedTouch=1
        end
    end
end



if $curloc='wolflair':
    'There is a bale of hay the wolves have stolen from somewhere, scattered the area as a bed.'
    if YellowRooms=3 and WolfBedTouch=0 and PackLeader=1:
        act 'Zone the wolf lair into the White Space':
            WolfBedTouch=1
        end
    end
end

if $curloc='goblairbed':
    'The straw mats are very uncomfortable.'
    if YellowRooms=3 and GobBedTouch=0:
        act 'Zone the goblin lair into the White Space':
            GobBedTouch=1
        end
    end
end


! Lactation
if vagina>0 and penis=0 and lact>0 and inventar[12]>0 and race=1 or vagina>0 and penis=0 and lact>0 and inventar[12]>0 and race=2:
    act 'Milk yourself (30 minutes)':
        cla
        *clr
        '<center><img <<$set_imgh>> src="images/race/baby/selfmilk.jpg"></center>'
        *nl
        'You slowly squeeze your breasts, filling a small bottle so you can use it later.'
            act 'Clean yourself up':
                minut+=30
                if milk=0: inventar[6]+=5
                if milk=1: inventar[7]+=5
                inventar[12]-=1
                lact-=5
                gt $locP
            end
    end
end

if vagina>0 and penis=0 and lact>0 and inventar[12]>0 and race=3:
    act 'Milk yourself (30 minutes)':
        cla
        *clr
        '<center><img <<$set_imgh>> src="images/race/baby/gobmilk.jpg"></center>'
        *nl
        'You slowly squeeze your breasts, filling a small bottle so you can use it later.'
            act 'Clean yourself up':
                minut+=30
                if milk=0: inventar[6]+=5
                if milk=1: inventar[7]+=5
                inventar[12]-=1
                lact-=5
                gt $locP
            end
    end
end

if inventar[12]=0 and lact>0:
    *nl
    'You could milk yourself if you had bottles to put the milk in.'
end

Le_Flemard · May 22, 2023

Also, if I read the milking part correctly, the player can't milk themselves if they are a futa?

coretex · May 22, 2023

Also partial comment/suggestion:
Im going thru the file.. QSP.. while it takes it, at times it does not likes spaces and non alpha numerics in "location" names...
so like
Notes - Variables, Monster numbers, Item List and clothes list, need to cut the space out or use "_" , and not have the dash either.

Mostly the QSP editor itself is fine, but some external scripting like what I cloned over from Cleanslate and GL to split and rebuilt a txt2gam file and im not good enough with python to fix the scripts to encapsulate that properly.
I actually even got a QSP editor error when trying to save-as to have it generate a qproj file cause of the dash in Notes-Variables even. So even though all these look like your spot to hold info and comments, they need to be just alpha numerics.

Le_Flemard · May 22, 2023

mmm
the pregnancy code actually does not take directly into account if you're on contraception or not, it use womb status instead?
I might need some pen and paper to plan the whole thing, maybe from scratch.

grahegri · May 22, 2023

Vicindio-1.4

You don't have permission to view the spoiler content. Log in or register now.

rpdl torrents are unaffiliated with F95Zone and the game developer.
Please note that we do not provide support for games.
For torrent-related issues use here, or join us on

You must be registered to see the links

!

You must be registered to see the links

,

You must be registered to see the links

. Downloading issues? Look here.

Solid Snekk · May 23, 2023

coretex said:
Also partial comment/suggestion:
Im going thru the file.. QSP.. while it takes it, at times it does not likes spaces and non alpha numerics in "location" names...
so like
Notes - Variables, Monster numbers, Item List and clothes list, need to cut the space out or use "_" , and not have the dash either.

None of those locations are meant to be viewed in game and are just test locations for me to keep notes, holdovers from when this was a Rubedo mod.

coretex said:
Hey Solid Snekk - this thread got on my radar, I vaguely remember this or at least Rubedo so interested to see what you do with this in the future. I'm wondering since you have mentioned using Notepad to edit, are you working on this with a local/personal git at all? or thought about posting for viewing at least on something like gitgud.io ?

This was originally a mod I was making to Rubedo and then I took off with it into its own separate project. If my little project here is something people are interested in helping develop, sure, but that sounds like a scope of work far beyond my own abilities.

QSP HTML Vicindio [v1.99.40] [Solid Snekk]

Member

Member

Well-Known Member

Member

Member

Active Member

Member

Member

Member

Member

Member

Member

Member

Member

Member

Member

Active Member

Member

out fighting regex

Well-Known Member