-int discard(bool just_do_it) {
- if(just_do_it) goto L9021;
- if(TOTING(ROD2) && OBJ == ROD && !TOTING(ROD))OBJ=ROD2;
- if(!TOTING(OBJ)) return(2011);
- if(OBJ != BIRD || !HERE(SNAKE)) goto L9023;
- RSPEAK(30);
- if(CLOSED) return(19000);
- DSTROY(SNAKE);
-/* SET PROP FOR USE BY TRAVEL OPTIONS */
- PROP[SNAKE]=1;
-L9021: K=LIQ(0);
- if(K == OBJ)OBJ=BOTTLE;
- if(OBJ == BOTTLE && K != 0)PLACE[K]=0;
- if(OBJ == CAGE && PROP[BIRD] == 1)DROP(BIRD,LOC);
- DROP(OBJ,LOC);
- if(OBJ != BIRD) return(2012);
- PROP[BIRD]=0;
- if(FOREST(LOC))PROP[BIRD]=2;
- return(2012);
-
-L9023: if(!(GSTONE(OBJ) && AT(CAVITY) && PROP[CAVITY] != 0)) goto L9024;
- RSPEAK(218);
- PROP[OBJ]=1;
- PROP[CAVITY]=0;
- if(!HERE(RUG) || !((OBJ == EMRALD && PROP[RUG] != 2) || (OBJ == RUBY &&
- PROP[RUG] == 2))) goto L9021;
- SPK=219;
- if(TOTING(RUG))SPK=220;
- if(OBJ == RUBY)SPK=221;
- RSPEAK(SPK);
- if(SPK == 220) goto L9021;
- K=2-PROP[RUG];
- PROP[RUG]=K;
- if(K == 2)K=PLAC[SAPPH];
- MOVE(RUG+NOBJECTS,K);
- goto L9021;
-
-L9024: if(OBJ != COINS || !HERE(VEND)) goto L9025;
- DSTROY(COINS);
- DROP(BATTER,LOC);
- PSPEAK(BATTER,0);
- return(2012);
-
-L9025: if(OBJ != BIRD || !AT(DRAGON) || PROP[DRAGON] != 0) goto L9026;
- RSPEAK(154);
- DSTROY(BIRD);
- PROP[BIRD]=0;
- return(2012);
-
-L9026: if(OBJ != BEAR || !AT(TROLL)) goto L9027;
- RSPEAK(163);
- MOVE(TROLL,0);
- MOVE(TROLL+NOBJECTS,0);
- MOVE(TROLL2,PLAC[TROLL]);
- MOVE(TROLL2+NOBJECTS,FIXD[TROLL]);
- JUGGLE(CHASM);
- PROP[TROLL]=2;
- goto L9021;
-
-L9027: if(OBJ == VASE && LOC != PLAC[PILLOW]) goto L9028;
- RSPEAK(54);
- goto L9021;
-
-L9028: PROP[VASE]=2;
- if(AT(PILLOW))PROP[VASE]=0;
- PSPEAK(VASE,PROP[VASE]+1);
- if(PROP[VASE] != 0)FIXED[VASE]= -1;
- goto L9021;
+int discard(long obj, bool just_do_it) {
+ if (!just_do_it) {
+ if (TOTING(ROD2) && obj == ROD && !TOTING(ROD))obj=ROD2;
+ if (!TOTING(obj)) return(2011);
+ if (obj == BIRD && HERE(SNAKE)) {
+ RSPEAK(30);
+ if (game.closed) return(19000);
+ DSTROY(SNAKE);
+ /* Set game.prop for use by travel options */
+ game.prop[SNAKE]=1;
+
+ } else if ((GSTONE(obj) && AT(CAVITY) && game.prop[CAVITY] != 0)) {
+ RSPEAK(218);
+ game.prop[obj]=1;
+ game.prop[CAVITY]=0;
+ if (HERE(RUG) && ((obj == EMRALD && game.prop[RUG] != 2) || (obj == RUBY &&
+ game.prop[RUG] == 2))) {
+ SPK=219;
+ if (TOTING(RUG))SPK=220;
+ if (obj == RUBY)SPK=221;
+ RSPEAK(SPK);
+ if (SPK != 220) {
+ K=2-game.prop[RUG];
+ game.prop[RUG]=K;
+ if (K == 2)K=PLAC[SAPPH];
+ MOVE(RUG+NOBJECTS,K);
+ }
+ }
+ } else if (obj == COINS && HERE(VEND)) {
+ DSTROY(COINS);
+ DROP(BATTER,game.loc);
+ PSPEAK(BATTER,0);
+ return(2012);
+ } else if (obj == BIRD && AT(DRAGON) && game.prop[DRAGON] == 0) {
+ RSPEAK(154);
+ DSTROY(BIRD);
+ game.prop[BIRD]=0;
+ return(2012);
+ } else if (obj == BEAR && AT(TROLL)) {
+ RSPEAK(163);
+ MOVE(TROLL,0);
+ MOVE(TROLL+NOBJECTS,0);
+ MOVE(TROLL2,PLAC[TROLL]);
+ MOVE(TROLL2+NOBJECTS,FIXD[TROLL]);
+ JUGGLE(CHASM);
+ game.prop[TROLL]=2;
+ } else if (obj != VASE || game.loc == PLAC[PILLOW]) {
+ RSPEAK(54);
+ } else {
+ game.prop[VASE]=2;
+ if (AT(PILLOW))game.prop[VASE]=0;
+ PSPEAK(VASE,game.prop[VASE]+1);
+ if (game.prop[VASE] != 0)game.fixed[VASE]= -1;
+ }
+ }
+ K=LIQ(0);
+ if (K == obj)obj=BOTTLE;
+ if (obj == BOTTLE && K != 0)game.place[K]=0;
+ if (obj == CAGE && game.prop[BIRD] == 1)DROP(BIRD,game.loc);
+ DROP(obj,game.loc);
+ if (obj != BIRD) return(2012);
+ game.prop[BIRD]=0;
+ if (FOREST(game.loc))game.prop[BIRD]=2;
+ return(2012);