home *** CD-ROM | disk | FTP | other *** search
- #
- # 03_farmer.cog
- #
- # CommuniCog for farmer in moisture level
- #
- # Desc:
- # Farmer Jon's talking stuff....
- #
- # 2/25/98 [JP] modified using doug's mazedroid code....
- #-----------------------------------------------------------------------------
-
- symbols
- message converse
- message startup
- message user1
- message arrived
- message timer
-
- thing Gonk // le farmer
- thing player local
-
- int Met=0 local
- int Joke=0 local
- int spoken_1=0 local
- int gears=0 local
- int ConversationActive=0 local
- int gonkcurframe=0 local
- int ResponseID local
- int bye=0 local
- flex wait_time=1.3 local
- end
-
-
- code
- startup:
- //dwplaycammyspeech(16000, "M3CA001.wav", 5, 2);
- player=getlocalplayerthing();
- sleep(0.5);
- //SetActorFlags(GetLocalPlayerThing(), 0x200000);
- # display the text in color 96 (white)
-
- dwplaycharacterspeech("MFC001", "M3MP001.wav"); // hey droid, over here!
- dwClearDialog();
- return;
-
-
- converse:
- // What response did the player select?
- playerpos=getthingpos(player);
- aisetlookpos(gonk, playerpos);
-
- dwplayplayerresponse();
- ResponseID = dwGetPlayerResponse();
-
- if (ResponseID == 0 && !ConversationActive)
- {
- //# Response 0 is reserved to indicate that a conversation is starting
- ConversationActive = 1;
- PlaySong(0, 0, 0);
- dwfreezeplayer();
-
- //# and appropriate responses
- ResponseID = 1;
- }
-
- if (ResponseID == 1) #beginning Node
- {
- //+++++++++++++++++++++++++++++++++++++++++++++++ Greetings setup
- if (met == 0) // If they haven't met.
- {
- dwplaycharacterspeech("MFC002", "M3MP002.wav"); // farmer: glad you're here....
- met = 2; // Tell him to say "anything else?"
- }
- else if (met == 1)
- {
- dwplaycharacterspeech("MFC003", "M3MP004.wav"); // farmer: what do you want now?
- met = 2; // Tell him to say "anything else?"
- }
- else if (met == 2)
- {
- dwplaycharacterspeech("MFC800", "M3MP014.wav"); // farmer: should say: do you have any other questions?
- }
-
- //+++++++++++++++++++++++++++++++++++++++++++++++ END Greetings setup
- dwAddResponse(100, "MFP100", "T6xx012.wav", 73); //Player: What are you doing here?
- //dwAddResponse(200, "MFP200", "M3xx007.wav", 72); //Player: Was it an assassin droid?
- //dwAddResponse(300, "MFP300"); //Player: What are moisture vaporators?
- dwAddResponse(400, "MFP400", "M3xx011.wav", 71); //Player: Do you have an information crystal?
- dwAddResponse(500, "MFP500", "M3xx012.wav", 72); //Player: How do I get started?
- dwAddResponse(006, "MFP006", "IDxx222.wav", 20); //Player: goodbye
-
- }
-
- if (ResponseID == 100)
- {
- dwplaycharacterspeech("MFC100", "M3MP005.wav"); // farmer: I own this moisture farm...
- met = 2; //changed to 2
- dwAddResponse(1,"MFP002", "M3xx001.wav", 40); // player: hm things do sound bad... (send it back to the root node)
- dwAddResponse(300, "MFP300", "M3xx008.wav", 72); //player: what are moisture vaporators?
- }
-
- //if (ResponseID == 200)
- // {
- // dwplaycharacterspeech("MFC200", "M3MP006.wav"); // farmer: Assassin droid? Since when...
- // dwAddResponse(1, "MFP003", "T6xx006.wav", 60 ); // Player: oh, okay (send it back to the root node)
- // }
-
- if (ResponseID == 300)
- {
- dwplaycharacterspeech("MFC300", "M3MP007.wav"); // farmer: Aw, blaster bolts!.... these machines blah blah blah...
- dwAddResponse(301, "MFP301", "M3xx009.wav", 71); //player: how do they work?
- //dwAddResponse(1,"STP001"); // player: Thanks. (send it back to the root node)
- }
- if (ResponseID == 301) //
- {
- dwplaycharacterspeech("MFC301", "M3MP008.wav"); // farmer: Moisture vaporators extract....
- dwAddResponse(302, "MFP302", "M3xx010.wav", 73); //player: where do you store water?
- dwAddResponse(1, "MFP003", "T6xx006.wav", 60); // player: oh. (send it back to the root node)
- dwAddResponse(1, "MFP007", "M3xx004.wav", 70); // player: interesting (send it back to the root node)
- }
- if (ResponseID == 302) //
- {
- dwplaycharacterspeech("MFC302", "M3MP010.wav"); // farmer: We use most of the water...
- dwAddResponse(1, "MFP004", "T1xx014.wav", 60); // player: okay. (send it back to the root node)
- }
- if (ResponseID == 400) // I'm here to rescue you....
- {
- dwplaycharacterspeech("MFC400", "M3MP011.wav"); // farmer: Well, yeah...
- dwAddResponse(1, "MFP004", "T1xx014.wav", 30); // player: okay. (send it back to the root node)
- }
- if (ResponseID == 500)
- {
- dwplaycharacterspeech("MFC500", "M3MP012.wav"); // farmer: Go through the entrance...
- dwAddResponse(1, "MFP005", "T3xx002.wav", 30); // player: thanx (send it back to the root node)
- }
-
- if (ResponseID == 006) // # bye
- {
- //dwplaycharacterspeech("bye"); //Complete goodbye
- print("clear");
- dwcleardialog();
- ConversationActive = 0;
- ShuffleTracks(6, 7, 8, 9);
- met = 1;
- dwunfreezeplayer();
- }
-
- return;
- arrived:
-
- return;
-
- end
-
-
-