Пятница, 22 Ноября 2024, 21:47

Приветствую Вас Гость

[ Новые сообщения · Игроделы · Правила · Поиск ]
  • Страница 1 из 1
  • 1
Система бофов(ЕЕ+ES)
infermikДата: Вторник, 11 Января 2011, 03:57 | Сообщение # 1
заслуженный участник
Сейчас нет на сайте
Привет всем нашёл рабочий скрипт бафов. Выкладываю ЫЫЫЫ))
Проверял сам все отлично работает главное четко следовать указаниям!!

Установка:

1) Вставляем в самый низ main.txt
Для Eclipse-stable: Вставьте в самый низ main.ess

Code
Sub Buff(index, stat, amount, duration)
          If GetVar("Buff.ini", GetPlayerName(index), CStr(stat)) = "" Then
            Select Case stat
               Case 0
                 Call SetPlayerStr(index, GetPlayerStr(index) + Int(Amount))
               Case 1
                 Call SetPlayerDef(index, GetPlayerDef(index) + Int(Amount))
               Case 2
                 Call SetPlayerMagi(index, GetPlayerMagi(index) + Int(Amount))
               Case 3
                 Call SetPlayerSpeed(index, GetPlayerSpeed(index) + Int(Amount))
               Case Else
                  Exit Sub
           End Select
           Call SendStats(index)
           Call PutVar("Buff.ini", GetPlayerName(index), CStr(stat), Cstr(amount))
           duration = duration * 1000
           Call SetTimer("Debuff " & index & ", " & CStr(stat), duration)
           Call SendHP(index)
           Call SendMP(index)
           Call SendSP(index)
         End If
End Sub
                
Sub Debuff(index, stat)
Amount = GetVar("Buff.ini", GetPlayerName(index), CStr(stat))        
         Select Case stat
             Case "0"
               Call SetPlayerStr(index, GetPlayerStr(index) - Int(Amount))
             Case "1"
               Call SetPlayerDef(index, GetPlayerDef(index) - Int(Amount))
             Case "2"
               Call SetPlayerMagi(index, GetPlayerMagi(index) - Int(Amount))
             Case "3"
               Call SetPlayerSpeed(index, GetPlayerSpeed(index) - Int(Amount))
         End Select
Call SendStats(index)
Call PutVar("Buff.ini", GetPlayerName(index), CStr(stat), "")
Call RemoveTimer("Debuff " & index & ", " & CStr(stat))
Call SendHP(index)
Call SendMP(index)
Call SendSP(index)
End Sub

2) Ищем Sub LeftGame(Index)
Для Eclipse-Stable: Scripts\Events\LeftGame.ess
Перед End Sub вставляем:

Code
If GetVar("Buff.ini", GetPlayerName(index), "0") <> "" Then
           Call Debuff(index, "0")
End If
If GetVar("Buff.ini", GetPlayerName(index), "1") <> "" Then
           Call Debuff(index, "1")
End If
If GetVar("Buff.ini", GetPlayerName(index), "2") <> "" Then
           Call Debuff(index, "2")
End If
If GetVar("Buff.ini", GetPlayerName(index), "3") <> "" Then
           Call Debuff(index, "3")
End If

3) Ищем Sub ScriptedSpell(Index, Script)
Для Eclipse-stable: Scripts\Events\ScriptedSpell.ess

Удалите:

Code

    Case Else  
     Call PlayerMsg(Index, "No spell script found. Please contact an admin to solve this problem.", WHITE)  

     Exit Sub

В принципе его можно не удалять он требуется для проверки чтобы не работающий скрипт выводил ошибку.
Можно просто вставить код расположеный ниже перед ним.

Вставьте перед End Sub:

Code

Case 1
If GetPlayerTarget(index) > 0 Then
Call Buff(GetPlayerTarget(index), 0, 5, 10)
End If

Поясняю:
index - Порядковый номер игрока ( я это не трогал)
stat - номер стата (0 сила, 1 защита, 2 магия, и 3 скорость).
amount - на сколько хотите увеличить\уменьшить тогда ставьте - перед числом
duration - время действия

Ради примера сделаю проклятье порчи и заклинание молитва

Порча:

Code

Case 1
If GetPlayerTarget(index) > 0 Then
Call Buff(GetPlayerTarget(index), 0, -10, 30)
End If

Это дебаф снимает у цели 10 статов силы на 30 сек

Молитва:

Code

Case 1
If GetPlayerTarget(index) > 0 Then
Call Buff(GetPlayerTarget(index), 0, 10, 30)
End If

Это баф увеличивает выносливость цели на 10 статов и действует 30 сек

Чуть не забыл!!! Все бафы и дебафы СНИМАЮТСЯ ПРИ ВЫХОДЕ ИЗ ИГРЫ.
Ещё один маленький минус: Ради бога не наложите дебаф на себя, а то вас могут убить.


Выпрямляю путем кнута и пряника


Сообщение отредактировал infermik - Четверг, 13 Января 2011, 16:23
RikettaДата: Вторник, 11 Января 2011, 04:36 | Сообщение # 2
Strategist
Сейчас нет на сайте
Мммм.... Телепатия....
Для чего код-то?
И название подрав, бофов режет глаз.


Fougerite - Rust Server OpenSource API
TerraDev - Terraria OpenSource Hack
infermikДата: Вторник, 11 Января 2011, 05:22 | Сообщение # 3
заслуженный участник
Сейчас нет на сайте
Не нравится не смотри))

Выпрямляю путем кнута и пряника
VinchensooДата: Вторник, 11 Января 2011, 09:45 | Сообщение # 4
Злобный социопат с комплексом Бога
Сейчас нет на сайте
Судя по синтаксису- для Эклипса.
В следующий раз нужно писать, для чего скрипты.
И в названии темы укажи


neksinsДата: Вторник, 11 Января 2011, 14:32 | Сообщение # 5
постоянный участник
Сейчас нет на сайте
чел, где ты нашол Main.txt? О_о

Добавлено (11.01.2011, 14:32)
---------------------------------------------
у меня есть Main.ess это то о чём ты писал?


Мой проект по типу Guitar Hero
ИГРА ВЫПУЩЕНА!
infermikДата: Вторник, 11 Января 2011, 14:42 | Сообщение # 6
заслуженный участник
Сейчас нет на сайте
neksins это Eclipse Evolution, но ты можешь вставить и в стейбл
Я подправлю щас.

Добавлено (11.01.2011, 14:42)
---------------------------------------------
Вроде теперь хорошо happy


Выпрямляю путем кнута и пряника
neksinsДата: Вторник, 11 Января 2011, 17:21 | Сообщение # 7
постоянный участник
Сейчас нет на сайте
infermik, cпс, опробую, если всё работает - с меня +

Добавлено (11.01.2011, 16:59)
---------------------------------------------
нет, неработает, пишет типа скрипт не обнаружен, обратитесь к админу >...<

Добавлено (11.01.2011, 17:07)
---------------------------------------------
теперь ошибка при включении сервера, ошибка при выходе игрока, ошибка при попытки использования навыки evil

Добавлено (11.01.2011, 17:21)
---------------------------------------------
вот содержимое файла ScroptedSpell

Code

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Module: ScriptedSpell.ess     '
' Author: Stephan J.R. van Schaik <stephan_van_schaik@msn.com>    '
' Date: August 30th, 2009.     '
' Version: 1.0.0      '
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''
' Function: ScriptedSpell     '
' Brief: executes when somebody casts a spell.   '
' Parameters:       '
'    Index: the index of the player.    '
'    Script: the script to execute.    '
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Sub ScriptedSpell(Index, Script)
  Select Case Script
   Case 0
    Call PlayerMsg(Index, "This scripted spell has no apparent use.", WHITE)

    Exit Sub

   Case Else
    Call PlayerMsg(Index, "No spell script found. Please contact an admin to solve this problem.", WHITE)

    Exit Sub
  End Select
End Sub ' <- убирал не помогло

Case 1  
If GetPlayerTarget(index) > 0 Then  
Call Buff(GetPlayerTarget(index), 0, -10, 30)  
End If

Case 2  
If GetPlayerTarget(index) > 0 Then  
Call Buff(GetPlayerTarget(index), 0, 10, 30)  
End If

End Sub


Мой проект по типу Guitar Hero
ИГРА ВЫПУЩЕНА!
infermikДата: Четверг, 13 Января 2011, 16:16 | Сообщение # 8
заслуженный участник
Сейчас нет на сайте
Вот так попробуй, должно все заработать)) biggrin

Code
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''  
' Module: ScriptedSpell.ess     '  
' Author: Stephan J.R. van Schaik <stephan_van_schaik@msn.com>    '  
' Date: August 30th, 2009.     '  
' Version: 1.0.0      '  
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''  

''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''  
' Function: ScriptedSpell     '  
' Brief: executes when somebody casts a spell.   '  
' Parameters:       '  
'    Index: the index of the player.    '  
'    Script: the script to execute.    '  
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''  
Sub ScriptedSpell(Index, Script)  
   Select Case Script  

Case 1   
If GetPlayerTarget(index) > 0 Then   
Call Buff(GetPlayerTarget(index), 0, -10, 30)   
End If  

Case 2   
If GetPlayerTarget(index) > 0 Then   
Call Buff(GetPlayerTarget(index), 0, 10, 30)   
End If  

End Sub

Добавлено (13.01.2011, 16:16)
---------------------------------------------
Подправил тему смотрите ScriptedSpell


Выпрямляю путем кнута и пряника
neksinsДата: Четверг, 13 Января 2011, 18:50 | Сообщение # 9
постоянный участник
Сейчас нет на сайте
неработет на сервер не пускает

Добавлено (13.01.2011, 18:50)
---------------------------------------------
появилось СТОЛЬКО ошибок


Мой проект по типу Guitar Hero
ИГРА ВЫПУЩЕНА!
infermikДата: Пятница, 14 Января 2011, 02:03 | Сообщение # 10
заслуженный участник
Сейчас нет на сайте
Можешь скрин выложить?

Добавлено (14.01.2011, 02:03)
---------------------------------------------
Перепроверил все хорошо идет не понимаю в чем загвоздка wacko


Выпрямляю путем кнута и пряника
TovTripleZДата: Пятница, 14 Января 2011, 06:02 | Сообщение # 11
Злая ящерка >:3
Сейчас нет на сайте
Quote (infermik)
Вроде теперь хорошо happy

Не всё:
Quote (infermik)
Система бофов(ЕЕ+ES)

Не "бофов", а "баффов". :3 С двумя Ф, вторая буква А.


Бледные дрыщекролики следят за вами
EmptikДата: Пятница, 14 Января 2011, 18:43 | Сообщение # 12
почетный гость
Сейчас нет на сайте
эти баффы и правда багнутые, у меня после них дальше выбора персонажа клиент не идет cry

Добавлено (14.01.2011, 18:43)
---------------------------------------------
сама ошибка:


Пропал, найдусь не скоро...
infermikДата: Пятница, 14 Января 2011, 22:29 | Сообщение # 13
заслуженный участник
Сейчас нет на сайте
TovTripleZ Грамматика страдает(((( Но смысл кому надо поёмет.

Quote
эти баффы и правда багнутые, у меня после них дальше выбора персонажа клиент не идет

Нууу не знаю с другом проверяли, все хорошо шло Проверяли как на монстрах так и пвп))))

Добавлено (14.01.2011, 22:29)
---------------------------------------------
Хммм... люди мне в принципе не очень то приятно видеть как вы жестко комментируете мои темы,
вы поймите НЕ Я скрипты пишу, я просто выбираю интересное с форума Eclipse так, что все притенении сюда biggrin
Я выкладываю тут эти сперва проверив работают ли они у меня или нет, потому что половину новичков не знают где взять скрипты для ги шопа или как
сделать элементарный кв.
Так что не судите строго я всего лишь посредник) biggrin


Выпрямляю путем кнута и пряника


Сообщение отредактировал infermik - Пятница, 14 Января 2011, 22:32
FulierДата: Суббота, 15 Января 2011, 12:04 | Сообщение # 14
постоянный участник
Сейчас нет на сайте
Quote (infermik)
Хммм... люди мне в принципе не очень то приятно видеть как вы жестко комментируете мои темы,
вы поймите НЕ Я скрипты пишу, я просто выбираю интересное с форума Eclipse так, что все притенении сюда biggrin
Я выкладываю тут эти сперва проверив работают ли они у меня или нет, потому что половину новичков не знают где взять скрипты для ги шопа или как
сделать элементарный кв.
Так что не судите строго я всего лишь посредник) biggrin

Раз ты это выложил сюда, значит ты уже автоматически становишься ответственен за всё, что здесь написано, поэтому, по идее, должен решить проблему. А если же ты всего-лишь, как ты там себя назвал? Посредник? Значит и плюсы должен получать тот, кто потрудился написать этот скрипт, а не ты. И еще, указывай источник, ибо нарушаешь авторские права.


Лампа. Кофе. Игра. - сайт о компьютерных, компьютерных и еще раз компьютерных играх.

Сообщение отредактировал Fulier - Суббота, 15 Января 2011, 12:05
infermikДата: Суббота, 15 Января 2011, 14:01 | Сообщение # 15
заслуженный участник
Сейчас нет на сайте
Fulier
Quote
И еще, указывай источник, ибо нарушаешь авторские права.

Вот на счет этого ты прав, а в остальном частично.
Quote
Значит и плюсы должен получать тот, кто потрудился написать этот скрипт, а не ты.

Я не гонюсь за + это уже желание людей ставить их)


Выпрямляю путем кнута и пряника
master-zДата: Четверг, 03 Марта 2011, 21:56 | Сообщение # 16
был не раз
Сейчас нет на сайте
Quote (infermik)
Хммм... люди мне в принципе не очень то приятно видеть как вы жестко комментируете мои темы,
вы поймите НЕ Я скрипты пишу, я просто выбираю интересное с форума Eclipse так, что все притенении сюда biggrin
Я выкладываю тут эти сперва проверив работают ли они у меня или нет, потому что половину новичков не знают где взять скрипты для ги шопа или как
сделать элементарный кв.
Так что не судите строго я всего лишь посредник) biggrin

infermik - да шли ты их всех куда подальше... если руки ни с того места растут, то незачем такими делами заниматься, все отлично работает!

  • Страница 1 из 1
  • 1
Поиск:

Все права сохранены. GcUp.ru © 2008-2024 Рейтинг