 |
Темы без ответов | Активные темы
|
Office_rat
|
|
| Не в сети |
| Плетенщик кристаллов |
 |
 |
Зарегистрирован: Вс дек 14, 2003 22:49 Сообщения: 148
Откуда: Минск (бывший Менск)
|
Цитата: Очень прошу выложить ссылочку для скачивания .csv водолейскую!!!
В настройках на вкладке "Работа с Internet" в поле "Путь для скачивания" кликни правой кнопкой мыши и выбери нужный тебе мир.
_________________ Главный и идейный программист проекта [url=http://ds-informer.belosoft.net/]DS_Informer[/url]
[b]Текущая версия : 0.6.8.14 [/b]
|
|
| Вернуться к началу |
|
 |
|
Office_rat
|
|
| Не в сети |
| Плетенщик кристаллов |
 |
 |
Зарегистрирован: Вс дек 14, 2003 22:49 Сообщения: 148
Откуда: Минск (бывший Менск)
|
Всем срасибо за респекты
Цитата: Прога супер, респект.  Жалко только что нет графиков. У меня возник один проблем, когда я пытаюсь ее закрыть выскакивает ошибка: "I/O error 103", приходиться выходить через диспетчер задач. Может я что нетак настроил? 
График развития каждого игрока есть. Только для этого надо, чтобы было загружено несколько csv-файлов. В окне информации по кольам внизу есть полоска. Если на нее щелкнуть, то она развернется в небольшую панель, на которой можно посмотреть график, историю рейтинга и нахождения игрока в альянсе, а так же ввести описание на соту.
С ошибкой буду разбираться.
Цитата: Не штудировал весь топик, но есть предложение: сделать встроенную прогу - карту колец. Как старая (она с новыми цвс не идёт) в html...
Расскажи плиз подробнее, как это должно выглядеть и зачем это тебе надо? 
Ты хочешь, чтобы прога экспортировала карту в html? Или что?
_________________ Главный и идейный программист проекта [url=http://ds-informer.belosoft.net/]DS_Informer[/url]
[b]Текущая версия : 0.6.8.14 [/b]
|
|
| Вернуться к началу |
|
 |
|
Tharong
|
|
| Не в сети |
| Командир соты |
 |
Зарегистрирован: Чт июл 01, 2004 21:59 Сообщения: 371
|
|
Ханой про него говорил выше (чё, зачем и т.д.).
у меня есть новый. только он в экселе накидан и недоделан (лень стало, итак 2 часа убил).
могу предоставить. делает карты на все кольца по образу с атомика.
103 ошибка лезет. мельсион только на меня отображается и на 1-й комплекс.
значки колец бессмысленны - ничё не делают.
_________________ Тайверн
|
|
| Вернуться к началу |
|
 |
|
Office_rat
|
|
| Не в сети |
| Плетенщик кристаллов |
 |
 |
Зарегистрирован: Вс дек 14, 2003 22:49 Сообщения: 148
Откуда: Минск (бывший Менск)
|
Цитата: Ханой про него говорил выше (чё, зачем и т.д.).
у меня есть новый. только он в экселе накидан и недоделан (лень стало, итак 2 часа убил).
могу предоставить. делает карты на все кольца по образу с атомика.
103 ошибка лезет. мельсион только на меня отображается и на 1-й комплекс.
значки колец бессмысленны - ничё не делают.
Если надо сделать карту колец такой, что делает та прога - не вопрос  Я смотрел ее.
Что значит значки колец бессмысленны и ничего не делают?  Если их нажать, а потом нажать на "Искать", то в результат запроса будут включены только те кольца, которые ты выбрал. Вот и всё. Чего тут непонятного?
Про мельсион ваще интересно  А ты пробовал вводить координаты комплексов, которые тебе надо? Например с 100 по 200? А потом Ентер или "Искать" жмякал?
Может я и не прав, но у меня сложилось впечатление, что ты работал с прогой очень короткое время. Ну, может, минут пять.
_________________ Главный и идейный программист проекта [url=http://ds-informer.belosoft.net/]DS_Informer[/url]
[b]Текущая версия : 0.6.8.14 [/b]
|
|
| Вернуться к началу |
|
 |
|
Tharong
|
|
| Не в сети |
| Командир соты |
 |
Зарегистрирован: Чт июл 01, 2004 21:59 Сообщения: 371
|
Если не в тягость, то приведи тут формулу расчёта пути/полёта до соты.
__________________________
old used ver.: 4.1.3
cur. used ver.: 4.5.5
refresh: full download
research ver.: 4.5.5
sphere: Сфера Андромеда
Пример 1: Выбраны 2 кольца (Ворания, Лиенсу). Выполнен поиск по альянсу [PHOENIX].
На кой в результатах ихние псолао? Это так "работать" должно?
Пример 2: По рейтингу кольцевой поиск выполняется.
Ну, а насчёт мелса, то мне выдаётся Error "Невозможно выполнить запрос по Мельсиону. ..{пиши разрабу}..", хотя скрыжики "противник" в нужных альянсах я ставил (3 альянса противников).
Поиск по одному альянсу для мельсиона работает, как и полное отображение кольца.
На будущее:
При нажатии на пиктограмку кольца фильтр должен (желательно) сработать автоматически по текущим настройкам в соседних боксах.
Напиши помощь в конце концов, хоть текстовую - не будут такие вопросы задавать.
Если выпустил на волю новую версию, то пиши - что уже работает, а что отключено.
До проверки напиши лист комбинаторики (возможные сочетания запросов/вызовов).
Потрать лишние 5 минут на проверку работоспособности всех подключенных функций.
"Калькулятор" следует переименовать на "Калькулятор пути".
Цитата:
Private sub VLPM()
'процедура создания html-карты всех колец
'раздел описания внутренних и внешних переменных не приведён
'карты формируются на основе шаблона карты из генератора с атомика
For u = 1 To 4
If u = 1 Then IdR = "Ворания"
If u = 2 Then IdR = "Лиенсорд"
If u = 3 Then IdR = "Псолеон"
If u = 4 Then IdR = "Мельсион"
Open "C:" & IdR & ".html" For Output As #1
Print #1, "<HTML><HEAD><TITLE>Free Breeze Tools</TITLE>"
Print #1, "<META content=" & Chr(34) & "text/html; charset=windows-1251" & Chr(34) & " http-equiv=Content-Type>"
Print #1, "</HEAD>"
Print #1, "<BODY style=" & Chr(34) & "FONT-FAMILY: Arial" & Chr(34) & ">"
Print #1, "<STYLE>BODY {"
Print #1, " MARGIN: 2px; scrollbar-3dlight-color: Black; scrollbar-arrow-color: Black; scrollbar-base-color: Black; scrollbar-face-color: White; "
Print #1, "scrollbar-highlight-color: White; scrollbar-shadow-color: White; scrollbar-track-color: #F0F0F0"
Print #1, "}"
Print #1, "TD {"
Print #1, " FONT-SIZE: 9px; TEXT-ALIGN: center"
Print #1, "}"
Print #1, "#cap {"
Print #1, " COLOR: red; FONT-SIZE: 12px; TEXT-ALIGN: center"
Print #1, "}"
Print #1, "#clan {"
Print #1, " BACKGROUND: #CCFFCC TEXT-ALIGN: center; cusros:help"
Print #1, "}"
Print #1, "#wrag {"
Print #1, " BACKGROUND: #FFCCCC; TEXT-ALIGN: center; cusros:help"
Print #1, "}"
Print #1, "#neitral {"
Print #1, " BACKGROUND: #eeeeee; TEXT-ALIGN: center; cusros:help"
Print #1, "}"
Print #1, "#drug {"
Print #1, " BACKGROUND: #FFFFCC; TEXT-ALIGN: center; cusros:help"
Print #1, "}"
Print #1, "#war{"
Print #1, " BACKGROUND: #CCFFFF; TEXT-ALIGN: center; cusros:help"
Print #1, "}"
Print #1, "#noclan {"
Print #1, " BACKGROUND: white; TEXT-ALIGN: center; cusros:help"
Print #1, "}"
Print #1, "#dead {"
Print #1, " BACKGROUND: #CCCC99; TEXT-ALIGN: center; cusros:help"
Print #1, "}"
Print #1, "</STYLE>"
Print #1, "<br><b><center>"
Print #1, "Карта колец в сфере судьбы<br><br>"
Print #1, "Обозначения:<br><br></b>"
Print #1, "<TABLE border=1 cellPadding=0 cellSpacing=1 "
Print #1, "style=" & Chr(34) & "BACKGROUND-COLOR: transparent" & Chr(34) & ">"
Print #1, " <TBODY>"
Print #1, " <TR><TD id=clan>Ваш альянс</TD></TR>"
Print #1, " <TR><TD id=drug>Союзные альянсы</TD></TR>"
Print #1, " <TR><TD id=neitral>Не состоят в альянса</TD></TR>"
Print #1, " <TR><TD id=wrag>Альянсы врагов</TD></TR>"
Print #1, " </TBODY></TABLE>"
Print #1, "<br><b>Данные по кольцу " & IdR & "</b><br><br>"
Print #1, "<TABLE border=1 cellPadding=0 cellSpacing=1 style=" & Chr(34) & "BACKGROUND - COLOR: transparent" & Chr(34) & "><TBODY>"
Print #1, "<TR><TD width=6%>Комплекс</TD><TD width=14%>Сота № 1</TD><TD width=14%>Сота № 2"
Print #1, "</TD><TD width=14%>Сота № 3</TD><TD width=14%>Сота № 4</TD><TD width=14%>Сота № 5</TD><TD width=14%>Сота № 6</TD><TD width=10%>Время в пути</TD></TR></TR>"
s1 = 0
s2 = 0
s3 = 0
s4 = 0
For i = 1 To 1000 ' or insert UsedRange Property (Worksheets(IdR).UsedRange.Rows.Count)
Zap1 = "<TD>Пустая</TD>"
Zap2 = "<TD>Пустая</TD>"
Zap3 = "<TD>Пустая</TD>"
Zap4 = "<TD>Пустая</TD>"
Zap5 = "<TD>Пустая</TD>"
Zap6 = "<TD>Пустая</TD>"
For K = 1 To 6
Nick = Empty
Sota = Empty
Al = Empty
Reit = Empty
idi = Empty
If K = 1 Then j = 1
If K = 2 Then j = 5
If K = 3 Then j = 9
If K = 4 Then j = 13
If K = 5 Then j = 17
If K = 6 Then j = 21
Nick = Worksheets(IdR).Cells(i, j).Value
Sota = Worksheets(IdR).Cells(i, j + 1).Value
Al = Worksheets(IdR).Cells(i, j + 2).Value
Reit = Worksheets(IdR).Cells(i, j + 3).Value
If Nick <> Empty Then
If Al = Empty Then idi = "neitral": StatusI = "нейтрал": s4 = s4 + 1
If Al = MyAL Then idi = "clan": StatusI = "в альянсе": s1 = s1 + 1
If Al = EnAL Then idi = "wrag": StatusI = "враг": s2 = s2 + 1
If Al = UnAL Then idi = "drug": StatusI = "союзник": s3 = s3 + 1
If idi = Empty Then idi = "noclan": StatusI = "нейтрал": s4 = s4 + 1
If K = 1 Then Zap1 = "<TD id=" & idi & ">" & Nick & "<BR>сота: " & Sota & "<BR><font color=#003399>альянс: " & Al & "</font><BR>рейтинг: " & Reit & "<BR>статус: " & StatusI & "</TD>"
If K = 2 Then Zap2 = "<TD id=" & idi & ">" & Nick & "<BR>сота: " & Sota & "<BR><font color=#003399>альянс: " & Al & "</font><BR>рейтинг: " & Reit & "<BR>статус: " & StatusI & "</TD>"
If K = 3 Then Zap3 = "<TD id=" & idi & ">" & Nick & "<BR>сота: " & Sota & "<BR><font color=#003399>альянс: " & Al & "</font><BR>рейтинг: " & Reit & "<BR>статус: " & StatusI & "</TD>"
If K = 4 Then Zap4 = "<TD id=" & idi & ">" & Nick & "<BR>сота: " & Sota & "<BR><font color=#003399>альянс: " & Al & "</font><BR>рейтинг: " & Reit & "<BR>статус: " & StatusI & "</TD>"
If K = 5 Then Zap5 = "<TD id=" & idi & ">" & Nick & "<BR>сота: " & Sota & "<BR><font color=#003399>альянс: " & Al & "</font><BR>рейтинг: " & Reit & "<BR>статус: " & StatusI & "</TD>"
If K = 6 Then Zap6 = "<TD id=" & idi & ">" & Nick & "<BR>сота: " & Sota & "<BR><font color=#003399>альянс: " & Al & "</font><BR>рейтинг: " & Reit & "<BR>статус: " & StatusI & "</TD>"
End If
Next K
Zap = Zap1 & Zap2 & Zap3 & Zap4 & Zap5 & Zap6 & "<TD> Время в пути </TD>"
If Zap <> "<TD>Пустая</TD><TD>Пустая</TD><TD>Пустая</TD><TD>Пустая</TD><TD>Пустая</TD><TD>Пустая</TD><TD> Время в пути </TD>" Then Print #1, "<TR><TD id=cap>" & i & "</TD>" & Zap1 & Zap2 & Zap3 & Zap4 & Zap5 & Zap6 & "<TD>" & TimeFly(SourceI, i, K1, u) & "</TD>" & "</TR>"
Next i
Print #1, "</TBODY></TABLE><hr>Альянс " & MyAL &"": " & s1 & "<br>Союзники: " & s3 & "<br>Враги: " & s2 & "<br>Нейтралы: " & s4 & "<br>"
Print #1, "</TBODY></TABLE>"
Print #1, "<hr> <center>"
Print #1, " </BODY></HTML>"
Close #1
Next u
End Sub
Удачи в написании, не прекращай. 
_________________ Тайверн
|
|
| Вернуться к началу |
|
 |
|
Office_rat
|
|
| Не в сети |
| Плетенщик кристаллов |
 |
 |
Зарегистрирован: Вс дек 14, 2003 22:49 Сообщения: 148
Откуда: Минск (бывший Менск)
|
Цитата: Если не в тягость, то приведи тут формулу расчёта пути/полёта до соты.
Втягость... но только для тебя
Цитата: Пример 1: Выбраны 2 кольца (Ворания, Лиенсу). Выполнен поиск по альянсу [PHOENIX].
На кой в результатах ихние псолао? Это так "работать" должно?
Согласен. Недоработка.
Цитата: Пример 2: По рейтингу кольцевой поиск выполняется.
Ну, а насчёт мелса, то мне выдаётся Error "Невозможно выполнить запрос по Мельсиону. ..{пиши разрабу}..", хотя скрыжики "противник" в нужных альянсах я ставил (3 альянса противников).
Поиск по одному альянсу для мельсиона работает, как и полное отображение кольца.
Т.е. кнопки работают только при поиске при заданных параметрах в "Поиск по координатам и рейтингам"? Да, так и есть.
С Мельсионом антиресно. У тебя полная версия 0.4.5.5?
Только что залил свежак (правда Орионский) - всё работает. Надо с этим разобраться. Стукнись в асю если будет время и желание, я скажу, что делать дальше. Я кинул номер в ПМ.
Цитата: На будущее:
При нажатии на пиктограмку кольца фильтр должен (желательно) сработать автоматически по текущим настройкам в соседних боксах.
Угу. Только вот по каким из боксов? Комп мыслей читать не умеет  Сделаю, чтобы применялось к последним изменениям.
Цитата: Напиши помощь в конце концов, хоть текстовую - не будут такие вопросы задавать.
Ты думаешь я не писал?  )) Были такие попытки. Но жизнь показала, что помощь не читают  Неиссякаем поток вопросов... Ну да ладно. На сайте кое что есть.
Ктобы занялся составлением хелпа... При всесторонней моей поддержке
Цитата: Если выпустил на волю новую версию, то пиши - что уже работает, а что отключено.
Я так и делаю. В каждой новости пишу, что сделано нового и что исправлено.
Цитата: До проверки напиши лист комбинаторики (возможные сочетания запросов/вызовов).
Потрать лишние 5 минут на проверку работоспособности всех подключенных функций.
Напишешь лист комбинаторики - протестирую, чесслово.
Спасибо за код. Разбираться в нем ПОКА нет времени (и, так подозреваю, желания). Был бы рад простому и скромному скриншоту, с растолковыванием чего и как должно выглядеть. Где что должно выделяться и т.д.
Цитата: Удачи в написании, не прекращай. 
Спасибо за конструктивную критику. Побольше бы ее такой. Хорошей и разной 
_________________ Главный и идейный программист проекта [url=http://ds-informer.belosoft.net/]DS_Informer[/url]
[b]Текущая версия : 0.6.8.14 [/b]
|
|
| Вернуться к началу |
|
 |
|
vental
|
|
| Не в сети |
 |
Зарегистрирован: Пт июл 08, 2005 12:00 Сообщения: 5
Откуда: Тула, РФ
|
|
Камрад, здарова! Скачал сей софт, а он у мя не пашет - говорит при старте - не запущен сервер ФайрБёрд... чо делать-то... ну а дальше на все ваще ругаеца
|
|
| Вернуться к началу |
|
 |
|
Office_rat
|
|
| Не в сети |
| Плетенщик кристаллов |
 |
 |
Зарегистрирован: Вс дек 14, 2003 22:49 Сообщения: 148
Откуда: Минск (бывший Менск)
|
Цитата: Камрад, здарова! Скачал сей софт, а он у мя не пашет - говорит при старте - не запущен сервер ФайрБёрд... чо делать-то... ну а дальше на все ваще ругаеца
Вероятно ты скачал не полную версию, а обновление. Качай полную версию, там будет всё в порядке.
_________________ Главный и идейный программист проекта [url=http://ds-informer.belosoft.net/]DS_Informer[/url]
[b]Текущая версия : 0.6.8.14 [/b]
|
|
| Вернуться к началу |
|
 |
Кто сейчас на конференции |
Сейчас этот форум просматривают: Majestic-12 [Bot] и 83 гостя |
|
|
Вы не можете начинать темы Вы не можете отвечать на сообщения Вы не можете редактировать свои сообщения Вы не можете удалять свои сообщения Вы не можете добавлять вложения
|
|
 |