| [1] | 1 | //===== eAthena Script ======================================= |
|---|
| 2 | //= Yuno Kafras |
|---|
| 3 | //===== By: ========================= |
|---|
| 4 | //= eAthena Dev Team |
|---|
| 5 | //===== Current Version: =================== |
|---|
| 6 | //= 2.4 |
|---|
| 7 | //===== Compatible With: ===================== |
|---|
| 8 | //= eAthena 1.0 |
|---|
| 9 | //===== Description: ============================================ |
|---|
| 10 | //= Description of argument settings for callfunc "F_Kafra". |
|---|
| 11 | //= arg(0): When set at 0 the default Kafra message is displayed. |
|---|
| 12 | //= When set to 1 the Niflhiem Kafra message is displayed. |
|---|
| 13 | //= When set to 2 the Guild Kafra message is displayed. |
|---|
| 14 | //= arg(1): Set to 1 to disable teleport menu option. Otherwise set to 0. |
|---|
| 15 | //= arg(2): Set to 1 to disable info menu. Otherwise set to 0. |
|---|
| 16 | //= arg(3): Cost of Storage service |
|---|
| 17 | //= arg(4): Cost of Rent a Pushcart service |
|---|
| 18 | //===== Additional Comments: ========================================== |
|---|
| 19 | //= v1.1 Now using functions :) |
|---|
| 20 | //= v2.1b Minor changes to function calls. Using arguments. |
|---|
| 21 | //= This version uses arrays .[kobra_k88] |
|---|
| 22 | //= 2.2 Now only warps to Aldebaran [Evera] |
|---|
| 23 | //= 2.3 Updated a kafra location. [Musashiden] |
|---|
| 24 | //= 2.4 Updated function calls with new arguments. [L0ne_W0lf] |
|---|
| 25 | //= Added unique Kafra Welcome message. |
|---|
| 26 | //===================================================================== |
|---|
| 27 | |
|---|
| 28 | |
|---|
| 29 | // Center ------------------------------------------------------------------ |
|---|
| 30 | yuno,152,187,4 script Kafra Employee::kaf_yuno 860,{ |
|---|
| 31 | cutin "kafra_08",2; |
|---|
| 32 | callfunc "F_KafSetYun"; |
|---|
| 33 | mes "[Kafra Employee]"; |
|---|
| 34 | mes "The Kafra Corporation"; |
|---|
| 35 | mes "is always working to provide"; |
|---|
| 36 | mes "you with convenient services."; |
|---|
| 37 | mes "How may I be of assistance?"; |
|---|
| 38 | callfunc "F_Kafra",5,0,0,40,800; |
|---|
| 39 | |
|---|
| 40 | M_Save: |
|---|
| 41 | savepoint "yuno",158,125; |
|---|
| 42 | callfunc "F_KafEnd",0,1,"in the city of Juno"; |
|---|
| 43 | } |
|---|
| 44 | |
|---|
| 45 | // South East -------------------------------------------------------------- |
|---|
| 46 | yuno,327,108,4 script Kafra Employee::kaf_yuno2 860,{ |
|---|
| 47 | cutin "kafra_08",2; |
|---|
| 48 | callfunc "F_KafSetYun"; |
|---|
| 49 | mes "[Kafra Employee]"; |
|---|
| 50 | mes "The Kafra Corporation"; |
|---|
| 51 | mes "is always working to provide"; |
|---|
| 52 | mes "you with convenient services."; |
|---|
| 53 | mes "How may I be of assistance?"; |
|---|
| 54 | callfunc "F_Kafra",5,0,0,40,800; |
|---|
| 55 | |
|---|
| 56 | M_Save: |
|---|
| 57 | savepoint "yuno",328,101; |
|---|
| 58 | callfunc "F_KafEnd",0,1,"in the city of Juno"; |
|---|
| 59 | } |
|---|
| 60 | |
|---|
| 61 | // East -------------------------------------------------------------------- |
|---|
| 62 | yuno,277,221,4 script Kafra Employee::kaf_yuno3 861,{ |
|---|
| 63 | cutin "kafra_09",2; |
|---|
| 64 | callfunc "F_KafSetYun"; |
|---|
| 65 | mes "[Kafra Employee]"; |
|---|
| 66 | mes "The Kafra Corporation"; |
|---|
| 67 | mes "is always working to provide"; |
|---|
| 68 | mes "you with convenient services."; |
|---|
| 69 | mes "How may I be of assistance?"; |
|---|
| 70 | callfunc "F_Kafra",5,0,0,40,800; |
|---|
| 71 | |
|---|
| 72 | M_Save: |
|---|
| 73 | savepoint "yuno",274,229; |
|---|
| 74 | callfunc "F_KafEnd",0,1,"in the city of Juno"; |
|---|
| 75 | } |
|---|
| 76 | |
|---|
| 77 | |
|---|
| 78 | // Function: Sets variables for Yuno Kafras ------------ |
|---|
| 79 | function script F_KafSetYun { |
|---|
| 80 | cleararray @wrpC$[0],"",getarraysize(@wrpC$); |
|---|
| 81 | setarray @wrpD$[0], "Al De Baran"; |
|---|
| 82 | setarray @wrpP[0], 1200; |
|---|
| 83 | set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0]; |
|---|
| 84 | set @wrpC$[1], "Cancel"; |
|---|
| 85 | setarray @viewpX[0], 328, 278, 153, 0; |
|---|
| 86 | setarray @viewpY[0], 108, 221, 187, 0; |
|---|
| 87 | return; |
|---|
| 88 | } |
|---|
