Результаты поиска
| |
denis007 | Дата: Воскресенье, 13 Февраля 2011, 10:45 | Сообщение # 1 | Тема: Eclipse Origins |
частый гость
Сейчас нет на сайте
| ты что совсем найти я от туда и скачал и не 1 раз и в описание твоём в слове Регистрируйтесь!!! ошибка рИги !!! реги
|
|
| |
denis007 | Дата: Суббота, 12 Февраля 2011, 18:09 | Сообщение # 2 | Тема: Eclipse Origins |
частый гость
Сейчас нет на сайте
| Quote (67boy) А скажи еще где скачать Microsoft Visual Basic 6.0. ты знаешь такую вещь как google ???
|
|
| |
denis007 | Дата: Воскресенье, 30 Января 2011, 23:16 | Сообщение # 3 | Тема: Eclipse rus |
частый гость
Сейчас нет на сайте
| 1 день не трудного перевода вот и русский еклипс vb6 качайте там и переведёте
|
|
| |
denis007 | Дата: Суббота, 01 Января 2011, 17:38 | Сообщение # 4 | Тема: Eclipse-Вопросы |
частый гость
Сейчас нет на сайте
| где точно настройках ?? где сетинг у меня все помечено но захожу с одного компа с двух клиентов и я невижу хп 2 игрока ты видешь свои , нпц а других игроков нет
|
|
| |
denis007 | Дата: Суббота, 01 Января 2011, 17:36 | Сообщение # 5 | Тема: Eclipce-Питомцы |
частый гость
Сейчас нет на сайте
| Тупость лагающая и много фигней не нужных
|
|
| |
denis007 | Дата: Суббота, 01 Января 2011, 15:58 | Сообщение # 6 | Тема: Eclipce-Питомцы |
частый гость
Сейчас нет на сайте
| genesis вопще чушь
|
|
| |
denis007 | Дата: Пятница, 31 Декабря 2010, 15:47 | Сообщение # 7 | Тема: Eclipse-Вопросы |
частый гость
Сейчас нет на сайте
| можете помочь как сделать что бы игрок видел хп другова игрока и видел когда бьёт в стабле это есть ! подскажите в каком исходном коде это прописано что бы я мог перебить на свой двиг !!! плизз.....
|
|
| |
denis007 | Дата: Среда, 22 Декабря 2010, 17:10 | Сообщение # 8 | Тема: Eclipse Evolution - Великие вопросы!!! |
частый гость
Сейчас нет на сайте
| Вопросы просто убили )) Добавлено (22.12.2010, 17:10) --------------------------------------------- по твоим словам игра 80 % сделана но как почитаешь вопросы чета кажется что ты там некхмм не сделал Ж)
Сообщение отредактировал Vinchensoo - Среда, 22 Декабря 2010, 18:30 |
|
| |
denis007 | Дата: Вторник, 21 Декабря 2010, 23:01 | Сообщение # 9 | Тема: Квест еклипс |
частый гость
Сейчас нет на сайте
| так должно быт Quote (KpayTeJIb) Sub ScriptedNPC(Index, Script) Select Case Script Case 0 Call PlayerMsg(Index, "This scripted NPC has no apparent use.", WHITE) Exit Sub Case 1 If GetPlayerLevel(Index) >= 1 then If GetVar("Scripts\Quests\" & GetPlayerName(Index) & ".ini", "General", "Quest1") = vbNullString Then Call PlayerMsg(Index, "Защити деревню убей 10 слизней и ты получишь нашу благодарность.", RED) Call PutVar("Scripts\Quests\" & GetPlayerName(Index) & ".ini", "General", "Quest1", 1) Else if GetVar("Scripts\Quests\" & GetPlayerName(Index) & ".ini", "General", "Quest1") = 1 Then If CanTake(Index, 6, 1) then Call PlayerMsg(Index, "Спасибо ты спас деревню возьми это в знак благодарности.", RED) Call TakeItem(Index, 6, 10) Call GiveCurrency(Index, 4, 150) Call PutVar("Scripts\Quests\" & GetPlayerName(Index) & ".ini", "General", "Quest1", 2) end if end if End if End if Exit sub End sub Case Else Call PlayerMsg(Index, "No NPC script found. Please contact an admin to solve this problem.", WHITE) Exit Sub
|
|
| |
denis007 | Дата: Пятница, 17 Декабря 2010, 22:36 | Сообщение # 10 | Тема: В чем ошибка? |
частый гость
Сейчас нет на сайте
| Слышьте к этому коду дайте остальные кода в смысле кода каторые в касе надо кидать Quote (infermik) Function GetFreeSlots(Index) Dim Slot Dim Slots Slot = 1 Slots = 0 Index = Int(Index) Do While Slot < 25 If GetPlayerInvItemNum(Index, Slot) = 0 Then Slots = Slots + 1 End If Slot = Slot + 1 Loop GetFreeSlots = Slots End Function Sub GiveItem(Index, Number, Durability) Dim Slot Slot = 1 Index = Int(Index) Number = Int(Number) Durability = Int(Durability) Do While Slot < 25 If GetPlayerInvItemNum(Index, Slot) = 0 Then Call SetPlayerInvItemNum(Index, Slot, Number) Call SetPlayerInvItemDur(Index, Slot, Durability) Call SendInventoryUpdate(Index, Slot) Exit Sub End If Slot = Slot + 1 Loop End Sub Sub GiveCurrency(Index, Number, Amount) Dim Slot Dim CurrentAmount Slot = 1 Index = Int(Index) Number = Int(Number) Amount = Int(Amount) Do While Slot < 25 If GetPlayerInvItemNum(Index, Slot) = Number Then CurrentAmount = GetPlayerInvItemValue(Index, Slot) Call SetPlayerInvItemValue(Index, Slot, CurrentAmount + Amount) Call SendInventoryUpdate(Index, Slot) Exit Sub End If Slot = Slot + 1 Loop Slot = 1 Do While Slot < 25 If GetPlayerInvItemNum(Index, Slot) = 0 Then Call SetPlayerInvItemNum(Index, Slot, Number) Call SetPlayerInvItemValue(Index, Slot, Amount) Call SendInventoryUpdate(Index, Slot) Exit Sub End If Slot = Slot + 1 Loop End Sub Function CanTake(Index, Number, Amount) Dim Slot Slot = 1 Index = Int(Index) Number = Int(Number) Amount = Int(Amount) Do While Slot < 25 If GetPlayerInvItemNum(Index, Slot) = Number Then If GetPlayerInvItemValue(Index, Slot) >= Amount Then CanTake = True Exit Function End If End If Slot = Slot + 1 Loop CanTake = False End Function Sub TakeItem(Index, Number, Amount) Dim Slot Dim CurrentAmount Index = Int(Index) Number = Int(Number) Amount = Int(Amount) Slot = 1 Do While Slot < 25 If GetPlayerInvItemNum(Index, Slot) = Number Then If GetPlayerInvItemValue(Index, Slot) >= Amount Then CurrentAmount = GetPlayerInvItemValue(Index, Slot) If CurrentAmount <= Amount Then Call SetPlayerInvItemNum(Index, Slot, 0) Call SetPlayerInvItemValue(Index, Slot, 0) Call SetPlayerInvItemDur(Index, Slot, 0) Call SendInventoryUpdate(Index, Slot) Else Call SetPlayerInvItemValue(Index, Slot, CurrentAmount - Amount) Call SendInventoryUpdate(Index, Slot) End If Exit Sub End If End If Slot = Slot + 1 Loop End Sub
Сообщение отредактировал denis007 - Суббота, 18 Декабря 2010, 11:31 |
|
| |
denis007 | Дата: Воскресенье, 28 Ноября 2010, 22:01 | Сообщение # 11 | Тема: Скиллы в Eclipse |
частый гость
Сейчас нет на сайте
| Есть на оригинальном сайте заморозка так же есть - статы и + статы код кидаешь на кейс и все вот тебе спеллсы новые ))
|
|
| |
denis007 | Дата: Пятница, 26 Ноября 2010, 23:21 | Сообщение # 12 | Тема: В Еклипсе можно сделать мир одной картой и крафт? |
частый гость
Сейчас нет на сайте
| можно до 30х30 60х60 100х100 (на 100х100 грузит так долго что пипец) ScrollX= <-- Кол.во клеток по X на карте. ScrollY= <-- Кол.во клеток по Y на карте. больше толку нету делать очень уж тормозит двиг изо этого
Сообщение отредактировал denis007 - Пятница, 26 Ноября 2010, 23:36 |
|
| |
denis007 | Дата: Воскресенье, 14 Ноября 2010, 14:26 | Сообщение # 13 | Тема: В Еклипсе можно сделать мир одной картой и крафт? |
частый гость
Сейчас нет на сайте
| так и думал потому что все остальные коды в двиге сидят па пробую выбрать от туда
|
|
| |
denis007 | Дата: Воскресенье, 14 Ноября 2010, 13:03 | Сообщение # 14 | Тема: В Еклипсе можно сделать мир одной картой и крафт? |
частый гость
Сейчас нет на сайте
| чёта он у меня не работает не знаю !!в кинул скрипт итем все как надо кажется и нечего пикаю па итем вещи и нечего )) вопрос а этот скрипт только для стабле ???
Сообщение отредактировал denis007 - Воскресенье, 14 Ноября 2010, 13:15 |
|
| |
denis007 | Дата: Воскресенье, 14 Ноября 2010, 11:44 | Сообщение # 15 | Тема: В Еклипсе можно сделать мир одной картой и крафт? |
частый гость
Сейчас нет на сайте
| Quote (Fulier) CodeCase n ' n - номер предмета, на который вешаем скрипт. If CanTake(Index, 7, 1) Then ' Если в кармане есть предмет под номером семь, то If Cantake(Index, 8, 1) Then ' Если в кармане есть предмет под номером 8, то If Rand(1, 10) = 6 Then ' Если между 1 и 10 выпало 6, то Call GiveItem(Index, 9, 1) ' Дадим предмет под номером 9 Call BattleMsg(Index, "Вы создали меч", Yellow, LEFT) if end if end if end Exit Sub С этим скриптом, зная остальные команды, можно побаловаться. ты написал ( С этим скриптом, зная остальные команды, можно побаловаться ) можешь дать остальные команды ??? он же безь них не будет работать этот скрипт проверял
Сообщение отредактировал denis007 - Воскресенье, 14 Ноября 2010, 13:01 |
|
| |
denis007 | Дата: Воскресенье, 14 Ноября 2010, 00:11 | Сообщение # 16 | Тема: Еклипс или не Еклипс, вот в чем вопрос... |
частый гость
Сейчас нет на сайте
| Бери екоипс origins что бы после месяца работы иза мелочей не перешёл на origins c другова движка
Сообщение отредактировал denis007 - Воскресенье, 14 Ноября 2010, 00:12 |
|
| |
denis007 | Дата: Суббота, 13 Ноября 2010, 21:21 | Сообщение # 17 | Тема: В Еклипсе можно сделать мир одной картой и крафт? |
частый гость
Сейчас нет на сайте
| fulier можешь дать остальные коды это го скрипта ???
|
|
| |
denis007 | Дата: Четверг, 11 Ноября 2010, 16:18 | Сообщение # 18 | Тема: Настройки в Eclipse |
частый гость
Сейчас нет на сайте
| понимаешь эту часть я со своей игрой прошёл год назад )) * ( игра делается 2 год ) и не помню уже
|
|
| |
denis007 | Дата: Четверг, 11 Ноября 2010, 16:14 | Сообщение # 19 | Тема: Настройки в Eclipse |
частый гость
Сейчас нет на сайте
| дай ссылку хочу посматреть что там у тебя за игры если в ее 7 челов играет )) мне кажется можно настроит в кодах что бы + 1 давал больше % к защите .
|
|
| |
denis007 | Дата: Воскресенье, 31 Октября 2010, 19:21 | Сообщение # 20 | Тема: Помогите с кодом в вб |
частый гость
Сейчас нет на сайте
| Какой код в вб отвечает за переход на другие локации ?? в смысле с 1 на 2 на 3 ???
|
|
| |
|