Yoko
http://forum.yoko.com.ua/

Вопрос про генерацию результатов в html
http://forum.yoko.com.ua/viewtopic.php?f=20&t=1477		 Page 1 of 1
Author:  Black Horse [ 2004-09-27 14:35:44 ]
Post subject:  Вопрос про генерацию результатов в html
http://yoko.netroof.net/forum/viewtopic ... light=html
вот здесь лежит скрипт, в самомо конце есть функция, отвечающая за генерацию результатов макроса в html вид.
Есть от меня большая просьба: помогите вычленить этот кусок, или киньте пару идей, как вообще можно записывать результаты в html.
За любую реальную помощь буду весьма признателен.
Author:  Black Horse [ 2004-09-27 15:47:22 ]
Post subject: 
уточнение.
я взял два пункта из этого скрипта:
Code:
############################################################ 
#   Определение названия руды по цвету 
############################################################ 
sub colortostring(color) 
if color=="0x0455" then 
return "<font color=#0000ff>Black Rock Ore</font>" 
endif 
if color=="0x0028" then 
return "<font color=#0000ff>Obsidian Ore</font>" 
endif
end sub


Code:
############################################################ 
#   Лог 
############################################################ 
sub log(what,name,count) 
var f=file(MiningDir+date()+".html") 

if what==0 then 
if not f.open() then 
f.create() 
f.writeln("<title>"+"Результаты копания "+date()+"</title><body text=#000000 bgcolor=#ffffff background=img/bg.jpg>") 
f.writeln("<p align=center><font size=+1><b>Начало копания "+time()+"</b></font></p><Hr size=4>") 
else 
repeat 
safecall f.readln() 
until f.eof() or fatal error 
f.writeln("<p align=center><font size=+1><b>Начало копания "+time()+"</b></font></p><Hr size=4>") 
endif 
f.close() 
endif 
############################################################ 
if what==1 then 
f.open() 
repeat 
safecall f.readln() 
until f.eof() or fatal error 
f.writeln("<p align=center><b>Сложил в сундук "+time()+"</b></p>") 
f.close() 
endif 
############################################################ 
if what==2 then 
f.open() 
repeat 
safecall f.readln() 
until f.eof() or fatal error 
f.writeln(count+" "+colortostring(name)+"<BR>") 
f.close() 
endif
end sub

вообщем так, с учётов всех функции и объявленных переменных, пр запуске функции, что log(what,name,count), что colortostring(color) - выдаётся ошибка, что "неверное кол-во аргументов" соответствующей фунции. В чём причина?
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/