Quellcode der Dragonslayer-Edition
Quellcode der Dragonslayer-Edition: 0.9.7(DS V3) Ithil-Edition


Anmerkung: Dies ist nur ein Auszug aus dem Source. Ein etwas älteres, abgespecktes Release der Dragonslayer-Edition ist für jeden Interessenten frei zum Download verfügbar. Was wir uns unbedingt verbitten, ist Diebstahl unserer Arbeit ohne Nennung des Copyrights.
Falls beim Lesen des Source ein Bug entdeckt werden sollte, bitten wir um sofortige Meldung per Anfrage!


./special/darkhorse.php

zurück
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
84:
85:
86:
87:
88:
89:
90:
91:
92:
93:
94:
95:
96:
97:
98:
99:
100:
101:
102:
103:
104:
105:
106:
107:
108:
109:
110:
111:
112:
113:
114:
115:
116:
117:
118:
119:
120:
121:
122:
123:
124:
125:
126:
127:
128:
129:
130:
131:
132:
133:
134:
135:
136:
137:
138:
139:
140:
141:
142:
143:
144:
145:
146:
147:
148:
149:
150:
151:
152:
153:
154:
155:
156:
157:
158:
159:
160:
161:
162:
163:
164:
165:
166:
167:
168:
169:
170:
171:
172:
173:
174:
175:
176:
177:
178:
179:
180:
181:
182:
183:
184:
185:
186:
187:
188:
189:
190:
191:
192:
193:
194:
195:
196:
197:
198:
199:
200:
201:
202:
203:
204:
205:
206:
207:
208:
209:
210:
211:
212:
213:
214:
215:
216:
217:
218:
219:
220:
221:
222:
223:
224:
225:
226:
227:
228:
229:
230:
231:
232:
233:
234:
235:
236:
237:
238:
239:
240:
241:
242:
243:
244:
245:
246:
247:
248:
249:
250:
251:
252:
253:
254:
255:
256:
257:
258:
259:
260:
261:
262:
263:
264:
265:
266:
267:
268:
269:
270:
271:
272:
273:
274:
275:
276:
277:
278:
279:
280:
281:
282:
283:
284:
285:
286:
287:
288:
289:
290:
291:
292:
293:
294:
295:
296:
297:
298:
299:
300:
301:
302:
303:
304:
305:
306:
307:
308:
309:
310:
311:
312:
313:
314:
315:
316:
317:
318:
319:
320:
321:
322:
323:
324:
325:
326:
327:
328:
329:
330:
331:
332:
333:
334:
335:
336:
337:
338:
339:
340:
341:
342:
343:
344:
345:
346:
347:
348:
349:
350:
351:
352:
353:
354:
355:
356:
357:
358:
359:
360:
361:
362:
363:
364:
365:
366:
367:
368:
369:
370:
371:
372:
373:
374:
375:
376:
377:
378:
379:
380:
381:
382:
383:
384:
385:
386:
387:
388:
389:
390:
391:
392:
393:
394:
395:
396:
397:
398:
399:
400:
401:
402:
403:
404:
405:
406:
407:
408:
409:
410:
411:
412:
413:
414:
415:
416:
417:
418:
419:
420:
421:
422:
423:
424:
425:
426:
427:
428:
429:
430:
431:
432:
433:
434:
435:
436:
437:
438:
439:
440:
441:
442:
443:
444:
445:
446:
447:
448:
449:
450:
451:
452:
453:
454:
455:
456:
457:
458:
459:
460:
461:
462:
463:
464:
465:
466:
467:
468:
469:
470:
471:
472:
473:
474:
475:
476:
477:
478:
479:
480:
481:
482:
483:
484:
485:
486:
487:
488:
489:
490:
491:
492:
493:
494:
495:
496:
497:
498:
499:
500:
501:
502:
503:
504:
505:
506:
507:
508:
509:
510:
511:
512:
513:
514:
515:
516:
517:
518:
519:
520:
521:
522:
523:
524:
525:
526:
527:
528:
529:
530:
531:
532:
533:
534:
535:
536:
537:
538:
539:
540:
541:
542:
543:
544:
545:
546:
547:
548:
549:
550:
551:
552:
553:
554:
555:
556:
557:
558:
559:
560:
561:
562:
563:
564:
565:
566:
567:
568:
569:
570:
571:
572:
573:
574:
575:
576:
577:
578:
579:
580:
581:
582:
583:
584:
585:
586:
587:
588:
589:
590:
591:
592:
593:
594:
595:
596:
597:
598:
599:
600:
601:
602:
603:
604:
605:
606:
607:
608:
609:
610:
611:
612:
613:
614:
615:
616:
617:
618:
619:
620:
621:
622:
623:
624:
625:
626:
627:
628:
629:
630:
631:
632:
633:
634:
635:
636:
637:
638:
639:
640:
641:
642:
643:
644:
645:
646:
647:
648:
649:
650:
651:
652:
653:
654:
655:
656:
657:
658:
659:
660:
661:
662:
663:
664:
665:
666:
667:
668:
669:
670:
671:
672:
673:
674:
675:
676:
677:
678:
679:
680:
681:
682:
683:
684:
685:
686:
687:
688:
689:
690:
691:
692:
693:
694:
695:
696:
697:
698:
699:
700:
701:
702:
703:
704:
705:
706:
707:
708:
709:
710:
711:
712:
713:
714:
715:
716:
717:
718:
719:
720:
721:
722:
723:
724:
725:
726:
727:
<?php

// 13082004

if (!isset($session))
{
    exit();
}
// The addition of the commentary is handled by the forest.php
// addcommentary();
output("`c`b`7Dark Horse Taverne`b`c",true);
$session['user']['specialinc']="darkhorse.php";
switch (
$_GET['op'])
{
case 
'tavern':
    
checkday();
    
addcommentary();
    
output('`(Du stehst in der Nähe des Eingangs und beobachtest das Geschehen vor dir. Während es in den meisten Tavernen laut und rauh zugeht, ist diese hier erstaunlich ruhig und fast leer. In einer Ecke spielt ein alter Mann mit einigen Würfeln. Du bemerkst, dass Abenteurer, die diesen Platz gefunden haben, Botschaften in die Tische geritzt haben. Hinter der Theke humpelt ein alter Mann herum und poliert Gläser - obwohl niemand hier zu sein scheint, der sie benutzen würde.
    `nSeitlich in einer Nische siehst du einen rundlichen Kerl hinter einem knisternden Grill stehen. '
);
    
viewcommentary("darkhors","Sprechen",5,"spricht");
    
addnav('Rede mit dem alten Mann','forest.php?op=oldman');
    
addnav('Rede mit dem Barkeeper','forest.php?op=bartender');
    
//addnav('Untersuche die Tische','forest.php?op=tables');
    
addnav('Zox\'s Grill','forest.php?op=grill');
    
addnav('Verlasse die Taverne','forest.php?op=leave');
    
$session['user']['specialinc']='darkhorse.php';
    break;

case 
'tables':
    
output('Du untersuchst die Schnitzereien in den Tischen:`n`n');
    
viewcommentary('darkhorse','Ritze etwas in die Tische:',10,'ritzte');
    
addnav('Zurück zur Taverne','forest.php?op=tavern');
    break;

case 
'grill':
    
addnav('Zurück zur Taverne','forest.php?op=tavern');
    
$scost $session['user']['level']*25;
    
$ccost $session['user']['level']*11;
    
$zcost $session['user']['level']*8;
    if (
$_GET['what']=='steak')
    {
        if (
$session['user']['gold'] >= $scost && $session['user']['turns']>0)
        {
            switch (
e_rand(1,2))
            {
            case 
1:
                
output('`@Das hat gut getan! Du fühlst dich erfrischt. Du erhältst einen Waldkampf und deine Wunden heilen etwas.`n`n');
                
$session['user']['turns']+=1;
                
$session['user']['hitpoints'] += e_rand(2,5*$session['user']['level']);
                if (
$session['user']['hitpoints'] > $session['user']['maxhitpoints'])
                {
                    
$session['user']['hitpoints'] = $session['user']['maxhitpoints'];
                }
                
$session['user']['gold']-=$scost;
                break;
            case 
2:
                
output('`@Das hat gut getan! Aber jetzt fühlst du dich voll. Du verlierst einen Waldkampf aber deine Wunden heilen etwas.`n`n');
                
$session['user']['turns']-=1;
                
$session['user']['hitpoints'] += e_rand(2,5*$session['user']['level']);
                if (
$session['user']['hitpoints'] > $session['user']['maxhitpoints'])
                {
                    
$session['user']['hitpoints'] = $session['user']['maxhitpoints'];
                }
                
$session['user']['gold']-=$scost;
                break;
            }
        }
        else if (
$session['user']['turns']<=0)
        {
            
output('So kurz vor dem Schlafengehen solltest du nichts mehr essen. Komm morgen wieder vorbei.');
            
addnav('Zurück zum Grill','forest.php?op=grill');
        }
        else
        {
            
output('Das kannst du dir nicht leisten.');
            
addnav('Zurück zum Grill','forest.php?op=grill');
        }
    }
    else if (
$_GET['what']=='cheese')
    {
        if (
$session['user']['gold'] >= $ccost && $session['user']['turns']>0)
        {
            switch (
e_rand(1,3))
            {
            case 
1:
                
output("`@Das hat gut getan! Du fühlst dich erfrischt. Du erhältst einen Waldkampf.`n`n");
                
$session['user']['turns']+=1;
                
$session['user']['gold']-=$ccost;
                break;
            case 
2:
                
output('`@Das hat gut getan! Aber jetzt fühlst du dich voll. Du verlierst einen Waldkampf.`n`n');
                
$session['user']['turns']-=1;
                
$session['user']['gold']-=$ccost;
                break;
            case 
3:
                
output("`@Das hat gut getan!`n`n");
                
$session['user']['gold']-=$ccost;
                break;
            }
        }
        else if (
$session['user']['turns']<=0)
        {
            
output('So kurz vor dem Schlafengehen solltest du nichts mehr essen. Komm morgen wieder vorbei.');
            
addnav('Zurück zum Grill','forest.php?op=grill');
        }
        else
        {
            
output('Das kannst du dir nicht leisten.');
            
addnav('Zurück zum Grill','forest.php?op=grill');
        }
    }
    else if (
$_GET['what']=='soda')
    {
        if (
$session['user']['gold'] >= $zcost && $session['user']['turns']>0)
        {
            switch (
e_rand(1,2))
            {
            case 
1:
                
output('`@Das hat gut getan!`n`n');
                
$session['user']['gold']-=$zcost;
                break;
            case 
2:
                
output('`@Das hat gut getan! Deine Wunden heilen etwas.`n`n');
                
$session['user']['hitpoints'] += e_rand(2,3*$session['user']['level']);
                if (
$session['user']['hitpoints'] > $session['user']['maxhitpoints'])
                {
                    
$session['user']['hitpoints'] = $session['user']['maxhitpoints'];
                }
                
$session['user']['gold']-=$zcost;
                break;
            }
        }
        else if (
$session['user']['turns']<=0)
        {
            
output('So kurz vor dem Schlafengehen solltest du nichts mehr trinken. Komm morgen wieder vorbei.');
            
addnav('Zurück zum Grill','forest.php?op=grill');
        }
        else
        {
            
output('Das kannst du dir nicht leisten.');
            
addnav('Zurück zum Grill','forest.php?op=grill');
        }
    }
    else
    {
        
output('`7Der Geruch von Käse und Steaks steigt dir in die Nase, als du näher kommst. Beim Lesen des Menüs läuft dir das Wasser im Mund zusammen.`n`n');
        
addnav('Menü');
        
addnav('Hackfleisch, mit Käse überbacken (`^'.$ccost.' Gold`0)','forest.php?op=grill&what=cheese');
        
addnav('Steak im Brötchen (`^'.$scost.' Gold`0)','forest.php?op=grill&what=steak');
        
addnav('Zox-Soda (`^'.$zcost.' Gold`0)','forest.php?op=grill&what=soda');
    }
    break;

case 
'bartender':
    if (
$_GET['what']=='')
    {
        
output('`(Der runzelige alte Mann an der Bar erinnert dich stark an eine Scheibe Rindfleisch.`n`n
        "`7Schag, wasch kann ich für dich tun, '
.($session['user']['sex']?'Mädchen':'mein Schohn').'?`("  spricht der Zahnlose. "`7Schehe die Wünsche deineschgleichen nicht alltschuoft hier.`("');
        
addnav('Etwas über die Feinde lernen','forest.php?op=bartender&what=enemies');
        
addnav('Farbenlehre','forest.php?op=bartender&what=colors');
        if (
access_control::is_superuser())
        {
            
addnav('Gefühle (SU)','forest.php?op=bartender&what=emotes');
        }
        
//addnav('Buy swill','forest.php?op=bartender&what=swill');
        
addnav('Das goldene Ei','forest.php?op=bartender&what=egg');
    }
    else if (
$_GET['what']=="egg")
    {
        
output('`(\'`7Schoscho, du willscht alscho etwasch über dasch goldene Ei wischen.`nNun, dasch ischt eine uralte Legende. Esch heischt, wer ein goldnesch Ei beschitscht, kann dem Tod entkommen. Auscherdem scholl dieschesch Ei der Schlüschel tschu einer Heilerin namensch Golinda schein. Ich glaube ja nicht daran.');
        if (
getsetting('hasegg',0)==0)
        {
            
output(' Niemand hat dasch Ei jemalsch gefunden.');
        }
        else
        {
            
$sql "SELECT name,sex FROM accounts WHERE acctid = ".getsetting("hasegg",0);
            
$result db_query($sql);
            
$row db_fetch_assoc($result);
            
output('`(" Er beginnt zu flüstern: "`7Aber esch geht dasch Gerücht um, dasch `^'.$row['name'].' `7genau dieschesch Ei gefunden haben scholl. Wenn du mich fragscht, ich würde '.$row['name'].' `7schogar töten und '.($row['sex']?'ihr':'ihm').' dasch Ei wegnehmen, um dasch herauschtschufinden, wenn ich könnte...');
        }
        
output('`("');
        if (
$session['user']['acctid']==getsetting("hasegg",0))
        {
            
output('`n`nDu ziehst dich zurück, ohne den Mann in Versuchung zu bringen, dir das Ei wegnehmen zu wollen. An einem Tisch ausser Sichtweite untersuchst du das Ei und entdeckst seltsame Botschaften...`n`n`n');
            
viewcommentary('goldenegg','Botschaft hinterlassen:',10,'');
        }
    }
    else if (
$_GET['what']=='swill')
    {
        
    }
    else if (
$_GET['what']=='colors')
    {
        
        
output('`(Der alte Mann stützt sich auf die Theke. "`%Scho, du willscht alscho wasch über Farben wischen?`(" Du willst gerade antworten, als du gerade noch merkst, daß das eine rhetorische Frage war. Er fährt fort: "`%Um farbig tschu sprechen, mache folgendesch. Zuerscht benutsche das &#0096; Tscheichen (Shift und die Taste links neben Backspace), gefolgt von den Kodierungen, die du auch in deinem Profil schehen kannscht. Jedesch diescher Zeichen entspricht einer Farbe.`% kapiert?`("`n Hier kannscht du teschten:');
        
output("<form action=\"$REQUEST_URI\" method='POST'>",true);
        
output("Deine Eingabe`n",true);
        
output("sieht so aus: ");
        
rawoutput(js_preview('testtext').'<br />');
        
output("<input name='testtext' id='testtext'></form>",true);
        
output('`(`n`nDu kannst diese Farben in jedem Text verwenden, den du eingibst.');
        
    }
    else if (
$_GET['what']=='emotes')
    {
        
output('`(Der alte Mann stützt sich auf die Theke. "`%Scho, du willscht alscho wischen wie Du Deine Gefühle auschdrücken kanscht?`(" Du willst gerade antworten, als du gerade noch merkst, daß das eine rhetorische Frage war. Er fährt fort: "`%Um etwasch zu schagen wasch Deine Gefühle auschdrückt, muscht Du eines der folgenden Kommandosch eingeben`n`(
        Tippe /sit , um "'
.$session['user']['name'].' setzt sich hin", zu sagen.`n
        Tippe /laugh , um "'
.$session['user']['name'].' lacht", zu sagen.`n
        Tippe /hit , um "'
.$session['user']['name'].' schlägt um sich", zu sagen.`n
        Tippe /grin , um "'
.$session['user']['name'].' grinst", zu sagen.`n
        Tippe /wave , um "'
.$session['user']['name'].' winkt", zu sagen.`n
        Tippe /jump , um "'
.$session['user']['name'].' springt", zu sagen.`n
        Tippe /no , um "'
.$session['user']['name'].' schüttelt den Kopf", zu sagen.`n
        Tippe /doh , um "'
.$session['user']['name'].' schlägt sich an den Kopf", zu sagen.`n
        Tippe /clap , um "'
.$session['user']['name'].' klatscht", zu sagen.`n
        Tippe /afk oder /away , um "'
.$session['user']['name'].' ist schnell weg", zu sagen.`n
        Tippe /gratz , um "'
.$session['user']['name'].' gratuliert", zu sagen.`n
        Tippe /bow , um "'
.$session['user']['name'].' verbeugt sich", zu sagen.`n
        Tippe /yes , um "'
.$session['user']['name'].' nickt", zu sagen.`n
        Tippe /help , um "'
.$session['user']['name'].' braucht hilfe", zu sagen.`n
        Tippe /beg , um "'
.$session['user']['name'].' bettelt", zu sagen.`n
        Tippe /cheer , um "'
.$session['user']['name'].' jubelt", zu sagen.`n
        Tippe /kneel , um "'
.$session['user']['name'].' kniet sich nieder", zu sagen.`n
        Tippe /bored um "'
.$session['user']['name'].' ist gelangweilt", zu sagen.`n
        Tippe /moan um "'
.$session['user']['name'].' seufzt", zu sagen.`n
        Tippe /roar , um "'
.$session['user']['name'].' brüllt", zu sagen.`n
        Tippe /sorry , um "'
.$session['user']['name'].' entschuldigt sich", zu sagen.`n
        `% kapiert?`("
        `n`nDies kannst Du in jedem Text verwenden, den du eingibst.'
);
        
addnav('',$REQUEST_URI);
    }
    else if (
$_GET['what']=='enemies')
    {
        if (
$_GET['who']=='')
        {
            
output('"`7Scho, du willscht alscho etwasch über deine Feinde erfahren, ja? Über wen willscht du wasch wischen? Nun? Schag schon! Esch koschtet nur `^100`7 Gold pro Information über eine Perschon.`("');
            if (
$_GET['subop']!='search')
            {
                
output("<form action='forest.php?op=bartender&what=enemies&subop=search' method='POST'><input name='name'><input type='submit' class='button' value='Suchen'></form>",true);
                
addnav('','forest.php?op=bartender&what=enemies&subop=search');
            }
            else
            {
                
addnav('Neue Suche','forest.php?op=bartender&what=enemies');
                
                
$_POST['name'] = stripslashes($_POST['name']);
                
                
$search str_create_search_string($_POST['name']);
                
                
$sql 'SELECT acctid,name,level 
                    FROM accounts 
                    WHERE (locked=0 AND name LIKE "'
.$search.'") 
                    ORDER BY (login="'
.db_real_escape_string($_POST['name']).'") DESC, level DESC';
                
$result db_query($sql);
                
$max db_num_rows($result);
                if (
$max 100)
                {
                    
output('`n`n"`7Hey, wasch glaubscht du tuscht du hier? Dasch schind tschu viele Namen. Ich werd dir nur über ein paar davon wasch ertschählen.`("`n');
                    
$max 100;
                }
                
$str_output='<table border=0 cellpadding=0>
                <tr class="trhead">
                <th>Name</th>
                <th>Level</th>
                </tr>'
;
                for (
$i=0$i<$max$i++)
                {
                    
$row db_fetch_assoc($result);
                    
$str_output.='<tr class="'.($i%2?'trlight':'trdark').'">
                    <td><a href="forest.php?op=bartender&what=enemies&who='
.$row['acctid'].'">'.$row['name'].'</a></td>
                    <td align="center">'
.$row['level'].'</td>
                    </tr>'
;
                    
addnav("","forest.php?op=bartender&what=enemies&who=".$row['acctid']);
                }
                
output($str_output.'</table>',true);
            }
        }
        else
        {
            if (
$session['user']['gold']>=100)
            {
                
$sql "SELECT    acctid,a.name,alive,location,maxhitpoints,gold,sex,level,weapon,armor,attack,defence,r.colname,charm
                FROM accounts a
                LEFT JOIN races r ON r.id = a.race
                WHERE acctid=\""
.$_GET['who']."\"";
                
$result db_query($sql);
                if (
db_num_rows($result)>0)
                {
                    
$row db_fetch_assoc($result);
                    
$row['name']=str_replace('s','sch',$row['name']);
                    
$row['armor']=str_replace('s','sch',$row['armor']);
                    
$row['weapon']=str_replace('s','sch',$row['weapon']);
                    
output('\'`7Nun ... mal schehen wasch ich über '.$row['name'].'`7 weisch...`(\'`n`n
                    `4`bName:`b`6 '
.$row['name'].'`n
                    `4`bRasse:`b '
.$row['colname'].'`n
                    `n`4`bLevel:`b`6 '
.$row['level'].'`n
                    `4`bLebenspunkte:`b`6 '
.$row['maxhitpoints'].'`n
                    `4`bGold:`b`6 '
.$row['gold'].'`n
                    `4`bWaffe:`b`6 '
.$row['weapon'].'`n
                    `4`bRüstung:`b`6 '
.$row['armor'].'`n
                    `4`bAngriffswert:`b`6 '
.$row['attack'].'`n
                    `4`bVerteidigung:`b`6 '
.$row['defence'].'`n
                    `n`7Auscherdem ischt '
.$row['name'].' `7');
                    
$amt=$session['user']['charm'];
                    if (
$amt==$row['charm'])
                    {
                        
output('dir schehr ähnlich.`n');
                    }
                    else if (
$amt-10>$row['charm'])
                    {
                        
output('`bviel`b häschlicher alsch du!`n');
                    }
                    else if (
$amt>$row['charm'])
                    {
                        
output('häschlicher alsch du.`n');
                    }
                    else if (
$amt+10<$row['charm'])
                    {
                        
output('`bviel`b schöner alsch du!`n');
                    }
                    else
                    {
                        
output('schöner alsch du.`n');
                    }
                    
$session['user']['gold']-=100;
                    if (
$session['user']['gold']>=150)
                    {
                        
output('`7Wenn du nochmal `^150`7 Gold drauflegscht, schag ich dir schogar, wo schich '.$row['name'].'`7 aufhält.`(\'');
                        
addnav('Aufenthaltsort (`^150`( Gold)','forest.php?op=bartender&what=where&who='.$row['acctid']);
                    }
                    
                }
                else
                {
                    
output('"`7Hä? Ich kenne niemanden mit dieschem Namen.`("');
                }
            }
            else
            {
                
output('"`7Nun ... mal schehen wasch ich über Geitschkragen wie dich allesch weisch...`("`n`n
                `4`bName:`b`6 Ohnemo Snixlos`n
                `4`bLevel:`b`6 Ganz unten`n
                `4`bLebenspunkte:`b`6 Möglicherweische mehr alsch du`n
                `4`bGold:`b`6 Gantsch schicher mehr alsch du`n
                `4`bWaffe:`b`6 Etwasch, dasch gut genug ischt, dich ungespitscht in den Boden tschu rammen`n
                `4`bRüstung:`b`6 Kleidschamer alsch deine`n
                `4`bAngriffswert:`b`6 Drölf Milliarden`n
                `4`bVerteidigung:`b`6 Super Duper`n'
);
            }
        }
    }
    else if (
$_GET['what']=='where')
    {
        
$sql='SELECT acctid,name,location,loggedin,laston,alive,house,activated,restatlocation FROM accounts WHERE acctid='.$_GET['who'];
        
$result db_query($sql);
        
$row db_fetch_assoc($result);
        
$loggedin user_get_online(0,$row);
        if (
$row['location']==USER_LOC_FIELDS)
        {
            
$loc=($loggedin?'Online':'in den Feldern');
        }
        elseif (
$row['location']==USER_LOC_INN)
        {
            
$loc='in einem Zimmer in der Kneipe';
        }
        elseif (
$row['location']==USER_LOC_PRISON)
        {
            
$loc='im Knascht';
        }
        elseif (
$row['location']==USER_LOC_VACATION)
        {
            
$loc='dasch Dorf in Rischtung Oschten verlassend';
        }
        
// part from houses.php
        
elseif ($row['location']==USER_LOC_HOUSE)
        {
            
            
$hid=$row['restatlocation'];
            
            
$sql="SELECT status FROM houses WHERE houseid=$hid";
            
$result3 db_query($sql);
            
$row3 db_fetch_assoc($result3);
            
$loc2$row3['status'];
            
            if ((
$loc2<30) || ($loc2>39))
            {
                
$loc='im Hausch Nummer '.($hid);
            }
            else 
// Versteck, Refugium etc..
            
{
                
$loc='an einem geheimen Ort';
            }
        }
        
// end houses
        
output('"`7'.$row[name].'`7 wurde zuletzt '.$loc.' geschehen'.($row['alive']?'':', ischt inzwischen aber ... geschtorben ... worden').'!`("');
        
$session['user']['gold']-=150;
    }
    
addnav('Zurück zur Taverne','forest.php?op=tavern');
    break;

case 
'oldman':
    
addnav('Alter Mann');
    switch (
$_GET['game'])
    {
    case 
'':
        
checkday();
        
output('`(Der alte Mann schaut mit tiefliegenden und hohlen Augen zu dir auf. Seine roten Augen lassen darauf schließen, dass er erst kürzlich geweint hat, deswegen fragst du ihn, was geschehen ist.
        `n"`7Ach, Ich hab nen Abenteurer im Wald getroffen und hab gedacht ich spiel n kleines Spiel mit '
.($session['user']['sex']?'ihr':'ihm').', aber '.($session['user']['sex']?'sie':'er').' hat immer gewonnen und mir fast mein ganzen Gold aus der Tasche gezogen.
        `n`nSag, würdest du einem alten Mann den Gefallen tun und ihn versuchen lassen, etwas von dem Gold von dir zurückzugewinnen? Ich kenne mehrere Spiele!`("'
);
        
$session['user']['specialinc']='darkhorse.php';
        
$session['user']['specialmisc']='';
        
addnav('W?Würfelspiel','forest.php?op=oldman&game=dice');
        
addnav('S?Steinchenspiel','forest.php?op=oldman&game=stones');
        
//addnav('Glücksspiel','stonesgame.php');
        
        
addnav('Zurück zur Taverne','forest.php?op=tavern');
        break;
    case 
'stones':
        
$stones unserialize($session['user']['specialmisc']);
        if (!
is_array($stones))
        {
            
$stones = array();
        }
        if (
$_GET['side']=='likepair')
        {
            
$stones['side']='likepair';
        }
        if (
$_GET['side']=='unlikepair')
        {
            
$stones['side']='unlikepair';
        }
        if (isset(
$_POST['bet']))
        {
            
$stones['bet']=min($session['user']['gold'],abs((int)$_POST['bet']));
        }
        if (
$stones['side']=="")
        {
            
output('`3Der alte Mann erklärt sein Spiel: "`7Ich habe einen Beutel mit 6 roten und 10 blauen Steinen darin. Du kannst zwischen \'gleiches Paar\' und \'ungleiches Paar\' wählen. Ich werde dann jedesmal 2 Steine ziehen. Wenn sie die selbe Farbe haben, bekommt der die Steine, der \'gleiches Paar\' getippt hat, ansonsten bekommt sie der von uns, der \'ungleiches Paar\' getippt hat. Wer am ende die meisten Steine hat, gewinnt. Wenn wir Gleichstand haben, gewinnt keiner von uns.`3"');
            
addnav('Lieber nicht','forest.php?op=oldman');
            
addnav('Gleiches Paar','forest.php?op=oldman&game=stones&side=likepair');
            
addnav('Ungleiches Paar','forest.php?op=oldman&game=stones&side=unlikepair');
            
$stones['red']=6;
            
$stones['blue']=10;
            
$stones['player']=0;
            
$stones['oldman']=0;
        }
        else if (
$stones['bet']==0)
        {
            
output('`3\'`7'.($stones['side']=='likepair'?'Gleiches Paar für dich, dann ist ein ungleiches ':'Ungleiches Paar für dich, dann ist ein gleiches ').' Paar für mich! Wie hoch ist dein Einsatz?`3\'');
            
output("<form action='forest.php?op=oldman&game=stones' method='POST'><input name='bet' id='bet'><input type='submit' class='button' value='Setzen'></form>",true);
            
output("<script language='JavaScript'>document.getElementById('bet').focus();
            </script>"
,true);
            
addnav('','forest.php?op=oldman&game=stones');
            
addnav('Lieber nicht','forest.php?op=oldman');
        }
        else if (
$stones['red']+$stones['blue'] > && $stones['oldman']<=&& $stones['player']<=8)
        {
            
$s1='';
            
$s2='';
            
$rstone '`$rot`3';
            
$bstone '`!blau`3';
            while (
$s1=='' || $s2=='')
            {
                
$s1 e_rand(1,($stones['red']+$stones['blue']));
                if (
$s1<=$stones['red'])
                {
                    
$s1=$rstone;
                    
$stones['red']--;
                }
                else
                {
                    
$s1=$bstone;
                    
$stones['blue']--;
                }
                if (
$s2=="")
                {
                    
$s2=$s1;
                    
$s1="";
                }
            }
            
output('`3Der alte Mann greift in seinen Beutel und nimmt 2 Steine heraus. Sie sind '.$s1.' und '.$s2.'.  Deine Wette ist `^'.$stones['bet'].'`3.`n`n');
            if (
$stones['side']=='likepair')
            {
                
output('Da du auf ein gleiches Paar getippt hast, ');
                if (
$s1==$s2)
                {
                    
output('schiebt der alte Mann dir die Steine zu.');
                    
$stones['player']+=2;
                }
                else
                {
                    
output('legt der alte Mann die Steine auf seine Seite.');
                    
$stones['oldman']+=2;
                }
            }
            else
            {
                
output('Da du auf ein ungleiches Paar getippt hast, ');
                if (
$s1==$s2)
                {
                    
output('legt der alte Mann die Steine auf seine Seite.');
                    
$stones['oldman']+=2;
                }
                else
                {
                    
output('schiebt der alte Mann dir die Steine zu.');
                    
$stones['player']+=2;
                }
            }
            
output('`n`nDu hast momentan `^'.$stones['player'].'`3 Steine in deinem Haufen und der alte Mann hat `^'.$stones['oldman'].'`3 Steine.
            `n`nEs sind noch '
.$stones['red'].' '.$rstone.'e Steine und '.$stones['blue'].' '.$bstone.'e Steine im Beutel.');
            
addnav('Weiter','forest.php?op=oldman&game=stones');
        }
        else
        {
            if (
$stones['player']>$stones['oldman'])
            {
                
output('`3Du hast den alten Mann besiegt und verlangst deine `^'.$stones['bet'].'`3 Gold.');
                
$session['user']['gold']+=$stones['bet'];
            }
            else if (
$stones['player']<$stones['oldman'])
            {
                
output('`3Der alte Mann hat dich besiegt und fordert nun seine `^'.$stones['bet'].'`3 Gold.');
                
$session['user']['gold']-=$stones['bet'];
            }
            else
            {
                
output('`3Ihr habt einen Gleichstand erreicht. Niemand gewinnt.');
            }
            
$stones=array();
            
addnav('Nochmal spielen?','forest.php?op=oldman&game=stones');
            
addnav('Andere Spiele','forest.php?op=oldman');
            
addnav('Zurück zur Taverne','forest.php?op=tavern');
        }
        
$session['user']['specialmisc']=serialize($stones);
        break;
    case 
'guess':
        if (
$session['user']['gold']>0)
        {
            
$bet abs((int)$_GET['bet'] + (int)$_POST['bet']);
            if (
$bet<=0)
            {
                
output('`3"`!Ich denke mir eine Zahl aus und du hast 6 Versuche, diese Zahl zwischen 1 und 100 zu erraten. Ich werde dir immer sagen, ob dein Versuch zu hoch oder zu niedrig war.`3"`n`n
                `3"`!Wie hoch ist ein Einsatz, '
.($session['user']['sex']?'junge Dame':'junger Mann').'?`3"');
                
output("<form action='forest.php?op=oldman&game=guess' method='POST'><input name='bet'><input type='submit' class='button' value='Setzen'></form>",true);
                
addnav('','forest.php?op=oldman&game=guess');
                
$session['user']['specialmisc']=e_rand(1,100);
            }
            else if (
$bet>$session['user']['gold'])
            {
                
output('`3Der alte Mann streckt seinen Stock aus und klopft damit deinen Goldbeutel ab. \'`!Ich glaub nicht, daß da `^'.$bet.'`! Gold drin ist!`3\', erklärt er.`n`n
                Verzweifelt versuchst du ihm deinen guten Willen zu zeigen und kippst den Beutelinhalt auf den Tisch: `^'
.$session['user']['gold'].'`3 Gold.
                `n`nVerlegen kehrst du zur Taverne zurück.'
);
                
addnav('Zurück zur Taverne','forest.php?op=tavern');
            }
            else
            {
                if (
$_POST['guess']!==NULL)
                {
                    
$try = (int)$_GET['try'];
                    if (
$_POST['guess']==$session['user']['specialmisc'])
                    {
                        if (
$try == 1)
                        {
                            
output('`3"`!UNGLAUBLICH`3", schreit der alte Mann, "`!Du hast meine Zahl mit nur `^einem Versuch`! erraten! Nun, ich gratuliere dir. Ich bin stark beeindruckt. Es ist gerade so, als ob du meine Gedanken lesen könntest.`3" Er schaut dich misstrauisch eine Weile an und überlegt, ob er sich mit deinem Gewinn einfach aus dem Staub machen soll, erinnert sich dann aber an deine scheinbaren geistigen Kräfte und händigt dir deine `^'.$bet.'`3 Gold aus.');
                        }
                        else
                        {
                            
output('`3"`!AAAH!!!!`3", schreit der alte Mann, "`!Du hast die Zahl mit nur '.$try.' Versuchen erraten!  Es war `^'.$session['user']['specialmisc'].'`!!!  Nun, ich gratuliere dir und denke ich werde jetzt besser gehen... `3" Er steht auf und will zur Tür gehen, doch mit einem sanften Schlag mit '.$session['user']['weapon'].' drückst du ihn zurück auf seinen Stuhl. Du hilfst dem Mann dabei, dir die `^'.$bet.'`3 Goldmünzen zu geben, die er dir schuldet.');
                        }
                        
$session['user']['gold']+=$bet;
                        
$session['user']['specialinc']='darkhorse.php';
                        
addnav('Zurück zur Taverne','forest.php?op=tavern');
                    }
                    else
                    {
                        if (
$_GET['try']>=6)
                        {
                            
output('`3Der Mann gluckst vor Freude: "`!Die Zahl war `^'.$session['user']['specialmisc'].'`!`3"
                            `nAls der ehrenwerte Bürger, der du bist, gibst du dem Mann die `^'
.$bet.'`3 Goldmünzen, die du ihm schuldest, bereit, ihn zu verlassen.');
                            
$session['user']['specialinc']='darkhorse.php';
                            
$session['user']['gold']-=$bet;
                            
addnav('Zurück zur Taverne','forest.php?op=tavern');
                        }
                        else
                        {
                            if ((int)
$_POST['guess']>$session['user']['specialmisc'])
                            {
                                
output('`3"`!Nop, nicht `^'.(int)$_POST['guess'].'`!,meine Zahl ist kleiner als das!  Das war dein `^'.$try.'`!ter Versuch.`3"`n`n');
                            }
                            else
                            {
                                
output('`3"`!Nop, nicht `^'.(int)$_POST['guess'].'`!, meine Zahl ist größer als das!  Das war dein `^'.$try.'`!ter Versuch.`3"`n`n');
                            }
                            
output('`3Du hast `^'.$bet.'`3 Gold gesetzt.  Was schätzt du?');
                            
output("<form action='forest.php?op=oldman&game=guess&bet=$bet&try=".(++$try)."' method='POST'><input name='guess'><input type='submit' class='button' value='Rate'></form>",true);
                            
addnav("","forest.php?op=oldman&game=guess&bet=$bet&try=$try");
                        }
                    }
                }
                else
                {
                    
output('`3Du hast `^'.$bet.'`3 Gold gesetzt.  Was schätzt du?');
                    
output("<form action='forest.php?op=oldman&game=guess&bet=$bet&try=1' method='POST'><input name='guess'><input type='submit' class='button' value='Rate'></form>",true);
                    
addnav("","forest.php?op=oldman&game=guess&bet=$bet&try=1");
                }
            }
        }
        else
        {
            
output('`3Der alte Mann streckt seinen Stock aus und klopft deinen Goldbeutel ab. "`!Leer?!?! Wie kannst du etwas setzen ohne Gold??`3", brüllt er. Damit wendet er sich wieder seinen Würfeln zu. Seinen Ärger hat er offensichtlich schon wieder vergessen.');
            
addnav('Zurück zur Taverne','forest.php?op=tavern');
        }
        break;
    case 
"dice":
        if (
$session['user']['gold']>0)
        {
            
$bet abs((int)$_GET['bet'] + (int)$_POST['bet']);
            if (
$bet<=0)
            {
                
output('`3"`!Du würfelst und wählst dann, ob du die Zahl behalten willst, oder ob du nochmal würfeln willst. Du hast insgesamt 3 Versuche. Danach, oder nachdem du eine Zahl behalten hast, werde ich das selbe machen. Wer am Ende die höhere Zahl gewürfelt und behalten hat, gewinnt. Bei Gleichstand gewinnt keiner von uns.`3"
                `n`n"`!Wieviel willst du setzen, '
.($session['user']['sex']?'junge Dame':'junger Mann').'?`3"');
                
output("<form action='forest.php?op=oldman&game=dice' method='POST'><input name='bet'><input type='submit' class='button' value='Setzen'></form>",true);
                
addnav('','forest.php?op=oldman&game=dice');
            }
            else if (
$bet>$session['user']['gold'])
            {
                
output('`3Der alte Mann streckt seinen Stock aus und klopft damit deinen Golsbeutel ab. "`!Ich glaub nicht, daß da `^'.$bet.'`! Gold drin ist!`3", erklärt er.`n`n
                Verzweifelt versuchst du ihm deinen guten Willen zu zeigen und kippst den Beutelinhalt auf den Tisch: `^'
.$session['user']['gold'].'`3 Gold.
                `n`nVerlegen kehrst du zur Taverne zurück.'
);
                
addnav('Zurück zur Taverne','forest.php?op=tavern');
            }
            else
            {
                if (
$_GET['what']!="keep")
                {
                    
$session['user']['specialmisc']=e_rand(1,6);
                    
$try=$_GET['try'];
                    
$try++;
                    
output('Du würfelst deinen '.($try==1?'ersten':($try==2?'zweiten':'dritten')).' Versuch und es erscheint die `b'.$session['user']['specialmisc'].'`b`n`n
                    `3Du hast `^'
.$bet.'`3 Gold gesetzt. Was machst du?');
                    
addnav('Behalten','forest.php?op=oldman&game=dice&what=keep&bet='.$bet);
                    if (
$try<3)
                    {
                        
addnav('Neu würfeln',"forest.php?op=oldman&game=dice&what=pass&try=$try&bet=$bet");
                    }
                }
                else
                {
                    
output('Dein endgültiger Wurf war `b'.$session['user']['specialmisc'].'`b, der alte Mann wird jetzt versuchen, das zu überbieten:`n`n');
                    
$r e_rand(1,6);
                    
output('Der alte Mann wirft eine '.$r.'...`n');
                    if (
$r>$session['user']['specialmisc'] || $r==6)
                    {
                        
output('"`7Ich glaub ich behalte diesen Wurf!`("`n');
                    }
                    else
                    {
                        
$r e_rand(1,6);
                        
output('Der alte Mann würfelt nochmal und bekommt eine '.$r.'...`n');
                        if (
$r>=$session['user']['specialmisc'])
                        {
                            
output('"`7Ich glaub ich behalte diesen Wurf!`("`n');
                        }
                        else
                        {
                            
$r e_rand(1,6);
                            
output('Der alte Mann wirft seinen letzten Versuch und bekommt eine '.$r.'...`n');
                        }
                    }
                    if (
$r>$session['user']['specialmisc'])
                    {
                        
output('`n"`7Juuhuu! Ich wusste, dass deinesgleichen niemals über meinesgleichen siegen kann!`(", ruft der Mann, während du ihm gibst, was du ihm schuldest: `^'.$bet.'`( Gold.');
                        
$session['user']['gold']-=$bet;
                    }
                    else
                    {
                        if (
$r==$session['user']['specialmisc'])
                        {
                            
output('`n"`7Tja... nun, sieht so aus, als ob wir ein Unentschieden hätten.`("');
                        }
                        else
                        {
                            
output('`n"`7Waaaaaah!! Wie konnte jemand wie du mich besiegen?!?!?`(" schreit der alte Mann, während er dir gibt, was er dir schuldet.');
                            
$session['user']['gold']+=$bet;
                        }
                    }
                    
addnav('Zurück zur Taverne','forest.php?op=tavern');
                }
            }
        }
        else
        {
            
output('`3Der alte Mann streckt seinen Stock aus und klopft deinen Goldbeutel ab. "`!Leer?!?! Wie kannst du etwas setzen ohne Gold??`3", brüllt er. Damit wendet er sich wieder seinen Würfeln zu. Seinen Ärger hat er offensichtlich schon wieder vergessen.');
            
addnav('Zurück zur Taverne','forest.php?op=tavern');
        }
        break;
    }
    break;
    
//end of old man.

case 'leave':
case 
'leaveleave':
    
output('`(Du verlässt die Taverne und läufst durch das dichte Blattwerk. Der seltsame Nebel ist wieder aufgezogen und verwirrt deine Sinne. Als du den Nebel verläßt, befindest du dich wieder im Wald an einer dir vertrauten Stelle. Aber wie genau du zu dieser Taverne gekommen bist, ist dir nicht klarer geworden.');
    
$session['user']['specialinc']='';
    
$session['user']['specialmisc']='';
    
//addnav('Zurück in den Wald','forest.php');
    
break;

default:
    
checkday();
    
output('`(Eine Baumgruppe in der Nähe kommt dir bekannt vor... Du bist dir sicher, diesen Platz schoneinmal gesehen zu haben. Als du näher kommst, steigt ein seltsamer Nebel auf. Dein Gedächtnis spielt dir Streiche und du bist dir plötzlich gar nicht mehr sicher, wie du hier her gekommen bist. ');
    if (
$playermount['tavern']>0)
    {
        
output('Aber dein Pferd scheint den Weg zu kennen.');
    }
    
// BoarVolk's idea
    
output('`n`nDer Nebel verschwindet und vor dir siehst du eine Holzhütte, bei der Rauch aus dem Kamin aufsteigt. Auf einem Schild über der Tür steht: "`7Dark Horse Taverne`(".');
    
addnav('T?Betritt die Taverne','forest.php?op=tavern');
    
addnav('Verlasse diesen Ort','forest.php?op=leaveleave');
    
$session['user']['specialinc']='darkhorse.php';
    break;
}
output('</span>',true);
?>
0.9.7(DS V3) Ithil-Edition