fteqw/quakec/fallout2/csqc/invent.qc

965 lines
No EOL
24 KiB
C++

void bprint(float plev, string st, string s2){}
float PRINT_MEDIUM = 1;
#include "../inventory.qc"
float show_inventory;
float show_pipboy;
float show_trader;
vector mousepos;
float showcontextmenu;
vector contextpos;
float slotnum; //the current slot under the mousecursor
float sliderpos;
float downslotnum; //the slot number when the mousecursor when down
vector toppos = '0 32 0';
float k_mouse1;
float k_mwheelup;
float k_mwheeldown;
float mouseisdown;
#define IMGSIZEF 64
#define IMGSIZEV ('1 1 0'*IMGSIZEF)
#define IMGSIZEK 32
#define IMGSIZEH ('1 1 0'*IMGSIZEK)
#define IMGSIZEX 48
#define IMGSIZEZ ('1 1 0'*IMGSIZEX)
#define IMGSIZEQ ('1 1 0'*2)
#define CURSORSIZE 8
void(vector pos, float slotno) TraderImage =
{
local float it, mod_s, mod_e;
local string itname;
if (slotno == downslotnum && slotnum)
slotno = slotnum;
else if (slotno == slotnum && downslotnum)
slotno = downslotnum;
if (slotno <= 20)
it = getstati(70+slotno);
itname = GetItemImage(ToIID(it));
drawpic(pos, strcat("gui/", itname), IMGSIZEV, '1 1 1', 1);
it = ToStatus(it);
if (it <= 1)
return;
itname = ftos(it);
it = strlen(itname);
drawstring(pos + IMGSIZEV - '0 8 0' - '8 0 0'*it, itname, '8 8 8', '1 1 1', 1);
};
void(vector pos, float slotno) SlotImage =
{
local float it, mod_s, mod_e;
local string itname;
if (slotno == downslotnum && slotnum)
slotno = slotnum;
else if (slotno == slotnum && downslotnum)
slotno = downslotnum;
if (slotno <= 16)
it = getstati(31+slotno);
else
{
if (slotno == 17)
it = getstati(91);
if (slotno == 18)
it = getstati(92);
if (slotno == 19)
it = getstati(93);
if (slotno == 20)
it = getstati(94);
if (slotno == 21)
it = getstati(95);
if (slotno == 22)
it = getstati(96);
if (slotno == 23)
it = getstati(97);
if (slotno == 24)
it = getstati(98);
if (slotno == 25)
it = getstati(104);
if (slotno == 26)
it = getstati(105);
}
itname = GetItemImage(ToIID(it));
drawpic(pos, strcat("gui/", itname), IMGSIZEV, '1 1 1', 1);
it = ToStatus(it);
if (it <= 1)
return;
itname = ftos(it);
it = strlen(itname);
drawstring(pos + IMGSIZEV - '0 8 0' - '8 0 0'*it, itname, '8 8 8', '1 1 1', 1);
};
void(vector pos, float slotno) SlotImageSmall =
{
local float it, mod_s, mod_e;
local string itname;
if (slotno == downslotnum && slotnum)
slotno = slotnum;
else if (slotno == slotnum && downslotnum)
slotno = downslotnum;
if (slotno <= 16)
it = getstati(31+slotno);
else
{
if (slotno == 17)
it = getstati(91);
if (slotno == 18)
it = getstati(92);
if (slotno == 19)
it = getstati(93);
if (slotno == 20)
it = getstati(94);
if (slotno == 21)
it = getstati(95);
if (slotno == 22)
it = getstati(96);
if (slotno == 23)
it = getstati(97);
if (slotno == 24)
it = getstati(98);
if (slotno == 25)
it = getstati(104);
if (slotno == 26)
it = getstati(105);
}
itname = GetItemImage(ToIID(it));
drawpic(pos, strcat("gui/", itname), IMGSIZEH, '1 1 1', 1);
it = ToStatus(it);
if (it <= 1)
return;
itname = ftos(it);
it = strlen(itname);
drawstring(pos + IMGSIZEZ - '0 16 0' - '16 0 0'*it, itname, '8 8 8', '1 1 1', 1);
};
void(vector pos, float slotno) QuickImage =
{
local float it;
local string itname;
if (slotno == downslotnum && slotnum)
slotno = slotnum;
else if (slotno == slotnum && downslotnum)
slotno = downslotnum;
it = getstati(31+slotno);
itname = GetItemImage(ToIID(it));
drawpic(pos, strcat("gui/", itname), IMGSIZEH, '1 1 1', 1);
it = ToStatus(it);
if (it <= 1)
return;
itname = ftos(it);
it = strlen(itname);
drawstring(pos + IMGSIZEH - '0 8 0' - '8 0 0'*it, itname, '8 8 8', '1 1 1', 1);
};
void() ScreenImage =
{
float width,height;
vector w;
width = cvar("vid_conwidth");
height = cvar("vid_conheight");
w = '1 1 0'*width;
if (getstati(57) == 0)
drawpic('0 0 0', "gui/screen.jpg", w, '1 1 1', 1);
else if (getstati(57) == 2)
drawpic('0 0 0', "gui/moveout.jpg", w, '1 1 1', 1);
else if (getstati(57) == 3)
drawpic('0 0 0', "gui/complete.jpg", w, '1 1 1', 1);
else if (getstati(57) == 4)
drawpic('0 0 0', "gui/none.jpg", w, '1 1 1', 1);
else if (getstati(57) == 5)
drawpic('0 0 0', "gui/xflash.jpg", w, '1 1 1', 1);
else if (getstati(57) == 6)
drawpic('0 0 0', "gui/xcarnage.jpg", w, '1 1 1', 1);
};
string(float x) GetMonsterName =
{
if (x == 1 || x == 2)
return "wild dogs";
else if (x == 3 || x == 4)
return "ghouls";
else if (x == 5 || x == 6 || x == 7)
return "raiders";
else if (x == 8 || x == 9)
return "mutants";
else if (x == 10 || x == 11)
return "scrags";
else if (x == 12 || x == 13)
return "enclave";
else if (x == 14 || x == 15)
return "deathclaws";
else
return "multiple unknowns";
};
void() BriefImage =
{
float width,height, t, o, e1, e2, e3, loca;
vector w;
string m, x, m4, loc;
t = getstati(64);
loca = getstati(65);
o = getstati(66);
e1 = getstati(67);
e2 = getstati(68);
e3 = getstati(69);
width = cvar("vid_conwidth");
width = width * 0.5;
height = cvar("vid_conheight");
w = '1 1 0'*width;
if (loca == 1)
m4 = "gui/brief/map1.jpg";
else if (loca == 2)
m4 = "gui/brief/map2.jpg";
else if (loca == 3)
m4 = "gui/brief/map3.jpg";
else if (loca == 4)
m4 = "gui/brief/map4.jpg";
else
m4 = "gui/brief/map5.jpg";
if (loca == 1)
loc = "Eastgate";
else if (loca == 2)
loc = "Moonbrook";
else if (loca == 3)
loc = "Malan";
else if (loca == 4)
loc = "Military Base";
else
loc = "D Zone";
if (o == 0)
drawpic('0 0 0', "gui/brief/brief1.jpg", w, '1 1 1', 1);
if (o == 1)
drawpic('0 0 0', "gui/brief/brief1.jpg", w, '1 1 1', 1);
if (o == 2)
drawpic('0 0 0', "gui/brief/brief2.jpg", w, '1 1 1', 1);
if (o == 3)
drawpic('0 0 0', "gui/brief/brief3.jpg", w, '1 1 1', 1);
if (o == 4)
drawpic('0 0 0', "gui/brief/brief4.jpg", w, '1 1 1', 1);
if (o == 5)
drawpic('0 0 0', "gui/brief/brief5.jpg", w, '1 1 1', 1);
if (o == 6)
drawpic('0 0 0', "gui/brief/brief6.jpg", w, '1 1 1', 1);
if (o == 7)
drawpic('0 0 0', "gui/brief/brief7.jpg", w, '1 1 1', 1);
if (o == 8)
drawpic('0 0 0', "gui/brief/brief8.jpg", w, '1 1 1', 1);
drawpic('0 0 0'+('1 0 0'*(width)), "gui/brief/icon.jpg", w, '1 1 1', 1);
drawpic('0 0 0'+('0 1 0'*(width)), "gui/brief/intel.jpg", w, '1 1 1', 1);
drawpic('0 0 0'+('1 1 0'*(width)), m4, w, '1 1 1', 1);
drawstring('0 0 0'+('1 0 0'*(width*0.40))+('0 1 0'*(height*0.69)), loc, '8 8 8', '1 1 1', 1);
m = GetMonsterName(e1);
drawstring('0 20 0'+('1 0 0'*(width*0.10))+('0 1 0'*(height*0.85)), m, '8 8 8', '1 1 1', 1);
m = GetMonsterName(e2);
drawstring('0 35 0'+('1 0 0'*(width*0.10))+('0 1 0'*(height*0.85)), m, '8 8 8', '1 1 1', 1);
m = GetMonsterName(e3);
drawstring('0 50 0'+('1 0 0'*(width*0.10))+('0 1 0'*(height*0.85)), m, '8 8 8', '1 1 1', 1);
};
void(vector pos, float slotno) BlankImage =
{
drawpic(pos, strcat("gui/", "none.jpg"), IMGSIZEV, '1 1 1', 1);
};
void(vector pos, float hpcolor, string image) HealthImage =
{
float height, width, o, tyme, min, sec;
local string itname, ts, tm, t;
if (hpcolor == 0)
drawpic(pos, strcat("gui/hnum/", image), IMGSIZEH, '1 1 1', 1);
else if (hpcolor == 1)
drawpic(pos, strcat("gui/ynum/", image), IMGSIZEH, '1 1 1', 1);
else
drawpic(pos, strcat("gui/rnum/", image), IMGSIZEH, '1 1 1', 1);
width = cvar("vid_conwidth");
height = cvar("vid_conheight");
o = getstati(66);
if (o == 1)
drawstring('0 16 0'+('1 0 0'*(width*0.10))+('0 1 0'*(height*0.90)), "mission: civilian rescue", '8 8 8', '1 1 1', 1);
if (o == 2)
drawstring('0 16 0'+('1 0 0'*(width*0.10))+('0 1 0'*(height*0.90)), "mission: secure supply line", '8 8 8', '1 1 1', 1);
if (o == 3)
drawstring('0 16 0'+('1 0 0'*(width*0.10))+('0 1 0'*(height*0.90)), "mission: shadow op", '8 8 8', '1 1 1', 1);
if (o == 4)
drawstring('0 16 0'+('1 0 0'*(width*0.10))+('0 1 0'*(height*0.90)), "mission: deadtown", '8 8 8', '1 1 1', 1);
if (o == 5)
drawstring('0 16 0'+('1 0 0'*(width*0.10))+('0 1 0'*(height*0.90)), "mission: destroy fuel tanks", '8 8 8', '1 1 1', 1);
if (o == 6)
drawstring('0 16 0'+('1 0 0'*(width*0.10))+('0 1 0'*(height*0.90)), "mission: defuse explosives", '8 8 8', '1 1 1', 1);
};
void(vector pos, float img) PosImage =
{
if (img == 1)
drawpic(pos, strcat("gui/", "sneak.jpg"), IMGSIZEH, '1 1 1', 1);
if (img == 2)
drawpic(pos, strcat("gui/", "prone.jpg"), IMGSIZEH, '1 1 1', 1);
};
void(vector pos, float img) ChemImage =
{
if (img == 0)
drawpic(pos, strcat("gui/chem/", "zone.jpg"), IMGSIZEH, '1 1 1', 1);
if (img == 1)
drawpic(pos, strcat("gui/chem/", "rage1.jpg"), IMGSIZEH, '1 1 1', 1);
if (img == 2)
drawpic(pos, strcat("gui/chem/", "rage2.jpg"), IMGSIZEH, '1 1 1', 1);
if (img == 3)
drawpic(pos, strcat("gui/chem/", "rage3.jpg"), IMGSIZEH, '1 1 1', 1);
if (img == 4)
drawpic(pos, strcat("gui/chem/", "heal.jpg"), IMGSIZEH, '1 1 1', 1);
if (img == 5)
drawpic(pos, strcat("gui/chem/", "paranoia.jpg"), IMGSIZEH, '1 1 1', 1);
};
void(vector pos, string image) MoneyImage =
{
local string itname;
drawpic(pos, strcat("gui/", image), IMGSIZEH, '1 1 1', 1);
};
void(vector pos, string image) Crosshair =
{
local string itname;
drawpic(pos, image, IMGSIZEQ, '1 1 1', 1);
};
void() Trader_Draw =
{
local float i, price, money;
local float it;
local string itname, money2, s2, s3, s4, s5, s6, s7, s8, s9, perki, perk2i, p1, p2, pn, pd, price2;
local float op;
float width,height,lvl,bar;
vector w;
width = cvar("vid_conwidth");
height = cvar("vid_conheight");
//w = '1 1 0'*height;
drawpic('0 0 0', "gui/pipboy/buyscreen.jpg", '468 468 0', '1 1 1', 1);
TraderImage('1 1 0'*IMGSIZEF, 1);
TraderImage('2 1 0'*IMGSIZEF, 2);
TraderImage('3 1 0'*IMGSIZEF, 3);
TraderImage('4 1 0'*IMGSIZEF, 4);
TraderImage('5 1 0'*IMGSIZEF, 5);
TraderImage('1 2 0'*IMGSIZEF, 6);
TraderImage('2 2 0'*IMGSIZEF, 7);
TraderImage('3 2 0'*IMGSIZEF, 8);
TraderImage('4 2 0'*IMGSIZEF, 9);
TraderImage('5 2 0'*IMGSIZEF, 10);
TraderImage('1 3 0'*IMGSIZEF, 11);
TraderImage('2 3 0'*IMGSIZEF, 12);
TraderImage('3 3 0'*IMGSIZEF, 13);
TraderImage('4 3 0'*IMGSIZEF, 14);
TraderImage('5 3 0'*IMGSIZEF, 15);
TraderImage('1 4 0'*IMGSIZEF, 16);
TraderImage('2 4 0'*IMGSIZEF, 17);
TraderImage('3 4 0'*IMGSIZEF, 18);
TraderImage('4 4 0'*IMGSIZEF, 19);
TraderImage('5 4 0'*IMGSIZEF, 20);
if (mousepos_x >= 1*IMGSIZEF && mousepos_x <= 6*IMGSIZEF)
if (mousepos_y >= 1*IMGSIZEF && mousepos_y <= 2*IMGSIZEF)
slotnum = floor((mousepos_x)/IMGSIZEF) + 0;
if (mousepos_x >= 1*IMGSIZEF && mousepos_x <= 6*IMGSIZEF)
if (mousepos_y >= 2*IMGSIZEF && mousepos_y <= 3*IMGSIZEF)
slotnum = floor((mousepos_x)/IMGSIZEF) + 5;
if (mousepos_x >= 1*IMGSIZEF && mousepos_x <= 6*IMGSIZEF)
if (mousepos_y >= 3*IMGSIZEF && mousepos_y <= 4*IMGSIZEF)
slotnum = floor((mousepos_x)/IMGSIZEF) + 10;
if (mousepos_x >= 1*IMGSIZEF && mousepos_x <= 6*IMGSIZEF)
if (mousepos_y >= 4*IMGSIZEF && mousepos_y <= 5*IMGSIZEF)
slotnum = floor((mousepos_x)/IMGSIZEF) + 15;
if (showcontextmenu && show_trader)
{
drawfill(contextpos - '8 8 0', '48 48 0', '0 0 0', 1.0);
op = floor((mousepos_y - contextpos_y)/8);
drawstring(contextpos + '0 8 0', "buy?", '8 8 0', '1 1 0' + (op!=0)*'0 0 1',
1);
}
if (slotnum <= 20)
it = getstati(70+slotnum);
itname = GetItemDesc(ToIID(it));
drawstring('32 16 0', itname, '8 8 0', '1 1 1', 1);
price = GetBaseValue(ToIID(it));
price2 = ftos(price);
money = getstati(50);
money2 = ftos(money);
drawstring('2 6 0'*IMGSIZEF - '16 48 0', " TOTAL ", '16 16 0', '1 1 1', 1);
drawstring('2 6 0'*IMGSIZEF - '16 32 0', " PRICE ", '16 16 0', '1 1 1', 1);
drawstring('2 6 0'*IMGSIZEF + '16 0 0', price2, '16 16 0', '1 1 1', 1);
drawstring('4 6 0'*IMGSIZEF - '16 48 0', " TOTAL ", '16 16 0', '1 1 1', 1);
drawstring('4 6 0'*IMGSIZEF - '16 32 0', " MONEY ", '16 16 0', '1 1 1', 1);
drawstring('4 6 0'*IMGSIZEF + '16 0 0', money2, '16 16 0', '1 1 1', 1);
drawpic(mousepos, "gui/cursor.jpg", '1 1 0'*CURSORSIZE, '1 1 1', 1);
};
void() Pipboy_Draw =
{
float width,height,lvl,bar;
vector w;
width = cvar("vid_conwidth");
height = cvar("vid_conheight");
drawpic('0 0 0', "gui/pipboy/pipboy.jpg", '640 480 0', '1 1 1', 1);
drawstring('3 2 0'*IMGSIZEF, "COMBAT", '8 8 8', '1 1 1', 1);
bar = 0;
lvl = getstati(100);
while (bar <= lvl)
{
drawpic('4 2 0'*IMGSIZEF + ('4 0 0'*bar), "gui/graph/red.jpg", '1 4 0'*2, '1 1 1', 1);
bar = bar + 1;
}
drawstring('3 2.2 0'*IMGSIZEF, "DOCTOR", '8 8 8', '1 1 1', 1);
bar = 0;
lvl = getstati(101);
while (bar <= lvl)
{
drawpic('4 2.2 0'*IMGSIZEF + ('4 0 0'*bar), "gui/graph/green.jpg", '1 4 0'*2, '1 1 1', 1);
bar = bar + 1;
}
drawstring('3 2.4 0'*IMGSIZEF, "SNEAK", '8 8 8', '1 1 1', 1);
bar = 0;
lvl = getstati(102);
while (bar <= lvl)
{
drawpic('4 2.4 0'*IMGSIZEF + ('4 0 0'*bar), "gui/graph/blue.jpg", '1 4 0'*2, '1 1 1', 1);
bar = bar + 1;
}
drawstring('3 2.6 0'*IMGSIZEF, "SCIENCE", '8 8 8', '1 1 1', 1);
bar = 0;
lvl = getstati(103);
while (bar <= lvl)
{
drawpic('4 2.6 0'*IMGSIZEF + ('4 0 0'*bar), "gui/graph/yellow.jpg", '1 4 0'*2, '1 1 1', 1);
bar = bar + 1;
}
};
void() Invent_Draw =
{
local float i, check;
local float it;
local string itname, s1, s2, s3, s4, s5, s6, s7, s8, s9, perki, perk2i, p1, p2, pn, pd;
local float op;
local float height,width;
vector w;
height = cvar("vid_conheight");
width = cvar("vid_conwidth");
//how much space have we got for the slider?
drawpic('0 0 0', "gui/pipboy/inventory.jpg", '500 470 0', '1 1 1', 1);
local float slotofs;
slotofs = sliderpos*(height - (IMGSIZEF*6)) + (IMGSIZEF*6);
SlotImage('2 1 0'*IMGSIZEF, 5);
SlotImage('2 2 0'*IMGSIZEF, 6);
SlotImage('2 3 0'*IMGSIZEF, 7);
SlotImage('2 4 0'*IMGSIZEF, 8);
SlotImage('2 5 0'*IMGSIZEF, 9);
SlotImage('2 6 0'*IMGSIZEF, 10);
SlotImage('3 1 0'*IMGSIZEF, 11);
SlotImage('3 2 0'*IMGSIZEF, 12);
SlotImage('3 3 0'*IMGSIZEF, 13);
SlotImage('3 4 0'*IMGSIZEF, 14);
SlotImage('3 5 0'*IMGSIZEF, 15);
SlotImage('3 6 0'*IMGSIZEF, 16);
check = getstati(32);
if (check > 0)
SlotImage('5.5 1 0'*IMGSIZEF, 1);
else
drawpic('5.5 1 0'*IMGSIZEF, "gui/pipboy/weapon1.png", IMGSIZEV, '1 1 1', 1);
check = getstati(33);
if (check > 0)
SlotImage('5.5 2 0'*IMGSIZEF, 2);
else
drawpic('5.5 2 0'*IMGSIZEF, "gui/pipboy/weapon2.png", IMGSIZEV, '1 1 1', 1);
check = getstati(34);
if (check > 0)
SlotImage('5.5 3 0'*IMGSIZEF, 3);
else
drawpic('5.5 3 0'*IMGSIZEF, "gui/pipboy/armor.png", IMGSIZEV, '1 1 1', 1);
SlotImageSmall('1 3 0'*IMGSIZEK, 17);
SlotImageSmall('1 4 0'*IMGSIZEK, 18);
SlotImageSmall('1 5 0'*IMGSIZEK, 19);
SlotImageSmall('1 6 0'*IMGSIZEK, 20);
SlotImageSmall('1 7 0'*IMGSIZEK, 21);
SlotImageSmall('1 8 0'*IMGSIZEK, 22);
SlotImageSmall('1 12.5 0'*IMGSIZEK, 4);
SlotImageSmall('11 12 0'*IMGSIZEK, 23);
SlotImageSmall('13 12 0'*IMGSIZEK, 24);
/*
perki = GetPerkImage(getstati(60));
perk2i = GetPerkImage(getstati(59));
drawstring('112 328 0'+('3 0 0'*IMGSIZEF), " PERK1 ", '8 8 8', '1 1 1', 1);
drawpic('112 336 0'+('3 0 0'*IMGSIZEF), perki, IMGSIZEV, '1 1 1', 1);
drawstring('112 328 0'+('5 0 0'*IMGSIZEF), " PERK2 ", '8 8 8', '1 1 1', 1);
drawpic('112 336 0'+('5 0 0'*IMGSIZEF), perk2i, IMGSIZEV, '1 1 1', 1);
p1 = PerkName(1, getstati(60));
p2 = PerkName(2, getstati(59));
drawstring('112 408 0'+('3 0 0'*IMGSIZEF), p1, '8 8 8', '1 1 1', 1);
drawstring('112 408 0'+('5 0 0'*IMGSIZEF), p2, '8 8 8', '1 1 1', 1);
*/
if (showcontextmenu && show_inventory)
{
drawfill(contextpos - '8 8 0', '88 24 0'+'96 96 0', '0 0 0', 0.9);
op = floor((mousepos_y - contextpos_y)/8);
drawstring(contextpos + (0 * '0 8 0'), "use/reload", '8 8 0', '1 1 0' + (op!=0)*'0 0 1', 1);
drawstring(contextpos + (1 * '0 8 0'), "drop", '8 8 0', '1 1 0' + (op!=1)*'0 0 1', 1);
drawstring(contextpos + (2 * '0 8 0'), "mix", '8 8 0', '1 1 0' + (op!=2)*'0 0 1', 1);
if (getstati(108) == 1)
drawstring(contextpos + (3 * '0 8 0'), "sell", '8 8 0', '1 1 0' + (op!=3)*'0 0 1', 1);
}
else
{
if ((mousepos_y >= 12.5*IMGSIZEH && mousepos_y <= 13*IMGSIZEH) && mousepos_x <= IMGSIZEF)
{
slotnum = 4;
}
else if (mousepos_x >= IMGSIZEF)
{
slotnum = 0;
if (mousepos_x >= 2*IMGSIZEF && mousepos_x <= 3*IMGSIZEF)
if (mousepos_y >= 1*IMGSIZEF && mousepos_y <= 7*IMGSIZEF)
slotnum = floor((mousepos_y)/IMGSIZEF) + 4;
if (mousepos_x >= 3*IMGSIZEF && mousepos_x <= 4*IMGSIZEF)
if (mousepos_y >= 1*IMGSIZEF && mousepos_y <= 7*IMGSIZEF)
slotnum = floor((mousepos_y)/IMGSIZEF) + 10;
if (mousepos_x >= 5.5*IMGSIZEF && mousepos_x <= 6.5*IMGSIZEF)
if (mousepos_y >= 1*IMGSIZEF && mousepos_y <= 2*IMGSIZEF)
slotnum = 1;
if (mousepos_x >= 5.5*IMGSIZEF && mousepos_x <= 6.5*IMGSIZEF)
if (mousepos_y >= 2*IMGSIZEF && mousepos_y <= 3*IMGSIZEF)
slotnum = 2;
if (mousepos_x >= 5.5*IMGSIZEF && mousepos_x <= 6.5*IMGSIZEF)
if (mousepos_y >= 3*IMGSIZEF && mousepos_y <= 4*IMGSIZEF)
slotnum = 3;
if (mousepos_x >= 11*IMGSIZEK && mousepos_x <= 12*IMGSIZEK)
if (mousepos_y >= 12*IMGSIZEK && mousepos_y <= 13*IMGSIZEK)
slotnum = 23;
if (mousepos_x >= 13*IMGSIZEK && mousepos_x <= 14*IMGSIZEK)
if (mousepos_y >= 12*IMGSIZEK && mousepos_y <= 13*IMGSIZEK)
slotnum = 24;
}
else
{
slotnum = floor((mousepos_y)/IMGSIZEK) + 14;
if (slotnum <= 16)
slotnum = 0;
if (slotnum >= 25)
slotnum = 0;
}
// slotnum = floor((mousepos_y - toppos_y)/8) + 1;
}
drawstring('128 0 0', ftos(slotnum), '8 8 0', '1 1 1', 1);
if (slotnum <= 24)
{
if (slotnum <= 16)
it = getstati(31+slotnum);
else
{
if (slotnum == 17)
it = getstati(91);
if (slotnum == 18)
it = getstati(92);
if (slotnum == 19)
it = getstati(93);
if (slotnum == 20)
it = getstati(94);
if (slotnum == 21)
it = getstati(95);
if (slotnum == 22)
it = getstati(96);
if (slotnum == 23)
it = getstati(97);
if (slotnum == 24)
it = getstati(98);
}
itname = GetItemDesc(ToIID(it));
drawstring('32 16 0', itname, '8 8 0', '1 1 1', 1);
}
else if (slotnum == 98)
{
pn = PerkName(1, getstati(60));
pd = GetPerkDesc(getstati(60));
drawstring('128 32 0', pn, '8 8 0', '1 1 1', 1);
drawstring('128 48 0', pd, '8 8 0', '1 1 1', 1);
}
else if (slotnum == 99)
{
pn = PerkName(2, getstati(59));
pd = GetPerkDesc(getstati(59));
drawstring('128 32 0', pn, '8 8 0', '1 1 1', 1);
drawstring('128 48 0', pd, '8 8 0', '1 1 1', 1);
}
// drawfill(mousepos, '8 8 0', '0 0 0', 0.7);
// drawstring(mousepos, "^", '8 8 0', '1 1 1', 1);
drawpic(mousepos, "gui/cursor.jpg", '1 1 0'*CURSORSIZE, '1 1 1', 1);
};
void() CalcScrollPos =
{
sliderpos = (mousepos_y-24)/(cvar("vid_conheight")-48);
if (sliderpos < 0)
sliderpos = 0;
if (sliderpos > 1)
sliderpos = 1;
};
float(float eventtype, float param1, float param2) CSQC_InputEvent =
{
local float op;
if (eventtype == 0) //key down
{
if (param1 == 'i')
{
show_inventory = !show_inventory;
show_pipboy = false;
show_trader = false;
}
if (param1 == 'p')
{
show_pipboy = !show_pipboy;
show_inventory = false;
show_trader = false;
}
if (param1 == 'b' && (getstati(108) == 1))
{
show_trader = !show_trader;
show_pipboy = false;
show_inventory = false;
}
else if (!show_inventory && !show_trader)
return false;
else if (param1 == k_mouse1)
{
if (mousepos_x >= IMGSIZEF && mousepos_x <= IMGSIZEF+16)
{
mouseisdown = true;
CalcScrollPos();
}
else
downslotnum = slotnum;
}
else if (param1 == k_mwheelup)
{
sliderpos = sliderpos - 0.05;
if (sliderpos < 0)
sliderpos = 0;
}
else if (param1 == k_mwheeldown)
{
sliderpos = sliderpos + 0.05;
if (sliderpos > 1)
sliderpos = 1;
}
else
return false;
return true;
}
if (eventtype == 1 && (show_inventory || show_trader || show_pipboy)) //key up
{
if (param1 == k_mouse1)
{
if (showcontextmenu && show_inventory)
{
op = floor((mousepos_y - contextpos_y)/8);
if (op == 0)
localcmd(strcat("cmd invuse ", ftos(slotnum), "\n"));
else if ((op == 1))
localcmd(strcat("cmd invdrop ", ftos(slotnum), "\n"));
else if (op == 2)
localcmd(strcat("cmd invmix ", ftos(slotnum), "\n"));
else if ((op == 3) && (getstati(108) == 1))
localcmd(strcat("cmd invsell ", ftos(slotnum), "\n"));
showcontextmenu = false;
}
else if (showcontextmenu && show_trader)
{
op = floor((mousepos_y - contextpos_y)/8);
if (op == 0)
localcmd(strcat("cmd invbuy ", ftos(slotnum), "\n"));
showcontextmenu = false;
}
else
{
if (mouseisdown)
{ //within the scrollbar
mouseisdown = false;
}
else if (downslotnum == slotnum) //mouse didn't move away
{
if (slotnum >= 1 && slotnum <= 26)
{
//if there's actually an item there
if ((show_inventory) && (getstati(32+slotnum-1) != 0))
{
showcontextmenu = true; //show the context menu
contextpos = mousepos;
}
else if ((show_trader) && (getstati(70+slotnum) != 0))
{
showcontextmenu = true; //show the context menu
contextpos = mousepos;
}
}
else
{
show_inventory = false; //they clicked outside, fools!
showcontextmenu = false;
}
}
else
{
//they dragged
showcontextmenu = false;
localcmd(strcat("cmd invswap ", ftos(downslotnum), " ", ftos(slotnum), "\nimpulse 1\n"));
}
}
mouseisdown = false;
downslotnum = 0;
}
else
return false;
return true;
}
if (eventtype == 2 && (show_inventory || show_trader || show_pipboy)) //mouse
{
mousepos_x += param1;
mousepos_y += param2;
if (mousepos_x < 0)
mousepos_x = 0;
if (mousepos_y < 0)
mousepos_y = 0;
if (mouseisdown)
CalcScrollPos();
return true;
}
return false;
};
void() FigureOutButtons =
{
k_mouse1 = stringtokeynum("K_MOUSE1");
k_mwheelup = stringtokeynum("K_MWHEELUP");
k_mwheeldown = stringtokeynum("K_MWHEELDOWN");
};
void(vector pos, float slotno) ShopImage =
{
local float it, mod_s, mod_e;
local string itname;
if (slotno == downslotnum && slotnum)
slotno = slotnum;
else if (slotno == slotnum && downslotnum)
slotno = downslotnum;
it = getstati(99+slotno);
itname = GetItemImage(ToIID(it));
drawpic(pos, "gui/blank.jpg", IMGSIZEV, '1 1 1', 1);
it = ToStatus(it);
if (it <= 1)
return;
itname = ftos(it);
it = strlen(itname);
drawstring(pos + IMGSIZEV - '0 8 0' - '8 0 0'*it, itname, '8 8 8', '1 1 1', 1);
};
void() Invent_Draw2 =
{
local float i;
local float it;
local string itname;
local float op;
local float width, height;
width = cvar("vid_conwidth");
height = cvar("vid_conheight");
//how much space have we got for the slider?
local float slotofs;
slotofs = sliderpos*IMGSIZEF*8 + IMGSIZEF*3;
for (i = 1; i < 8; i++)
{
ShopImage(((i*(width-64)-slotofs) * '0 1 0'), i+1);
}
drawpic(('1 0 0'*(width-64)), "gui/scrollup.jpg", '16 16 0', '1 1 1', 1);
for (i = 0; i < height; i+=16)
drawpic('1 0 0'*(width-64)+'0 16 0'+i*'0 1 0', "gui/scrollbar.jpg", '16 16 0', '1 1 1', 1);
drawpic(('1 0 0'*(width-64))+(height-16)*'0 1 0', "gui/scrolldown.jpg", '16 16 0', '1 1 1', 1);
drawpic(('1 0 0'*(width-64))+'0 16 0'+sliderpos*(height-48)*'0 1 0', "gui/scrollbox.jpg", '16 16 0', '1 1 1', 1);
if (showcontextmenu)
{
op = floor((mousepos_y - contextpos_y)/8);
drawfill(contextpos - '8 8 0', '88 24 0'+'16 16 0', '0 0 0', 0.7);
drawstring(contextpos + (0 * '0 8 0'), "Purchase", '8 8 0', '1 1 0' + (op!=0)*'0 0 1', 1);
drawstring(contextpos + (1 * '0 8 0'), "Barter", '8 8 0', '1 1 0' + (op!=1)*'0 0 1', 1);
}
else
{
if (mousepos_x >= IMGSIZEF)
{
slotnum = 0;
if (mousepos_x >= 112 && mousepos_x <= 112+3*IMGSIZEF)
if (mousepos_y >= 256 && mousepos_y <= 256+IMGSIZEF)
slotnum = floor((mousepos_x - 112)/IMGSIZEF) + 1;
}
else
{
slotnum = floor((mousepos_y + slotofs)/IMGSIZEF) + 1;
}
// slotnum = floor((mousepos_y - toppos_y)/8) + 1;
}
drawstring('128 0 0', ftos(slotnum), '8 8 0', '1 1 1', 1);
it = getstati(99+slotnum);
itname = GetItemName(ToIID(it));
drawstring('128 32 0', itname, '8 8 0', '1 1 1', 1);
itname = GetItemDesc(ToIID(it));
drawstring('128 48 0', itname, '8 8 0', '1 1 1', 1);
drawpic(mousepos, "gui/cursor.jpg", '1 1 0'*CURSORSIZE, '1 1 1', 1);
};