TalkEngine_Types.p

unit
	TalkEngine_Types;


interface


uses
	types,
	quickdraw,
	icons;
	

const
	MaxAnswer =			4;
	StrNum =			999;
	TalkItemResType =	'TlkI';
	TalkResType =		'Talk';
	TalkDialogId =		999;
	
	
type
	TalkItem =	record
					Id :			longint;
					HisSentence :	str255;
					MySentence :	array [1..MaxAnswer] of str255;
					Next :			array [1..MaxAnswer] of longint;
					Multiple :		array [1..MaxAnswer] of boolean;
					Charisma :		array [1..MaxAnswer] of boolean;
					IsEnd :			array [1..MaxAnswer] of boolean;
					EncounterId :	array [1..MaxAnswer] of integer;
					Visited :		boolean;
					Reserved :		boolean;
					Reserved2 :	 integer;
				end;
	TalkItemPtr =	^TalkItem;
	
	TalkItemR =	record
					Id :			integer;
					HisSentence :	integer;
					MySentence :	array [1..MaxAnswer] of integer;
					Next :			array [1..MaxAnswer] of longint;
					Multiple :		array [1..MaxAnswer] of boolean;
					Charisma :		array [1..MaxAnswer] of boolean;
					IsEnd :			array [1..MaxAnswer] of boolean;
					EncounterId :	array [1..MaxAnswer] of integer;
					Visited :		boolean;
					Reserved :		boolean;
					Reserved2 :		integer;
				end;
	TalkItemRPtr =	^TalkItemR;
	TalkItemRHandle =	^TalkItemRPtr;
	
	TalkR =	record
				Id :			longint;
				StartItem :		longint;
				StringId :		longint;
				HisPicture :	longint;
				Name :			str255;
			end;
	TalkRPtr =	^TalkR;
	TalkRHandle =	^TalkRPtr;
				
	Talk =	record
				Id :			longint;
				StartItem :		longint;
				StringId :		longint;
				MyPicture :		ciconhandle;
				HisPicture :	ciconhandle;
				Name :			str255;
			end;
	TalkPtr =	^Talk;
	TalkHandle =	^TalkPtr;


implementation


end.