AWKenture
Vor längerem habe ich ein wenig AWK Know-How aufgebaut und es in ein kleines Text-Adventure fliessen lassen.
Viel Spaß dabei....
"AWKenture" vollständig lesen
Viel Spaß dabei....
#!/usr/bin/gawk -f
#Aufruf von der Kommandozeile mit "./prog.awk prog.dat"
#11-07-2007
BEGIN{
printf("\f\n--
Herzlich Wilkommen zum AKWenture.\n Benutze: look - look bag -
get - nosw - help\n\n")
bag[0]=2
# bag-Array beschreibt Gegenstaende im Inventar
bag[1]="Wuerfel"
# bag[0]=Anzahl der Gegenstaende im Inventar
bag[2]="Muenze"
# bag[x]=[Objekt]
items[1,0]=4 # items-Array
beschreibt Gegenstaende pro Raum items[<raumnr.>,"<itemnr.>"]=item
items[1,1]="Kaugummi" # an
Position items[x,0] steht immer die Anzahl der Gegenstaende im Raum x.
items[1,2]="Schraube"
items[1,3]="Feder"
items[1,4]="rostiger
Schluessel"
items[2,0]=2
items[2,1]="Visier"
items[2,2]="Vogel"
items[3,0]=1
items[3,1]="Klavier"
"AWKenture" vollständig lesen