DACT: CLPART Olaf_Bagdad.iff;BOBS 10,11,0,0,16,20,15,0;BOBS 10,21,0,25,16,20,15,0;BOBS 10,31,0,50,16,20,15,0;CLPART OFF
DACT: CBOB 14;SETRF 0,1=1
/* Go!
DACT: LIGHTS ON
/* If first visit, greet the player...
DACT: IFRF 1=0;W 50;BOBON 30,320,35,RBOB5;W 100;BOBON 29,320,49,RBOB6;W 300;BOBOFF 30;BOBOFF 29;W 100;SAY I have obviously arrived after business hours...;SAY ...the place seems almost deserted.;SETRF 1=1
DACT: EXIT
/* Action 0 - Exit
/* ---------------
/* Without the map, Olaf just wanders around in circles trying to find
/* his way around exits 3,4 and 5,6
ACTION: 0;TEXT -1,20,1,Sorry - This is the end of the demo!\Watch out for the complete adventure\some time in 1997!;EXIT
/* Action 1 - Give
/* Action 2 - Pick up
/*
/* Action 3 - Use
/* --------------
/*
ACTION: 3;IFOBJ ROBJ1;SAY I don't need to wash.;SAY I did that last Christmas!;EXIT
/* Use a CMOVE instead of MOBJ because Marlboro is not his usual size!
ACTION: 3;IFOBJ 11;CMOVE 295,111,P;GOTO 5,3
ACTION: 3;IFOBJ 10;IFOBJ2 ROBJ1;SAY I am certainly not going to put the cinders out after going through all that trouble to get them!;EXIT
/*
/* Action 4 - Open
/* Action 5 - Talk to
/* Action 6 - Push
/* Action 7 - Close
/*
/* Action 8 - Look at
/* ------------------
ACTION: 8;IFOBJ ROBJ1;MOBJ;SAY The basin is filled with fresh water.;EXIT
ACTION: 8;IFOBJ 11;CMOVE 295,111,P;SAY Marlboro seems to like it here!;EXIT