mirror of
https://bitbucket.org/grumdrig/pq-web.git
synced 2026-09-29 16:54:04 -06:00
Whatever minor fixes
This commit is contained in:
@@ -275,7 +275,7 @@ function MonsterTask(level) {
|
|||||||
i = 10+(level-lev);
|
i = 10+(level-lev);
|
||||||
i = 5-Random(i+1);
|
i = 5-Random(i+1);
|
||||||
result = Sick(i,Young((lev-level)-i,result));
|
result = Sick(i,Young((lev-level)-i,result));
|
||||||
} else if (((level-lev) < 0) && (Random(2) = 1)) {
|
} else if (((level-lev) < 0) && (Random(2) == 1)) {
|
||||||
result = Sick(level-lev,result);
|
result = Sick(level-lev,result);
|
||||||
} else if (((level-lev) < 0)) {
|
} else if (((level-lev) < 0)) {
|
||||||
result = Young(level-lev,result);
|
result = Young(level-lev,result);
|
||||||
@@ -285,7 +285,7 @@ function MonsterTask(level) {
|
|||||||
i = 10-(level-lev);
|
i = 10-(level-lev);
|
||||||
i = 5-Random(i+1);
|
i = 5-Random(i+1);
|
||||||
result = Big(i,Special((level-lev)-i,result));
|
result = Big(i,Special((level-lev)-i,result));
|
||||||
} else if (((level-lev) > 0) && (Random(2) = 1)) {
|
} else if (((level-lev) > 0) && (Random(2) == 1)) {
|
||||||
result = Big(level-lev,result);
|
result = Big(level-lev,result);
|
||||||
} else if (((level-lev) > 0)) {
|
} else if (((level-lev) > 0)) {
|
||||||
result = Special(level-lev,result);
|
result = Special(level-lev,result);
|
||||||
@@ -298,6 +298,9 @@ function MonsterTask(level) {
|
|||||||
return { 'description': result, 'level': level };
|
return { 'description': result, 'level': level };
|
||||||
}
|
}
|
||||||
|
|
||||||
|
function LowerCase(s) {
|
||||||
|
return s.toLowerCase();
|
||||||
|
}
|
||||||
|
|
||||||
function ProperCase(s) {
|
function ProperCase(s) {
|
||||||
return Copy(s,1,1).toUpperCase() + Copy(s,2,10000);
|
return Copy(s,1,1).toUpperCase() + Copy(s,2,10000);
|
||||||
@@ -1188,7 +1191,7 @@ function TMainForm_FormClose() {
|
|||||||
|
|
||||||
function TMainForm_GameSaveName()
|
function TMainForm_GameSaveName()
|
||||||
{
|
{
|
||||||
if (FSaveFileName = '') {
|
if (FSaveFileName == '') {
|
||||||
FSaveFileName = Get(Traits,'Name');
|
FSaveFileName = Get(Traits,'Name');
|
||||||
if (GetHostName != '')
|
if (GetHostName != '')
|
||||||
FSaveFileName = FSaveFileName + ' [' + GetHostName + ']';
|
FSaveFileName = FSaveFileName + ' [' + GetHostName + ']';
|
||||||
@@ -1199,25 +1202,25 @@ function TMainForm_GameSaveName()
|
|||||||
}
|
}
|
||||||
|
|
||||||
function TMainForm_FormKeyDown() {
|
function TMainForm_FormKeyDown() {
|
||||||
if ((FindWindow('TAppBuilder', nil) > 0) && (ssCtrl in Shift) && (ssShift in Shift) && (Key = ord('C'))) {
|
if ((FindWindow('TAppBuilder', nil) > 0) && (ssCtrl in Shift) && (ssShift in Shift) && (Key == ord('C'))) {
|
||||||
/*$IFDEF CHEATS*/
|
/*$IFDEF CHEATS*/
|
||||||
Cheats.Visible = ! Cheats.Visible;
|
Cheats.Visible = ! Cheats.Visible;
|
||||||
/*$ENDIF*/
|
/*$ENDIF*/
|
||||||
}
|
}
|
||||||
if ((ssCtrl in Shift) && (Key = ord('A'))) {
|
if ((ssCtrl in Shift) && (Key == ord('A'))) {
|
||||||
ShowMessage(CharSheet);
|
ShowMessage(CharSheet);
|
||||||
}
|
}
|
||||||
if (GetPasskey = 0) Exit; // no need for these things
|
if (GetPasskey() == 0) Exit; // no need for these things
|
||||||
if ((ssCtrl in Shift) && (Key = ord('B'))) {
|
if ((ssCtrl in Shift) && (Key == ord('B'))) {
|
||||||
Brag('b');
|
Brag('b');
|
||||||
Navigate(GetHostAddr + 'name=' + UrlEncode(Get(Traits,'Name')));
|
Navigate(GetHostAddr + 'name=' + UrlEncode(Get(Traits,'Name')));
|
||||||
}
|
}
|
||||||
if ((ssCtrl in Shift) && (Key = ord('M'))) {
|
if ((ssCtrl in Shift) && (Key == ord('M'))) {
|
||||||
SetMotto(InputBox('Progress Quest', 'Declare your motto!', GetMotto));
|
SetMotto(InputBox('Progress Quest', 'Declare your motto!', GetMotto));
|
||||||
Brag('m');
|
Brag('m');
|
||||||
Navigate(GetHostAddr + 'name=' + UrlEncode(Get(Traits,'Name')));
|
Navigate(GetHostAddr + 'name=' + UrlEncode(Get(Traits,'Name')));
|
||||||
}
|
}
|
||||||
if ((ssCtrl in Shift) && (Key = ord('G'))) {
|
if ((ssCtrl in Shift) && (Key == ord('G'))) {
|
||||||
SetGuild(InputBox('Progress Quest', 'Choose a guild.\r\rMake sure you undestand the guild rules before you join one. To learn more about guilds, visit http://progressquest.com/guilds.php', GetGuild));
|
SetGuild(InputBox('Progress Quest', 'Choose a guild.\r\rMake sure you undestand the guild rules before you join one. To learn more about guilds, visit http://progressquest.com/guilds.php', GetGuild));
|
||||||
Guildify;
|
Guildify;
|
||||||
}
|
}
|
||||||
@@ -1241,7 +1244,7 @@ function Brag(trigger) {
|
|||||||
var flat = 1;
|
var flat = 1;
|
||||||
if (FExportSheets)
|
if (FExportSheets)
|
||||||
ExportCharSheet;
|
ExportCharSheet;
|
||||||
if (GetPasskey = 0) return; // not a online game!
|
if (GetPasskey() == 0) return; // not a online game!
|
||||||
var url = 'cmd=b&t=' + trigger;
|
var url = 'cmd=b&t=' + trigger;
|
||||||
with (Traits) for (i = 0; i <= Items.length()-1; ++i)
|
with (Traits) for (i = 0; i <= Items.length()-1; ++i)
|
||||||
url = url + '&' + LowerCase(Items[i].Caption[1]) + '=' + UrlEncode(Items[i].Subitems[0]);
|
url = url + '&' + LowerCase(Items[i].Caption[1]) + '=' + UrlEncode(Items[i].Subitems[0]);
|
||||||
@@ -1263,12 +1266,12 @@ function Brag(trigger) {
|
|||||||
url = url + '&a=' + UrlEncode(Plots.last().text());
|
url = url + '&a=' + UrlEncode(Plots.last().text());
|
||||||
url = url + '&h=' + UrlEncode(GetHostName);
|
url = url + '&h=' + UrlEncode(GetHostName);
|
||||||
url = url + RevString;
|
url = url + RevString;
|
||||||
url = url + '&p=' + IntToStr(LFSR(url, GetPasskey));
|
url = url + '&p=' + IntToStr(LFSR(url, GetPasskey()));
|
||||||
url = url + '&m=' + UrlEncode(GetMotto);
|
url = url + '&m=' + UrlEncode(GetMotto);
|
||||||
url = AuthenticateUrl(GetHostAddr + url);
|
url = AuthenticateUrl(GetHostAddr + url);
|
||||||
try {
|
try {
|
||||||
body = DownloadString(url);
|
body = DownloadString(url);
|
||||||
if ((LowerCase(Split(body,0)) = 'report'))
|
if ((LowerCase(Split(body,0)) == 'report'))
|
||||||
ShowMessage(Split(body,1));
|
ShowMessage(Split(body,1));
|
||||||
} catch (EWebError) {
|
} catch (EWebError) {
|
||||||
// 'ats okay.
|
// 'ats okay.
|
||||||
@@ -1277,21 +1280,21 @@ function Brag(trigger) {
|
|||||||
}
|
}
|
||||||
|
|
||||||
function TMainForm_AuthenticateUrl(url) {
|
function TMainForm_AuthenticateUrl(url) {
|
||||||
if ((GetLogin != '') || (GetPassword != ''))
|
if ((GetLogin() != '') || (GetPassword() != ''))
|
||||||
return StuffString(url, 8, 0, GetLogin+':'+GetPassword+'@')
|
return StuffString(url, 8, 0, GetLogin()+':'+GetPassword()+'@')
|
||||||
else
|
else
|
||||||
return url;
|
return url;
|
||||||
}
|
}
|
||||||
|
|
||||||
function TMainForm_Guildify() {
|
function TMainForm_Guildify() {
|
||||||
if (GetPasskey = 0) return; // not a online game!
|
if (GetPasskey() == 0) return; // not a online game!
|
||||||
var url = 'cmd=guild';
|
var url = 'cmd=guild';
|
||||||
with (Traits) for (i = 0; i <= Items.length()-1; ++i)
|
with (Traits) for (i = 0; i <= Items.length()-1; ++i)
|
||||||
url = url + '&' + LowerCase(Items[i].Caption[1]) + '=' + UrlEncode(Items[i].Subitems[0]);
|
url = url + '&' + LowerCase(Items[i].Caption[1]) + '=' + UrlEncode(Items[i].Subitems[0]);
|
||||||
url = url + '&h=' + UrlEncode(GetHostName);
|
url = url + '&h=' + UrlEncode(GetHostName());
|
||||||
url = url + RevString;
|
url = url + RevString;
|
||||||
url = url + '&guild=' + UrlEncode(GetGuild);
|
url = url + '&guild=' + UrlEncode(GetGuild());
|
||||||
url = url + '&p=' + IntToStr(LFSR(url, GetPasskey));
|
url = url + '&p=' + IntToStr(LFSR(url, GetPasskey()));
|
||||||
url = AuthenticateUrl(GetHostAddr + url);
|
url = AuthenticateUrl(GetHostAddr + url);
|
||||||
try {
|
try {
|
||||||
b = DownloadString(url);
|
b = DownloadString(url);
|
||||||
|
|||||||
Reference in New Issue
Block a user