Subj : Re: Looking moremore optimizations!
To : All
From : Harry Potter
Date : Sat Oct 27 2018 05:21 am
Let me try again:
-------------------------
void vLook (void)//char Itm1)
{
static void (*func)();
if (Itm1!=0xFF) {
if (SearchInvPlayer () || SearchInvRoom ())
{
if ((s=hidereadw((void*)&Item[Itm1].Info))==0) {
printscr ("No help available for that item.");
return;
}
printh (s);
//printh ((void*)&Item[Itm1].Info);
//else
// ;
//return;
//}
}
else {
//puts (Message[msgItemNotAvail]);
printmsg(msgItemNotAvail);
}
return;
}
CurRoomInv=Player.RoomInv[CRoom];
CRm=(void*)&Room[CRoom];
printh ((char*)hidereadw((void*)&CRm->Desc));
func=hidereadw((void*)&CRm->RoomHandler);
(*func) ();
printcr();
for (i=0; i<8 && (c=CurRoomInv[i])!=0xFF;++i) {
prints ("There is a ");
printh (hidereadw((void*)&Item[/*CurRoomInv[i]*/c].Name));
printscr (" here.");
}
if (i)
printcr();
}
void vLook2 (void)
{
Itm1=-1;
vLook ();
}
void vGo ()//char Itm1)
{
if (Itm1>=160 && Itm1<164) {
j = Itm1&0x0F; //goto godir;
if ((i=CRm->NextRoom[j])==0xFF) {
printmsg(msgCantGoThere); return;
}
CRoom = i; goto exitgood;
}
switch (Itm1)
{
case iTeleporter:
if (!SearchInvRoom()) {
printscr ("There's no teleporter here.");
return;
}
Player.ExitRoom = CRoom;
CRoom = rTeleporter;
goto exitgood;
}
printmsg(msgCantGoThere); return;
godir:
exitgood:
Player.ExitRoom =-1; vLook2();
}
------------------------------------
void main (void)
{
//static unsigned char c;
//static char Input [38];
//static unsigned char Vrb;//, Itm, ItmNum, CurPos;
//static unsigned char CurPos;//IncPos;
//static unsigned char i;
static void (* vfunc) ();
//printf ("%X\n", &Item[0].Name);
//cgetc();
//bordercolor(8); bgcolor (1);
//textcolor (4);
brdrcol=8;
backcol=1;
//textcol=4;
/*123456789012345678901234567890123456789*/
//clrscr ();
printscr("\f\n\x9cWelcome to \"Adventures on Planet Smir\n"
"III, Episode 1, v .10\" for the Commo-\n"
"dore 64 and emulators, created with cc65"
"by Joseph Rose.\n\n"
"Type INTRO during the game for\n"
"instructions.\n\n"
"Do you want to load a saved game?");
switch (getkey ())
{
case 'd': ++c;
case 'y': ++c;
}
InitPlayer ();
if (c==2) {
printscr ("Debug mode: Enter room #"); GetInput (Input, 4);
for (CurPos=0;Input[CurPos]; ++CurPos)
{
CRoom=(((CRoom<<2)+CRoom)<<1)+(Input[CurPos]&0xF);
}
}
vLook2 ();
while (1)
{
DispScoreBoard();
if (!GetInput (Input,38)) continue;
Vrb = FindVerb (/*Input*/);
if (Vrb == 0xFF) {
prints ("I don't know how to ");
prints (Input);
printperiod ();
continue;
}
while (Input[CurPos]==32) ++CurPos;
if (Input[CurPos]) //Itm1=-1; goto runverb;}
{
if ((Itm1 = FindItem (&Input[CurPos]))==0xFF ) {
prints ("I don't know what a ");
prints (&Input[CurPos]);
printscr (" is.");
continue;
}
} else Itm1=0xFF;
vfunc=hidereadw((void*)&Verb[Vrb].vdo);
(*vfunc) ();
}
}
-----------------------
Does this help? :)
BTW, if necesssary, I can supply some of the variables' purposes.
--- SoupGate-Win32 v1.05
* Origin: Agency HUB, Dunedin - New Zealand | Fido<>Usenet Gateway (3:770/3)
