peasant: work on game state

This commit is contained in:
Vince Weaver 2021-08-28 01:47:28 -04:00
parent ab2ec4aba5
commit 80cd0899ea
5 changed files with 231 additions and 5 deletions

View File

@ -0,0 +1,20 @@
CC = gcc
CFLAGS = -O2 -Wall -g
all: dump_text
###
dump_text: dump_text.o
$(CC) -o dump_text dump_text.o $(LFLAGS)
dump_text.o: dump_text.c
$(CC) $(CFLAGS) -c dump_text.c
###
clean:
rm -f *.o dump_text

View File

@ -0,0 +1,18 @@
Lines: 630
Words: 7896
Bytes: 43694 gzip: 17097 lzsa: 18915
272 the 220 a 188 you 170 to 166 You
147 and 97 that 97 of 93 in 77 your
77 it 67 on 60 is 57 I 53 like
48 for 44 this 42 with 40 here 39 have
38 don't 37 up 37 but 36 are 34 get
34 be 34 all 33 from 32 there 32 one
32 not 30 little 30 It 28 There's 28 just
28 ' 27 Trogdor 27 The 27 some 27 A
26 peasant 26 out 26 now 26 got 25 baby
25 at 24 He 24 already 23 That 23 says
./dump_text < responses_peasantry.txt | sort | uniq -c | sort -rn
column -x < top50.txt

View File

@ -0,0 +1,28 @@
#include <stdio.h>
#include <string.h>
int main(int argc, char **argv) {
char string[BUFSIZ];
char *result,*pointer;
while(1) {
pointer=fgets(string,BUFSIZ,stdin);
if (pointer==NULL) break;
if (string[0]=='#') continue;
result=strtok(string," .,\"\t?!");
while(1) {
if (result!=NULL) printf("%s\n",result);
else break;
result=strtok(NULL," .,\"\t?!");
}
// printf("%s",string);
}
return 0;
}

View File

@ -251,8 +251,8 @@ Your attempts at conversation are met with horse grunts and tail flaps. Which is
# (Walk in the path of Dongolev's arrows)
Hopefully this guy will have some sense and not shoot you.
# {Dongolev shoots you in the head} That
guy has no sense. He shot you. Dumb, dumb, dumb. Nice one, William Tell. You dead. Thanks for playing.
# {Dongolev shoots you in the head}
That guy has no sense. He shot you. Dumb, dumb, dumb. Nice one, William Tell. You dead. Thanks for playing.
# + haldo
the archer stops arching and turns to you. "My brother told you to tell me haldo? He must want to start the old business back up!"
# + haldo (before talking to Mendelev)
@ -507,9 +507,9 @@ He dead. He wasn't fat, he was just big boned! Poor pig-man.
'Me llamo Julio,' you begin... It seems only to further anger the already tempramental Kerrek. That stupid 'Learn Kerrek in 3 Weeks' cassette did nothing for you!
#########
##############
# Mud Puddle
#########
##############
# + (walk into puddle when raining)
Now you've done it! You're covered in sticky, albeit fine smelling, mud. Your "Scalding Lake" T-shirt is all soiled, too. You just washed it last harvest!
@ -1208,3 +1208,98 @@ Right now, you see a bunch of hay.
You used to have one, before the great item blight of 402. Check your INVENTORY to read about it.
# + look (at something currently in your inventory)
You've totally got one of those! Check your INVENTORY to give'r a serious looksee.
#################
# Inventory
#################
# arrow
Boy, you sure know how to pick
em! This arrow's kinda pointy even!!
# baby
Awww! Peasant babies are
adorable. No wonder they fetch
such a pretty penny on the black
market.
# kerrek belt
Phew! This thing stinks like all
getout. Why couldn't the Kerrek
have kidnapped a hot wench or
something that you coulda saved?
# chicken feed
Woah! Gold nuggets! Oh
wait...This is just chicken
feed. Crap.
# SuperTime FunBow TM
This is a pretty fancy bow.
You're suprised those shady
archers give away such decent
prizes. You half-expected gold
fish in a bag.
# monster maskus
Man, those pagans sure can make
a freaky lookin mask when they
want to. It's like those theatre
masks' evil uncle or something
# pebbles
Woah! Gray chicken feed! Oh
wait... those are just pebbles.
Heavier than they look, though.
# pills
The innkeeper's medication says
it's supposed to tread "general
oldness. May cause checkers
playing, hiked-up pants, and
overall pee smell."
# riches
Riches, dude. Riches. That
peasant lady totally has to
share some of this with you,
right? At least that shiny,
clawed sceptre thing.
# robe
A propa peasant robe. It smells
freshly washed and has the
initials 'N.N' sewn onto the
tag.
# soda
A full bottle of popular soda.
# meatball sub
A piping hot meatball sub fresh
from the bottom of a dingy old
well. All you need is a bag of
chips and you've got a combo
meal!
# super trinket
This super trinket is weird. It
looks like it could either kill
you or make you the hit of your
Christmas party.
# TrogHelmet
The TrogHelmet is not screwing
around. It's a serious helmet.
It also protects against
harmful UV rays.
# TrogShield
Behold the TrogSheild! No
seriously, behold it. There's
no way Trogdor's fire breath can
penetrate this thing.
# TrogSword
The TrogSword is for real.
Hands-down the coolest item in
this whole game. You can't wait
to lop off that beefy arm of
Trogdor's with this guy.
# ???
# t-shirt
This has got to be your favorite
T-Shirt ever. Oh, the times you
had at Scalding Lake. Canoeing,
fishing, stoning heathens. What
a Blast!
#
# Note, greyed out could maybe print ---- for strikethrough
You no longer has this item.
Hit return to go back to list
Press ESC or Backspace to exit

View File

@ -77,8 +77,71 @@ DONE_SONG = $8B
APPLEII_MODEL = $8C
ESC_PRESSED = $8D
GAME_STATE_0 = $90
BABY_IN_WELL=$00
TURN_WELL_CRANK=$00
TALK_TO_MENDELEV=$00
HALDO_TO_DONGELEV=$00
ARROW_BEATEN=$00
GARY_SCARED=$00
LADY_GONE=$00
TRINKET_GIVEN=$00
FISH_FED=$00 ; also implies man gone and inn open
PUDDLE_WET=$00
HAY_BALE=$00
JHONKA_OUT=$00
RAINING=$00
NIGHT=$00
POT_ON_HEAD=$00
WEARING_ROBE=$00
ON_FIRE = $00
COTTAGE_ROCK_MOVED=$00
KNUCKLES_BLEED=$00
DRESSER_OPEN=$00
NED_STATUS = $99
BUSH_STATUS = $9A ; status of bush search
KERREK_STATE = $9B
KERREK_ALIVE = $00
KERREK_DEAD = $01
KERREK_DECOMPOSING = $02
KERREK_SKELETON = $03
ARROW_SCORE = $9C ; bottom=score, top=random num needed 3-5?
SCORE_HUNDREDS = $9D
SCORE_TENS = $9E
SCORE_ONES = $9F
INVENTORY_1 = $A0
INV1_ARROW = $01
INV1_BABY = $02
INV1_KERREK_BELT = $04
INV1_CHICKEN_FEED = $08
INV1_BOW = $10
INV1_MONSTER_MASK = $20
INV1_PEBBLES = $40
INV1_PILLS = $80
INVENTORY_2 = $A1
INV2_RICHES = $01
INV2_ROBE = $02
INV2_SODA = $04
INV2_MEATBALL = $08
INV2_TRINKET = $10
INV2_TROGHELM = $20
INV2_TROGSHIELD = $40
INV2_TROGSWORD = $80
INVENTORY_3 = $A2
INV3_MAP = $01
INV3_SHIRT = $02
INVENTORY_1_GONE = $A3 ; had item, but now it's gone
INVENTORY_2_GONE = $A4
INVENTORY_3_GONE = $A5
; D0-D? used by HGR?
INPUT_X = $C0
BOX_X1L = $C1
@ -90,6 +153,8 @@ BOX_Y2 = $C6
SAVED_Y1 = $C7
SAVED_Y2 = $C8
; D0-D? used by HGR?
WHICH_SLOT = $DA
CURRENT_DISK = $DC
HGR_COLOR = $E4