1 bonus

2 bHPGainValue,500;

3 bonus

4 bLongHPGainValue,500;

5 bonus

6 bMagicHPGainValue,500;

7 bonus

8 bSPGainValue,50;

9 bonus

10 bLongSPGainValue,50;

11 bonus

12 bMagicSPGainValue,50;

13 if

14 (getpetinfo(PETINFO_ID)

15 ==

16 9055)

17 {

18 bonus2

19 bHPRegenRate,(getpetinfo(PETINFO_INTIMATE)

20 =

21 PET_INTIMATE_LOYAL

22 ?

23 1000

24 :

25 500),5000;

26 bonus2

27 bSPRegenRate,(getpetinfo(PETINFO_INTIMATE)

28 =

29 PET_INTIMATE_LOYAL

30 ?

31 40

32 :

33 20),5000;

34 }

1 heal

2 -5000,-500;