#include <perms.h>

                                                                //      1  %EXTERNALROUTINE WUMPUS (%STRING(255) PARMZZZ)
#line 1 "regression-compile-tmp/wumpus.imp"
void WUMPUS( _imp_string /*%string(255)*/ PARMZZZ )
#line 1 "regression-compile-tmp/wumpus.imp"
{
                                                                //      2   !%EXTERNALROUTINESPEC PROMPT(%STRING(15)S)
                                                                //      3   !%EXTERNALSTRINGFNSPEC TIME
                                                                //      4   %INTEGERFNSPEC FNR(%INTEGER I)
#line 4 "regression-compile-tmp/wumpus.imp"
auto int FNR( int I );
                                                                //      5   %INTEGERARRAY R(1:20,1:3),BOG(1:20)
#line 5 "regression-compile-tmp/wumpus.imp"
int R[20][3];
#line 5 "regression-compile-tmp/wumpus.imp"
int BOG[20];
                                                                //      6   %ROUTINE DRAIN
#line 6 "regression-compile-tmp/wumpus.imp"
void DRAIN( void )
#line 6 "regression-compile-tmp/wumpus.imp"
{
                                                                //      7    SKIP SYMBOL %WHILE NEXT SYMBOL#NL ; SKIP SYMBOL
#line 7 "regression-compile-tmp/wumpus.imp"
L_0002:;
#line 7 "regression-compile-tmp/wumpus.imp"
if (((_imp_NEXTSYMBOL()) == (10))) goto L_0003;
#line 7 "regression-compile-tmp/wumpus.imp"
_imp_SKIPSYMBOL();
#line 7 "regression-compile-tmp/wumpus.imp"
goto L_0002;
#line 7 "regression-compile-tmp/wumpus.imp"
L_0003:;
#line 7 "regression-compile-tmp/wumpus.imp"
_imp_SKIPSYMBOL();
                                                                //      8    %END
#line 8 "regression-compile-tmp/wumpus.imp"
/* Remove %on %event handler here if present for this block */
return;
} // End of block DRAIN at level 2
                                                                //      9   %INTEGERFN GETANS
#line 9 "regression-compile-tmp/wumpus.imp"
int GETANS( void )
#line 9 "regression-compile-tmp/wumpus.imp"
{
                                                                //     10    %INTEGER SYM
#line 10 "regression-compile-tmp/wumpus.imp"
int SYM;
                                                                //     11     SKIP SYMBOL %WHILE 'N'#NEXTSYMBOL&95#'Y'
#line 11 "regression-compile-tmp/wumpus.imp"
L_0005:;
#line 11 "regression-compile-tmp/wumpus.imp"
if ((((78) == (((_imp_NEXTSYMBOL()) & (95))))) || (((((_imp_NEXTSYMBOL()) & (95))) == (89)))) goto L_0006;
#line 11 "regression-compile-tmp/wumpus.imp"
_imp_SKIPSYMBOL();
#line 11 "regression-compile-tmp/wumpus.imp"
goto L_0005;
#line 11 "regression-compile-tmp/wumpus.imp"
L_0006:;
                                                                //     12     SYM=NEXTSYMBOL&95 ; DRAIN ; %RESULT=SYM
#line 12 "regression-compile-tmp/wumpus.imp"
SYM = ((_imp_NEXTSYMBOL()) & (95));
#line 12 "regression-compile-tmp/wumpus.imp"
DRAIN();
#line 12 "regression-compile-tmp/wumpus.imp"
/* Remove %on %event handler here if present for this block */
return SYM;
                                                                //     13    %END
#line 13 "regression-compile-tmp/wumpus.imp"
} // End of block GETANS at level 2
                                                                //     14   %ROUTINE GET REQUEST(%INTEGERNAME SYM)
#line 14 "regression-compile-tmp/wumpus.imp"
void GETREQUEST( int /*name*/*SYM )
#line 14 "regression-compile-tmp/wumpus.imp"
{
                                                                //     15    %CYCLE
#line 15 "regression-compile-tmp/wumpus.imp"
L_0008:;
                                                                //     16     SYM=NEXTCH
#line 16 "regression-compile-tmp/wumpus.imp"
*SYM = _imp_NEXTCH();
                                                                //     17     %IF '0'<=SYM<='9' %THENEXIT
#line 17 "regression-compile-tmp/wumpus.imp"
if ((((48) > (*SYM))) || (((*SYM) > (57)))) goto L_000b;
#line 17 "regression-compile-tmp/wumpus.imp"
goto L_0009;
#line 17 "regression-compile-tmp/wumpus.imp"
L_000b:;
                                                                //     18     %IF SYM='s' %OR SYM='S' %THENEXIT
#line 18 "regression-compile-tmp/wumpus.imp"
if (((*SYM) == (115))) goto L_000c;
#line 18 "regression-compile-tmp/wumpus.imp"
if (((*SYM) != (83))) goto L_000d;
#line 18 "regression-compile-tmp/wumpus.imp"
L_000c:;
#line 18 "regression-compile-tmp/wumpus.imp"
goto L_0009;
#line 18 "regression-compile-tmp/wumpus.imp"
L_000d:;
                                                                //     19    SKIPSYMBOL
#line 19 "regression-compile-tmp/wumpus.imp"
_imp_SKIPSYMBOL();
                                                                //     20    %REPEAT
#line 20 "regression-compile-tmp/wumpus.imp"
goto L_0008;
#line 20 "regression-compile-tmp/wumpus.imp"
L_0009:;
                                                                //     21    %IF SYM='s' %THEN SYM='S'
#line 21 "regression-compile-tmp/wumpus.imp"
if (((*SYM) != (115))) goto L_000e;
#line 21 "regression-compile-tmp/wumpus.imp"
*SYM = 83;
#line 21 "regression-compile-tmp/wumpus.imp"
L_000e:;
                                                                //     22    %IF SYM#'S' %THEN READ(SYM)
#line 22 "regression-compile-tmp/wumpus.imp"
if (((*SYM) == (83))) goto L_000f;
#line 22 "regression-compile-tmp/wumpus.imp"
_imp_READ(SYM);
#line 22 "regression-compile-tmp/wumpus.imp"
L_000f:;
                                                                //     23    DRAIN
#line 23 "regression-compile-tmp/wumpus.imp"
DRAIN();
                                                                //     24    %END
#line 24 "regression-compile-tmp/wumpus.imp"
/* Remove %on %event handler here if present for this block */
return;
} // End of block GETREQUEST at level 2
                                                                //     25   %INTEGER NO OF ARROWS, MOVE TO, W, H, B1, B2, P1, P2, WO, PO, BO
#line 25 "regression-compile-tmp/wumpus.imp"
int NOOFARROWS;
#line 25 "regression-compile-tmp/wumpus.imp"
int MOVETO;
#line 25 "regression-compile-tmp/wumpus.imp"
int W;
#line 25 "regression-compile-tmp/wumpus.imp"
int H;
#line 25 "regression-compile-tmp/wumpus.imp"
int B1;
#line 25 "regression-compile-tmp/wumpus.imp"
int B2;
#line 25 "regression-compile-tmp/wumpus.imp"
int P1;
#line 25 "regression-compile-tmp/wumpus.imp"
int P2;
#line 25 "regression-compile-tmp/wumpus.imp"
int WO;
#line 25 "regression-compile-tmp/wumpus.imp"
int PO;
#line 25 "regression-compile-tmp/wumpus.imp"
int BO;
                                                                //     26   %INTEGER N1, N2, I, J, K, L, P, T, A1, ANS
#line 26 "regression-compile-tmp/wumpus.imp"
int N1;
#line 26 "regression-compile-tmp/wumpus.imp"
int N2;
#line 26 "regression-compile-tmp/wumpus.imp"
int I;
#line 26 "regression-compile-tmp/wumpus.imp"
int J;
#line 26 "regression-compile-tmp/wumpus.imp"
int K;
#line 26 "regression-compile-tmp/wumpus.imp"
int L;
#line 26 "regression-compile-tmp/wumpus.imp"
int P;
#line 26 "regression-compile-tmp/wumpus.imp"
int T;
#line 26 "regression-compile-tmp/wumpus.imp"
int A1;
#line 26 "regression-compile-tmp/wumpus.imp"
int ANS;
                                                                //     27   %STRING(255) LINE
#line 27 "regression-compile-tmp/wumpus.imp"
_imp_string /*%string(255)*/ LINE;
                                                                //     28   %ROUTINE RANDOMISE
#line 28 "regression-compile-tmp/wumpus.imp"
void RANDOMISE( void )
#line 28 "regression-compile-tmp/wumpus.imp"
{
                                                                //     29    %INTEGER TEMP
#line 29 "regression-compile-tmp/wumpus.imp"
int TEMP;
                                                                //     30     N1=0
#line 30 "regression-compile-tmp/wumpus.imp"
N1 = 0;
                                                                //     31     LINE=TIME
#line 31 "regression-compile-tmp/wumpus.imp"
LINE = _imp_TIME();
                                                                //     32     %CYCLE I=1,1,LENGTH(LINE)
#line 32 "regression-compile-tmp/wumpus.imp"
{static int _initial, _increment, _final, _control;
_initial = 1; _increment = 1; _final = *_imp_LENGTH(&LINE); I = _control = _initial;
if (((_final-_initial) % _increment) != 0) _imp_signal(5,1,0,"Illegal cycle I = 1, 1, *_imp_LENGTH(&LINE)");
I -= _increment; _control -= _increment;
L_0010:;
if (I == _final) goto L_0011;
I += _increment; _control += _increment;
if (I != _control) _imp_signal(4,2,0,"Corrupt control variable I"); /* FOR loop control variable corrupted */
}
                                                                //     33      N1=N1+CHARNO(LINE,I)
#line 33 "regression-compile-tmp/wumpus.imp"
N1 = ((N1) + (*(int *)(_imp_CHARNO(&LINE, I))));
                                                                //     34     %REPEAT
#line 34 "regression-compile-tmp/wumpus.imp"
goto L_0010;
#line 34 "regression-compile-tmp/wumpus.imp"
L_0011:;
                                                                //     35     N2=10000-N1
#line 35 "regression-compile-tmp/wumpus.imp"
N2 = (((int)(10000)) - (N1));
                                                                //     36     %CYCLE I=1,1,20
#line 36 "regression-compile-tmp/wumpus.imp"
I = 0;
if ((((20)-(1)) % (1)) != 0) _imp_signal(5,1,0,"Illegal cycle I = 1, 1, 20");
L_0013:;
if (I == 20) goto L_0014;
I += 1;
                                                                //     37      TEMP=FNR(20)
#line 37 "regression-compile-tmp/wumpus.imp"
TEMP = FNR(20);
                                                                //     38      BOG(I)=0
#line 38 "regression-compile-tmp/wumpus.imp"
BOG[(((int)(I)) - (1))] = 0;
                                                                //     39     %REPEAT
#line 39 "regression-compile-tmp/wumpus.imp"
goto L_0013;
#line 39 "regression-compile-tmp/wumpus.imp"
L_0014:;
                                                                //     40     %CYCLE I=1,1,20
#line 40 "regression-compile-tmp/wumpus.imp"
I = 0;
if ((((20)-(1)) % (1)) != 0) _imp_signal(5,1,0,"Illegal cycle I = 1, 1, 20");
L_0016:;
if (I == 20) goto L_0017;
I += 1;
                                                                //     41      %CYCLE J=1,1,3
#line 41 "regression-compile-tmp/wumpus.imp"
J = 0;
if ((((3)-(1)) % (1)) != 0) _imp_signal(5,1,0,"Illegal cycle J = 1, 1, 3");
L_0019:;
if (J == 3) goto L_001a;
J += 1;
                                                                //     42       R(I,J)=0
#line 42 "regression-compile-tmp/wumpus.imp"
R[(((int)(I)) - (1))][(((int)(J)) - (1))] = 0;
                                                                //     43      %REPEAT
#line 43 "regression-compile-tmp/wumpus.imp"
goto L_0019;
#line 43 "regression-compile-tmp/wumpus.imp"
L_001a:;
                                                                //     44     %REPEAT
#line 44 "regression-compile-tmp/wumpus.imp"
goto L_0016;
#line 44 "regression-compile-tmp/wumpus.imp"
L_0017:;
                                                                //     45     P=1
#line 45 "regression-compile-tmp/wumpus.imp"
P = 1;
                                                                //     46     R(1,1)=99
#line 46 "regression-compile-tmp/wumpus.imp"
R[0][0] = 99;
                                                                //     47     %CYCLE I=1,1,19
#line 47 "regression-compile-tmp/wumpus.imp"
I = 0;
if ((((19)-(1)) % (1)) != 0) _imp_signal(5,1,0,"Illegal cycle I = 1, 1, 19");
L_001c:;
if (I == 19) goto L_001d;
I += 1;
                                                                //     48      T=FNR(20) %UNTIL R(T,1)=0
#line 48 "regression-compile-tmp/wumpus.imp"
L_001f:;
#line 48 "regression-compile-tmp/wumpus.imp"
T = FNR(20);
#line 48 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(T)) - (1))][0]) == (0))) goto L_0020;
#line 48 "regression-compile-tmp/wumpus.imp"
goto L_001f;
#line 48 "regression-compile-tmp/wumpus.imp"
L_0020:;
                                                                //     49      R(P,2)=T
#line 49 "regression-compile-tmp/wumpus.imp"
R[(((int)(P)) - (1))][1] = T;
                                                                //     50      R(T,1)=P
#line 50 "regression-compile-tmp/wumpus.imp"
R[(((int)(T)) - (1))][0] = P;
                                                                //     51      P=T
#line 51 "regression-compile-tmp/wumpus.imp"
P = T;
                                                                //     52     %REPEAT
#line 52 "regression-compile-tmp/wumpus.imp"
goto L_001c;
#line 52 "regression-compile-tmp/wumpus.imp"
L_001d:;
                                                                //     53     R(P,2)=1
#line 53 "regression-compile-tmp/wumpus.imp"
R[(((int)(P)) - (1))][1] = 1;
                                                                //     54     R(1,1)=P
#line 54 "regression-compile-tmp/wumpus.imp"
R[0][0] = P;
                                                                //     55     P2=FNR(20)
#line 55 "regression-compile-tmp/wumpus.imp"
P2 = FNR(20);
                                                                //     56     R(P2,3)=99
#line 56 "regression-compile-tmp/wumpus.imp"
R[(((int)(P2)) - (1))][2] = 99;
                                                                //     57     R(R(P2,2),3)=99
#line 57 "regression-compile-tmp/wumpus.imp"
R[(((int)(R[(((int)(P2)) - (1))][1])) - (1))][2] = 99;
                                                                //     58     P=1
#line 58 "regression-compile-tmp/wumpus.imp"
P = 1;
                                                                //     59     %CYCLE I=1,1,8
#line 59 "regression-compile-tmp/wumpus.imp"
I = 0;
if ((((8)-(1)) % (1)) != 0) _imp_signal(5,1,0,"Illegal cycle I = 1, 1, 8");
L_0022:;
if (I == 8) goto L_0023;
I += 1;
                                                                //     60      P=P+1 %WHILE R(P,3)>0
#line 60 "regression-compile-tmp/wumpus.imp"
L_0025:;
#line 60 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(P)) - (1))][2]) <= (0))) goto L_0026;
#line 60 "regression-compile-tmp/wumpus.imp"
P = (((int)(P)) + (1));
#line 60 "regression-compile-tmp/wumpus.imp"
goto L_0025;
#line 60 "regression-compile-tmp/wumpus.imp"
L_0026:;
                                                                //     61      T=FNR(20) %UNTIL R(T,1)#P  %AND  R(T,2)#P  %AND  P#T  %AND  R(T,3)=0
#line 61 "regression-compile-tmp/wumpus.imp"
L_0028:;
#line 61 "regression-compile-tmp/wumpus.imp"
T = FNR(20);
#line 61 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(T)) - (1))][0]) == (P))) goto L_002a;
#line 61 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(T)) - (1))][1]) == (P))) goto L_002a;
#line 61 "regression-compile-tmp/wumpus.imp"
if (((P) == (T))) goto L_002a;
#line 61 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(T)) - (1))][2]) == (0))) goto L_0029;
#line 61 "regression-compile-tmp/wumpus.imp"
L_002a:;
#line 61 "regression-compile-tmp/wumpus.imp"
goto L_0028;
#line 61 "regression-compile-tmp/wumpus.imp"
L_0029:;
                                                                //     62      R(P,3)=T
#line 62 "regression-compile-tmp/wumpus.imp"
R[(((int)(P)) - (1))][2] = T;
                                                                //     63      R(T,3)=P
#line 63 "regression-compile-tmp/wumpus.imp"
R[(((int)(T)) - (1))][2] = P;
                                                                //     64      P=P+1
#line 64 "regression-compile-tmp/wumpus.imp"
P = (((int)(P)) + (1));
                                                                //     65     %REPEAT
#line 65 "regression-compile-tmp/wumpus.imp"
goto L_0022;
#line 65 "regression-compile-tmp/wumpus.imp"
L_0023:;
                                                                //     66     LABEL: T=FNR(20) %UNTIL %C
#line 66 "regression-compile-tmp/wumpus.imp"
U_1000:;
#line 66 "regression-compile-tmp/wumpus.imp"
L_002b:;
#line 66 "regression-compile-tmp/wumpus.imp"
T = FNR(20);
#line 66 "regression-compile-tmp/wumpus.imp"
if (((P2) == (T))) goto L_002d;
#line 66 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(P2)) - (1))][0]) == (T))) goto L_002d;
#line 66 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(P2)) - (1))][1]) == (T))) goto L_002d;
#line 66 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(T)) - (1))][2]) == (0))) goto L_002c;
#line 66 "regression-compile-tmp/wumpus.imp"
L_002d:;
#line 66 "regression-compile-tmp/wumpus.imp"
goto L_002b;
#line 66 "regression-compile-tmp/wumpus.imp"
L_002c:;
                                                                //     67               P2#T  %AND  R(P2,1)#T  %AND  R(P2,2)#T  %AND  R(T,3)=0
                                                                //     68     P=R(P2,2)
#line 68 "regression-compile-tmp/wumpus.imp"
P = R[(((int)(P2)) - (1))][1];
                                                                //     69     R(P2,3)=T
#line 69 "regression-compile-tmp/wumpus.imp"
R[(((int)(P2)) - (1))][2] = T;
                                                                //     70     R(T,3)=P2
#line 70 "regression-compile-tmp/wumpus.imp"
R[(((int)(T)) - (1))][2] = P2;
                                                                //     71     %IF R(R(P,1),3)=0 %OR R(R(P,2),3)=0 %THEN R(T,3)=0 %AND ->LABEL
#line 71 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(R[(((int)(P)) - (1))][0])) - (1))][2]) == (0))) goto L_002e;
#line 71 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(R[(((int)(P)) - (1))][1])) - (1))][2]) != (0))) goto L_002f;
#line 71 "regression-compile-tmp/wumpus.imp"
L_002e:;
#line 71 "regression-compile-tmp/wumpus.imp"
R[(((int)(T)) - (1))][2] = 0;
#line 71 "regression-compile-tmp/wumpus.imp"
goto U_1000;
#line 71 "regression-compile-tmp/wumpus.imp"
L_002f:;
                                                                //     72     T=FNR(20) %UNTIL P#T %AND R(P,2)#T %AND R(P,1)#T %AND R(T,3)=0
#line 72 "regression-compile-tmp/wumpus.imp"
L_0030:;
#line 72 "regression-compile-tmp/wumpus.imp"
T = FNR(20);
#line 72 "regression-compile-tmp/wumpus.imp"
if (((P) == (T))) goto L_0032;
#line 72 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(P)) - (1))][1]) == (T))) goto L_0032;
#line 72 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(P)) - (1))][0]) == (T))) goto L_0032;
#line 72 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(T)) - (1))][2]) == (0))) goto L_0031;
#line 72 "regression-compile-tmp/wumpus.imp"
L_0032:;
#line 72 "regression-compile-tmp/wumpus.imp"
goto L_0030;
#line 72 "regression-compile-tmp/wumpus.imp"
L_0031:;
                                                                //     73     R(P,3)=T
#line 73 "regression-compile-tmp/wumpus.imp"
R[(((int)(P)) - (1))][2] = T;
                                                                //     74     R(T,3)=P
#line 74 "regression-compile-tmp/wumpus.imp"
R[(((int)(T)) - (1))][2] = P;
                                                                //     75     W=FNR(20)
#line 75 "regression-compile-tmp/wumpus.imp"
W = FNR(20);
                                                                //     76     B1=FNR(20)
#line 76 "regression-compile-tmp/wumpus.imp"
B1 = FNR(20);
                                                                //     77     B2=FNR(20) %UNTIL B2#B1
#line 77 "regression-compile-tmp/wumpus.imp"
L_0033:;
#line 77 "regression-compile-tmp/wumpus.imp"
B2 = FNR(20);
#line 77 "regression-compile-tmp/wumpus.imp"
if (((B2) != (B1))) goto L_0034;
#line 77 "regression-compile-tmp/wumpus.imp"
goto L_0033;
#line 77 "regression-compile-tmp/wumpus.imp"
L_0034:;
                                                                //     78     P1=FNR(20)
#line 78 "regression-compile-tmp/wumpus.imp"
P1 = FNR(20);
                                                                //     79     P2=FNR(20) %UNTIL P2#P1
#line 79 "regression-compile-tmp/wumpus.imp"
L_0036:;
#line 79 "regression-compile-tmp/wumpus.imp"
P2 = FNR(20);
#line 79 "regression-compile-tmp/wumpus.imp"
if (((P2) != (P1))) goto L_0037;
#line 79 "regression-compile-tmp/wumpus.imp"
goto L_0036;
#line 79 "regression-compile-tmp/wumpus.imp"
L_0037:;
                                                                //     80     H=FNR(20)  %UNTIL  H#W  %AND  H#P1  %AND  H#P2  %AND  H#B1  %AND H#B2
#line 80 "regression-compile-tmp/wumpus.imp"
L_0039:;
#line 80 "regression-compile-tmp/wumpus.imp"
H = FNR(20);
#line 80 "regression-compile-tmp/wumpus.imp"
if (((H) == (W))) goto L_003b;
#line 80 "regression-compile-tmp/wumpus.imp"
if (((H) == (P1))) goto L_003b;
#line 80 "regression-compile-tmp/wumpus.imp"
if (((H) == (P2))) goto L_003b;
#line 80 "regression-compile-tmp/wumpus.imp"
if (((H) == (B1))) goto L_003b;
#line 80 "regression-compile-tmp/wumpus.imp"
if (((H) != (B2))) goto L_003a;
#line 80 "regression-compile-tmp/wumpus.imp"
L_003b:;
#line 80 "regression-compile-tmp/wumpus.imp"
goto L_0039;
#line 80 "regression-compile-tmp/wumpus.imp"
L_003a:;
                                                                //     81    %END
#line 81 "regression-compile-tmp/wumpus.imp"
/* Remove %on %event handler here if present for this block */
return;
} // End of block RANDOMISE at level 2
                                                                //     82   %ROUTINE  GET NOW
#line 82 "regression-compile-tmp/wumpus.imp"
void GETNOW( void )
#line 82 "regression-compile-tmp/wumpus.imp"
{
                                                                //     83    %INTEGER H1
#line 83 "regression-compile-tmp/wumpus.imp"
int H1;
                                                                //     84     WO=0 ; BO=0 ; PO=0
#line 84 "regression-compile-tmp/wumpus.imp"
WO = 0;
#line 84 "regression-compile-tmp/wumpus.imp"
BO = 0;
#line 84 "regression-compile-tmp/wumpus.imp"
PO = 0;
                                                                //     85     %CYCLE I=1,1,3
#line 85 "regression-compile-tmp/wumpus.imp"
I = 0;
if ((((3)-(1)) % (1)) != 0) _imp_signal(5,1,0,"Illegal cycle I = 1, 1, 3");
L_003c:;
if (I == 3) goto L_003d;
I += 1;
                                                                //     86      H1=R(H,I)
#line 86 "regression-compile-tmp/wumpus.imp"
H1 = R[(((int)(H)) - (1))][(((int)(I)) - (1))];
                                                                //     87      %IF H1=P1 %OR H1=P2 %THEN PO=1
#line 87 "regression-compile-tmp/wumpus.imp"
if (((H1) == (P1))) goto L_003f;
#line 87 "regression-compile-tmp/wumpus.imp"
if (((H1) != (P2))) goto L_0040;
#line 87 "regression-compile-tmp/wumpus.imp"
L_003f:;
#line 87 "regression-compile-tmp/wumpus.imp"
PO = 1;
#line 87 "regression-compile-tmp/wumpus.imp"
L_0040:;
                                                                //     88      %IF H1=B1 %OR H1=B2 %THEN BO=1
#line 88 "regression-compile-tmp/wumpus.imp"
if (((H1) == (B1))) goto L_0041;
#line 88 "regression-compile-tmp/wumpus.imp"
if (((H1) != (B2))) goto L_0042;
#line 88 "regression-compile-tmp/wumpus.imp"
L_0041:;
#line 88 "regression-compile-tmp/wumpus.imp"
BO = 1;
#line 88 "regression-compile-tmp/wumpus.imp"
L_0042:;
                                                                //     89      %IF H1=W %THEN WO=1
#line 89 "regression-compile-tmp/wumpus.imp"
if (((H1) != (W))) goto L_0043;
#line 89 "regression-compile-tmp/wumpus.imp"
WO = 1;
#line 89 "regression-compile-tmp/wumpus.imp"
L_0043:;
                                                                //     90      %CYCLE J=1,1,3
#line 90 "regression-compile-tmp/wumpus.imp"
J = 0;
if ((((3)-(1)) % (1)) != 0) _imp_signal(5,1,0,"Illegal cycle J = 1, 1, 3");
L_0044:;
if (J == 3) goto L_0045;
J += 1;
                                                                //     91       %IF  R(H1,1)=W  %OR  R(H1,2)=W  %OR  R(H1,3)=W  %THEN WO=1
#line 91 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(H1)) - (1))][0]) == (W))) goto L_0047;
#line 91 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(H1)) - (1))][1]) == (W))) goto L_0047;
#line 91 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(H1)) - (1))][2]) != (W))) goto L_0048;
#line 91 "regression-compile-tmp/wumpus.imp"
L_0047:;
#line 91 "regression-compile-tmp/wumpus.imp"
WO = 1;
#line 91 "regression-compile-tmp/wumpus.imp"
L_0048:;
                                                                //     92      %REPEAT
#line 92 "regression-compile-tmp/wumpus.imp"
goto L_0044;
#line 92 "regression-compile-tmp/wumpus.imp"
L_0045:;
                                                                //     93     %REPEAT
#line 93 "regression-compile-tmp/wumpus.imp"
goto L_003c;
#line 93 "regression-compile-tmp/wumpus.imp"
L_003d:;
                                                                //     94    %END
#line 94 "regression-compile-tmp/wumpus.imp"
/* Remove %on %event handler here if present for this block */
return;
} // End of block GETNOW at level 2
                                                                //     95   %ROUTINE SUMMARIZE(%INTEGER I)
#line 95 "regression-compile-tmp/wumpus.imp"
void SUMMARIZE( int I )
#line 95 "regression-compile-tmp/wumpus.imp"
{
                                                                //     96    %IF I>0 %THEN ->SKIP
#line 96 "regression-compile-tmp/wumpus.imp"
if (((I) <= (0))) goto L_0049;
#line 96 "regression-compile-tmp/wumpus.imp"
goto U_1001;
#line 96 "regression-compile-tmp/wumpus.imp"
L_0049:;
                                                                //     97    PRINTSTRING("You are in room")
#line 97 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("You are in room"));
                                                                //     98    WRITE(H,0);NEWLINE
#line 98 "regression-compile-tmp/wumpus.imp"
_imp_WRITE(H, 0);
#line 98 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //     99    SKIP:PRINTSTRING("There are passages to")
#line 99 "regression-compile-tmp/wumpus.imp"
U_1001:;
#line 99 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("There are passages to"));
                                                                //    100    WRITE(R(H,1),0);PRINTCH(',')
#line 100 "regression-compile-tmp/wumpus.imp"
_imp_WRITE(R[(((int)(H)) - (1))][0], 0);
#line 100 "regression-compile-tmp/wumpus.imp"
_imp_PRINTCH(44);
                                                                //    101    WRITE(R(H,2),0);PRINTCH(',')
#line 101 "regression-compile-tmp/wumpus.imp"
_imp_WRITE(R[(((int)(H)) - (1))][1], 0);
#line 101 "regression-compile-tmp/wumpus.imp"
_imp_PRINTCH(44);
                                                                //    102    WRITE(R(H,3),0);NEWLINE
#line 102 "regression-compile-tmp/wumpus.imp"
_imp_WRITE(R[(((int)(H)) - (1))][2], 0);
#line 102 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //    103    %IF WO=1 %THEN PRINTSTRING("I smell a Wumpus") %AND NEWLINE
#line 103 "regression-compile-tmp/wumpus.imp"
if (((WO) != (1))) goto L_004a;
#line 103 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("I smell a Wumpus"));
#line 103 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
#line 103 "regression-compile-tmp/wumpus.imp"
L_004a:;
                                                                //    104    %IF PO=1 %THEN PRINTSTRING("I feel a draft") %AND NEWLINE
#line 104 "regression-compile-tmp/wumpus.imp"
if (((PO) != (1))) goto L_004b;
#line 104 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("I feel a draft"));
#line 104 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
#line 104 "regression-compile-tmp/wumpus.imp"
L_004b:;
                                                                //    105    %IF BO=1 %THEN PRINTSTRING("I hear squeaking") %AND NEWLINE
#line 105 "regression-compile-tmp/wumpus.imp"
if (((BO) != (1))) goto L_004c;
#line 105 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("I hear squeaking"));
#line 105 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
#line 105 "regression-compile-tmp/wumpus.imp"
L_004c:;
                                                                //    106   %END
#line 106 "regression-compile-tmp/wumpus.imp"
/* Remove %on %event handler here if present for this block */
return;
} // End of block SUMMARIZE at level 2
                                                                //    107   %INTEGERFN FNR(%INTEGER I)
#line 107 "regression-compile-tmp/wumpus.imp"
int FNR( int I )
#line 107 "regression-compile-tmp/wumpus.imp"
{
                                                                //    108    %REAL RTEMP
#line 108 "regression-compile-tmp/wumpus.imp"
float RTEMP;
                                                                //    109    %INTEGER TEMP
#line 109 "regression-compile-tmp/wumpus.imp"
int TEMP;
                                                                //    110     TEMP=((3*(N1<<14)+N2)+N2<<14)&(1<<28-1)
#line 110 "regression-compile-tmp/wumpus.imp"
TEMP = ((((((((int)(((3) * ((int)(((N1) << (14))))))) + (N2)))) + (((N2) << (14))))) & ((((int)(((1) << (28)))) - (1))));
                                                                //    111     N2=TEMP&X'3FFF'
#line 111 "regression-compile-tmp/wumpus.imp"
N2 = ((TEMP) & (16383));
                                                                //    112     N1=(TEMP-N2)>>14
#line 112 "regression-compile-tmp/wumpus.imp"
N1 = (((((((int)(TEMP)) - (N2)))) >> (14)));
                                                                //    113     RTEMP=TEMP/(1<<28)
#line 113 "regression-compile-tmp/wumpus.imp"
RTEMP = (double)((double)((float)(TEMP)) / (double)((((1) << (28)))));
/*Warning: potential loss of precision converting from integer AST_VAR (I - 4 bytes) to real AST_VAR (RTEMP - 4 bytes) detected at ast.c line 108 */
                                                                //    114     %RESULT=1+INTPT(I*RTEMP)
#line 114 "regression-compile-tmp/wumpus.imp"
/* Remove %on %event handler here if present for this block */
return (((int)(1)) + (_imp_INTPT((((float)(I)) * (RTEMP)))));
                                                                //    115    %END
#line 115 "regression-compile-tmp/wumpus.imp"
} // End of block FNR at level 2
                                                                //    116    PRINTSTRING("Would you like to see the rules?") ; NEWLINE
#line 116 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("Would you like to see the rules?"));
#line 116 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //    117    %IF GETANS='Y' %THENSTART
#line 117 "regression-compile-tmp/wumpus.imp"
if (((GETANS()) != (89))) goto L_004d;
                                                                //    118     PRINTSTRING("Sorry, chum - but there aint none!!!")
#line 118 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("Sorry, chum - but there aint none!!!"));
                                                                //    119     NEWLINE
#line 119 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //    120    %FINISH
#line 120 "regression-compile-tmp/wumpus.imp"
L_004d:;
                                                                //    121    PROMPT(":")
#line 121 "regression-compile-tmp/wumpus.imp"
_imp_PROMPT(_imp_str_literal(":"));
                                                                //    122    BEGIN: RANDOMISE
#line 122 "regression-compile-tmp/wumpus.imp"
U_1002:;
#line 122 "regression-compile-tmp/wumpus.imp"
RANDOMISE();
                                                                //    123    NO OF ARROWS=5
#line 123 "regression-compile-tmp/wumpus.imp"
NOOFARROWS = 5;
                                                                //    124    MOVE LOOP: GET NOW
#line 124 "regression-compile-tmp/wumpus.imp"
U_1001:;
#line 124 "regression-compile-tmp/wumpus.imp"
GETNOW();
                                                                //    125    ERROR INPUT: SUMMARIZE(0)
#line 125 "regression-compile-tmp/wumpus.imp"
U_1003:;
#line 125 "regression-compile-tmp/wumpus.imp"
SUMMARIZE(0);
                                                                //    126    GET MOVE: PRINTSTRING("Your move, or ""S"" to shoot.") ; NEWLINE
#line 126 "regression-compile-tmp/wumpus.imp"
U_1004:;
#line 126 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("Your move, or \"S\" to shoot."));
#line 126 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //    127    GET REQUEST(MOVE TO)
#line 127 "regression-compile-tmp/wumpus.imp"
GETREQUEST(&MOVETO);
                                                                //    128    %IF MOVE TO='S' %THEN ->SHOOT %ELSE ->MOVE
#line 128 "regression-compile-tmp/wumpus.imp"
if (((MOVETO) != (83))) goto L_004e;
#line 128 "regression-compile-tmp/wumpus.imp"
goto U_1005;
#line 128 "regression-compile-tmp/wumpus.imp"
L_004e:;
#line 128 "regression-compile-tmp/wumpus.imp"
goto U_1006;
                                                                //    129    WHAT ERR:
#line 129 "regression-compile-tmp/wumpus.imp"
U_1007:;
                                                                //    130    PRINTSTRING("What, er..");PRINTCH(7);NEWLINE;->ERROR INPUT
#line 130 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("What, er.."));
#line 130 "regression-compile-tmp/wumpus.imp"
_imp_PRINTCH(7);
#line 130 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
#line 130 "regression-compile-tmp/wumpus.imp"
goto U_1003;
                                                                //    131    MOVE:
#line 131 "regression-compile-tmp/wumpus.imp"
U_1006:;
                                                                //    132    %IF R(H,1)=MOVETO %OR R(H,2)=MOVETO %OR R(H,3)=MOVETO %START
#line 132 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(H)) - (1))][0]) == (MOVETO))) goto L_003e;
#line 132 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(H)) - (1))][1]) == (MOVETO))) goto L_003e;
#line 132 "regression-compile-tmp/wumpus.imp"
if (((R[(((int)(H)) - (1))][2]) != (MOVETO))) goto L_004f;
#line 132 "regression-compile-tmp/wumpus.imp"
L_003e:;
                                                                //    133     H=MOVE TO
#line 133 "regression-compile-tmp/wumpus.imp"
H = MOVETO;
                                                                //    134    %FINISHELSESTART
#line 134 "regression-compile-tmp/wumpus.imp"
goto L_0050;
#line 134 "regression-compile-tmp/wumpus.imp"
L_004f:;
                                                                //    135     ->WHAT ERR
#line 135 "regression-compile-tmp/wumpus.imp"
goto U_1007;
                                                                //    136    %FINISH
#line 136 "regression-compile-tmp/wumpus.imp"
L_0050:;
                                                                //    137    CHECK: %IF H=W %THEN ->EAT HUNTER
#line 137 "regression-compile-tmp/wumpus.imp"
U_1008:;
#line 137 "regression-compile-tmp/wumpus.imp"
if (((H) != (W))) goto L_0051;
#line 137 "regression-compile-tmp/wumpus.imp"
goto U_1009;
#line 137 "regression-compile-tmp/wumpus.imp"
L_0051:;
                                                                //    138    %IF H=P1 %OR H=P2 %THEN ->PIT
#line 138 "regression-compile-tmp/wumpus.imp"
if (((H) == (P1))) goto L_0052;
#line 138 "regression-compile-tmp/wumpus.imp"
if (((H) != (P2))) goto L_0053;
#line 138 "regression-compile-tmp/wumpus.imp"
L_0052:;
#line 138 "regression-compile-tmp/wumpus.imp"
goto U_100a;
#line 138 "regression-compile-tmp/wumpus.imp"
L_0053:;
                                                                //    139    %IF H=B1 %OR H=B2 %THEN ->BAT
#line 139 "regression-compile-tmp/wumpus.imp"
if (((H) == (B1))) goto L_0054;
#line 139 "regression-compile-tmp/wumpus.imp"
if (((H) != (B2))) goto L_0055;
#line 139 "regression-compile-tmp/wumpus.imp"
L_0054:;
#line 139 "regression-compile-tmp/wumpus.imp"
goto U_100b;
#line 139 "regression-compile-tmp/wumpus.imp"
L_0055:;
                                                                //    140    %IF BOG(H)#0 %THEN ->TOILET
#line 140 "regression-compile-tmp/wumpus.imp"
if (((BOG[(((int)(H)) - (1))]) == (0))) goto L_0056;
#line 140 "regression-compile-tmp/wumpus.imp"
goto U_100c;
#line 140 "regression-compile-tmp/wumpus.imp"
L_0056:;
                                                                //    141    ->MOVE LOOP
#line 141 "regression-compile-tmp/wumpus.imp"
goto U_1001;
                                                                //    142    BAT: LOOP:
#line 142 "regression-compile-tmp/wumpus.imp"
U_100b:;
#line 142 "regression-compile-tmp/wumpus.imp"
U_100d:;
                                                                //    143    T=FNR(20)
#line 143 "regression-compile-tmp/wumpus.imp"
T = FNR(20);
                                                                //    144    %IF T=H %THEN ->LOOP
#line 144 "regression-compile-tmp/wumpus.imp"
if (((T) != (H))) goto L_0057;
#line 144 "regression-compile-tmp/wumpus.imp"
goto U_100d;
#line 144 "regression-compile-tmp/wumpus.imp"
L_0057:;
                                                                //    145    H=T
#line 145 "regression-compile-tmp/wumpus.imp"
H = T;
                                                                //    146    PRINTSTRING("You have been captured by a bat !!!");NEWLINE
#line 146 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("You have been captured by a bat !!!"));
#line 146 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //    147    PRINTSTRING("You are now in room");WRITE(H,0);NEWLINE
#line 147 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("You are now in room"));
#line 147 "regression-compile-tmp/wumpus.imp"
_imp_WRITE(H, 0);
#line 147 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //    148    %IF H=W %OR H=B1 %OR H=B2 %OR H=P1 %OR H=P2 %THEN ->CHECK
#line 148 "regression-compile-tmp/wumpus.imp"
if (((H) == (W))) goto L_0058;
#line 148 "regression-compile-tmp/wumpus.imp"
if (((H) == (B1))) goto L_0058;
#line 148 "regression-compile-tmp/wumpus.imp"
if (((H) == (B2))) goto L_0058;
#line 148 "regression-compile-tmp/wumpus.imp"
if (((H) == (P1))) goto L_0058;
#line 148 "regression-compile-tmp/wumpus.imp"
if (((H) != (P2))) goto L_0059;
#line 148 "regression-compile-tmp/wumpus.imp"
L_0058:;
#line 148 "regression-compile-tmp/wumpus.imp"
goto U_1008;
#line 148 "regression-compile-tmp/wumpus.imp"
L_0059:;
                                                                //    149    GET NOW
#line 149 "regression-compile-tmp/wumpus.imp"
GETNOW();
                                                                //    150    SUMMARIZE(1)
#line 150 "regression-compile-tmp/wumpus.imp"
SUMMARIZE(1);
                                                                //    151    ->GET MOVE
#line 151 "regression-compile-tmp/wumpus.imp"
goto U_1004;
                                                                //    152    EAT HUNTER:
#line 152 "regression-compile-tmp/wumpus.imp"
U_1009:;
                                                                //    153    PRINTSTRING("You were eaten by the Wumpus!! You LOSE!!!")
#line 153 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("You were eaten by the Wumpus!! You LOSE!!!"));
                                                                //    154    ->FINISH
#line 154 "regression-compile-tmp/wumpus.imp"
goto U_100e;
                                                                //    155    PIT:
#line 155 "regression-compile-tmp/wumpus.imp"
U_100a:;
                                                                //    156    PRINTSTRING("You fell into a BOTTOMless pit!! ")
#line 156 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("You fell into a BOTTOMless pit!! "));
                                                                //    157    PRINTSTRING("You LOSE!!!") %AND ->FINISH %UNLESS %C
#line 157 "regression-compile-tmp/wumpus.imp"
if (((FNR(10)) != (10))) goto L_005a;
#line 157 "regression-compile-tmp/wumpus.imp"
if (((H) == (B1))) goto L_005b;
#line 157 "regression-compile-tmp/wumpus.imp"
if (((H) == (B2))) goto L_005b;
#line 157 "regression-compile-tmp/wumpus.imp"
L_005a:;
#line 157 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("You LOSE!!!"));
#line 157 "regression-compile-tmp/wumpus.imp"
goto U_100e;
#line 157 "regression-compile-tmp/wumpus.imp"
L_005b:;
                                                                //    158         FNR(10)=10 %AND (H=B1 %OR H=B2)
                                                                //    159    PRINTSTRING("But .... ");NEWLINE ; ->BAT
#line 159 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("But .... "));
#line 159 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
#line 159 "regression-compile-tmp/wumpus.imp"
goto U_100b;
                                                                //    160    SHOOT: %IF NO OF ARROWS=0 %THEN ->NO ARROWS
#line 160 "regression-compile-tmp/wumpus.imp"
U_1005:;
#line 160 "regression-compile-tmp/wumpus.imp"
if (((NOOFARROWS) != (0))) goto L_005c;
#line 160 "regression-compile-tmp/wumpus.imp"
goto U_100f;
#line 160 "regression-compile-tmp/wumpus.imp"
L_005c:;
                                                                //    161    NO OF ARROWS=NO OF ARROWS-1
#line 161 "regression-compile-tmp/wumpus.imp"
NOOFARROWS = (((int)(NOOFARROWS)) - (1));
                                                                //    162    A1=H
#line 162 "regression-compile-tmp/wumpus.imp"
A1 = H;
                                                                //    163    %CYCLE I=1,1,5
#line 163 "regression-compile-tmp/wumpus.imp"
I = 0;
if ((((5)-(1)) % (1)) != 0) _imp_signal(5,1,0,"Illegal cycle I = 1, 1, 5");
L_005d:;
if (I == 5) goto L_005e;
I += 1;
                                                                //    164     GET ARROW: PRINTSTRING("Where to?") ; NEWLINE
#line 164 "regression-compile-tmp/wumpus.imp"
U_1010:;
#line 164 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("Where to?"));
#line 164 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //    165     GET REQUEST(J)
#line 165 "regression-compile-tmp/wumpus.imp"
GETREQUEST(&J);
                                                                //    166     %EXITIF J='S'
#line 166 "regression-compile-tmp/wumpus.imp"
if (((J) != (83))) goto L_0060;
#line 166 "regression-compile-tmp/wumpus.imp"
goto L_005e;
#line 166 "regression-compile-tmp/wumpus.imp"
L_0060:;
                                                                //    167     ->BOUNCE %UNLESS J=R(A1,1)  %OR  J=R(A1,2)  %OR  J=R(A1,3)
#line 167 "regression-compile-tmp/wumpus.imp"
if (((J) == (R[(((int)(A1)) - (1))][0]))) goto L_0061;
#line 167 "regression-compile-tmp/wumpus.imp"
if (((J) == (R[(((int)(A1)) - (1))][1]))) goto L_0061;
#line 167 "regression-compile-tmp/wumpus.imp"
if (((J) == (R[(((int)(A1)) - (1))][2]))) goto L_0061;
#line 167 "regression-compile-tmp/wumpus.imp"
goto U_1011;
#line 167 "regression-compile-tmp/wumpus.imp"
L_0061:;
                                                                //    168     ->BOUNCE %UNLESS FNR(10)<10
#line 168 "regression-compile-tmp/wumpus.imp"
if (((FNR(10)) < (10))) goto L_0062;
#line 168 "regression-compile-tmp/wumpus.imp"
goto U_1011;
#line 168 "regression-compile-tmp/wumpus.imp"
L_0062:;
                                                                //    169     A1=J ; %IF A1=W %THEN ->KILL ; %IF A1=H %THEN ->SUICIDE
#line 169 "regression-compile-tmp/wumpus.imp"
A1 = J;
#line 169 "regression-compile-tmp/wumpus.imp"
if (((A1) != (W))) goto L_0063;
#line 169 "regression-compile-tmp/wumpus.imp"
goto U_1012;
#line 169 "regression-compile-tmp/wumpus.imp"
L_0063:;
#line 169 "regression-compile-tmp/wumpus.imp"
if (((A1) != (H))) goto L_0064;
#line 169 "regression-compile-tmp/wumpus.imp"
goto U_1013;
#line 169 "regression-compile-tmp/wumpus.imp"
L_0064:;
                                                                //    170     PRINTSTRING("Missed !!!") ; NEWLINE
#line 170 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("Missed !!!"));
#line 170 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //    171    %REPEAT
#line 171 "regression-compile-tmp/wumpus.imp"
goto L_005d;
#line 171 "regression-compile-tmp/wumpus.imp"
L_005e:;
                                                                //    172    WAKE WUMPUS: %IF FNR(4)=4 %THEN ->MOVELOOP
#line 172 "regression-compile-tmp/wumpus.imp"
U_1014:;
#line 172 "regression-compile-tmp/wumpus.imp"
if (((FNR(4)) != (4))) goto L_0065;
#line 172 "regression-compile-tmp/wumpus.imp"
goto U_1001;
#line 172 "regression-compile-tmp/wumpus.imp"
L_0065:;
                                                                //    173    BOG(W)=1
#line 173 "regression-compile-tmp/wumpus.imp"
BOG[(((int)(W)) - (1))] = 1;
                                                                //    174    W=R(W,FNR(3));  BOG(W)=0 ;
#line 174 "regression-compile-tmp/wumpus.imp"
W = R[(((int)(W)) - (1))][(((int)(FNR(3))) - (1))];
#line 174 "regression-compile-tmp/wumpus.imp"
BOG[(((int)(W)) - (1))] = 0;
                                                                //    175    %IF H#W %THENSTART
#line 175 "regression-compile-tmp/wumpus.imp"
if (((H) == (W))) goto L_0066;
                                                                //    176     PRINTSTRING("You've woken the Wumpus!!!")
#line 176 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("You've woken the Wumpus!!!"));
                                                                //    177     NEWLINE
#line 177 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //    178     ->MOVE LOOP
#line 178 "regression-compile-tmp/wumpus.imp"
goto U_1001;
                                                                //    179    %FINISH
#line 179 "regression-compile-tmp/wumpus.imp"
L_0066:;
                                                                //    180    PRINTSTRING("The Wumpus moved into your room !!!"); NEWLINE
#line 180 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("The Wumpus moved into your room !!!"));
#line 180 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //    181    ->EAT HUNTER
#line 181 "regression-compile-tmp/wumpus.imp"
goto U_1009;
                                                                //    182    SUICIDE: PRINTSTRING("Fool, you shot yourself !!!"); NEWLINE; ->FINISH
#line 182 "regression-compile-tmp/wumpus.imp"
U_1013:;
#line 182 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("Fool, you shot yourself !!!"));
#line 182 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
#line 182 "regression-compile-tmp/wumpus.imp"
goto U_100e;
                                                                //    183    KILL: PRINTSTRING("CONGRATULATIONS, Great White Hunter !!!"); NEWLINE
#line 183 "regression-compile-tmp/wumpus.imp"
U_1012:;
#line 183 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("CONGRATULATIONS, Great White Hunter !!!"));
#line 183 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //    184    PRINTSTRING("You slew the dreaded Wumpus !!!"); ->FINISH
#line 184 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("You slew the dreaded Wumpus !!!"));
#line 184 "regression-compile-tmp/wumpus.imp"
goto U_100e;
                                                                //    185    NO ARROWS: PRINTSTRING("No arrows left !!!");NEWLINE; ->MOVE LOOP
#line 185 "regression-compile-tmp/wumpus.imp"
U_100f:;
#line 185 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("No arrows left !!!"));
#line 185 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
#line 185 "regression-compile-tmp/wumpus.imp"
goto U_1001;
                                                                //    186    TOILET: PRINTSTRING("Whoops! You've landed in Wump-Shit!!!")
#line 186 "regression-compile-tmp/wumpus.imp"
U_100c:;
#line 186 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("Whoops! You've landed in Wump-Shit!!!"));
                                                                //    187    NEWLINE ; ->MOVE LOOP
#line 187 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
#line 187 "regression-compile-tmp/wumpus.imp"
goto U_1001;
                                                                //    188    BOUNCE:
#line 188 "regression-compile-tmp/wumpus.imp"
U_1011:;
                                                                //    189     %CYCLE K=I,1,5
#line 189 "regression-compile-tmp/wumpus.imp"
K = (((int)(I)) - (1));
if ((((5)-(I)) % (1)) != 0) _imp_signal(5,1,0,"Illegal cycle K = I, 1, 5");
L_0067:;
if (K == 5) goto L_0068;
K += 1;
                                                                //    190      PRINTSTRING("BouNCE!!!")
#line 190 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("BouNCE!!!"));
                                                                //    191      NEWLINE
#line 191 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //    192      A1=R(A1,FNR(3))
#line 192 "regression-compile-tmp/wumpus.imp"
A1 = R[(((int)(A1)) - (1))][(((int)(FNR(3))) - (1))];
                                                                //    193      %IF A1=H %THEN ->SUICIDE
#line 193 "regression-compile-tmp/wumpus.imp"
if (((A1) != (H))) goto L_006a;
#line 193 "regression-compile-tmp/wumpus.imp"
goto U_1013;
#line 193 "regression-compile-tmp/wumpus.imp"
L_006a:;
                                                                //    194      %IF A1=W %THEN ->KILL
#line 194 "regression-compile-tmp/wumpus.imp"
if (((A1) != (W))) goto L_006b;
#line 194 "regression-compile-tmp/wumpus.imp"
goto U_1012;
#line 194 "regression-compile-tmp/wumpus.imp"
L_006b:;
                                                                //    195     %REPEAT
#line 195 "regression-compile-tmp/wumpus.imp"
goto L_0067;
#line 195 "regression-compile-tmp/wumpus.imp"
L_0068:;
                                                                //    196    ->WAKE WUMPUS
#line 196 "regression-compile-tmp/wumpus.imp"
goto U_1014;
                                                                //    197    FINISH: NEWLINE
#line 197 "regression-compile-tmp/wumpus.imp"
U_100e:;
#line 197 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //    198    PRINTSTRING("Another game?")
#line 198 "regression-compile-tmp/wumpus.imp"
_imp_PRINTSTRING(_imp_str_literal("Another game?"));
                                                                //    199    NEWLINE
#line 199 "regression-compile-tmp/wumpus.imp"
_imp_NEWLINE();
                                                                //    200    ANS=GETANS
#line 200 "regression-compile-tmp/wumpus.imp"
ANS = GETANS();
                                                                //    201    %IF ANS='Y' %THEN ANS=FNR(10000) %AND ->BEGIN
#line 201 "regression-compile-tmp/wumpus.imp"
if (((ANS) != (89))) goto L_006c;
#line 201 "regression-compile-tmp/wumpus.imp"
ANS = FNR(10000);
#line 201 "regression-compile-tmp/wumpus.imp"
goto U_1002;
#line 201 "regression-compile-tmp/wumpus.imp"
L_006c:;
                                                                //    202   %END
#line 202 "regression-compile-tmp/wumpus.imp"
/* Remove %on %event handler here if present for this block */
return;
} // End of block WUMPUS at level 1
                                                                //    203  
                                                                //    204  %begin
#line 204 "regression-compile-tmp/wumpus.imp"
int main(int argc, char **argv) {
  _imp_initialise(argc, argv);
                                                                //    205    wumpus("")
#line 205 "regression-compile-tmp/wumpus.imp"
WUMPUS(_imp_str_literal(""));
                                                                //    206  %end
#line 206 "regression-compile-tmp/wumpus.imp"
/* Remove %on %event handler here if present for this block */
return 0;
} // End of block _imp_main at level 1
                                                                //    207  
                                                                //    208  %ENDOFFILE
#line 208 "regression-compile-tmp/wumpus.imp"
// End of file
