Forum in READ ONLY mode! All questions and discussions on Discord official server, invite link: https://discord.gg/VxsGzJ7

Search found 4 matches

by weekend
20.07.2009 16:34
Forum: Помощь по скриптам
Topic: Подсчет регов в бэк паке.
Replies: 9
Views: 11255

Вставил данный кусок в скрипт, скрипт запускаеться но при произношении команды ничего не происходит, пробовал меня тип, ничего не дало. кстати, может отсутсвовать не только 1 рег, а например 2. if InJournalBetweenTimes('stats', ctime, Now) <> -1 then begin Reags[1] := $0F7B // BloodMosss Reags[2] :=...
by weekend
16.07.2009 13:33
Forum: Помощь по скриптам
Topic: Подсчет регов в бэк паке.
Replies: 9
Views: 11255

Вроде сделал как вы говорили вот начало скрипта program cast; const sunduk = $4499C893; gold = $0EED; MadrakeRoots = $0F86; BloodMosss = $0F7B; BlackPearls = $0F7A; Garlick = $0F84; Ginseng = $0F85; NightShades = $0F88; SulphuruosAshs = $0F8C; SpiderSilks = $0F8D; var r,i,p : integer; s : string; Mi...
by weekend
13.07.2009 12:06
Forum: Помощь по скриптам
Topic: Подсчет регов в бэк паке.
Replies: 9
Views: 11255

Пишет что в этой строчке Compiler: [Error] (2.sc at 202:45): Type mismatch

Code: Select all

if MissingReg = $0F7B then s := 'BloodMosss';
что это может означать ?


Так я объявил

Code: Select all


var
r,i,p : integer;
s : string;
MissingReg : cardinal;
Reags : array[1..8] of cardinal;  

[/code]
by weekend
12.07.2009 12:25
Forum: Помощь по скриптам
Topic: Подсчет регов в бэк паке.
Replies: 9
Views: 11255

Подсчет регов в бэк паке.

Что то тут не правильно поправите меня, пытаюсь что бы при команде stats подсчитывало количество регов в паке и выводило результат. Это начало скрипта. program XXX; const sunduk = $0000000; gold = $0EED; MadrakeRoots = $0F86; BloodMosss = $0F7B; BlackPearls = $0F7A; Garlick = $0F84; Ginseng = $0F85;...