| [1] | 1 | //===== eAthena Script ======================================= |
|---|
| 2 | //= Geffen Kafras |
|---|
| 3 | //===== By: ========================= |
|---|
| 4 | //= eAthena Dev Team |
|---|
| 5 | //===== Current Version: =================== |
|---|
| 6 | //= 2.5 |
|---|
| 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 New warps and prices [Evera] |
|---|
| 23 | //= 2.3 Can't save outside city [Evera] |
|---|
| 24 | //= 2.4 Updated function calls with new arguments. [L0ne_W0lf] |
|---|
| 25 | //= Added unique Kafra Welcome messages. |
|---|
| 26 | //= Removed North and West Kafra |
|---|
| 27 | //= 2.5 Fixed Kafra NPC names. [L0ne_W0lf] |
|---|
| 28 | //===================================================================== |
|---|
| 29 | |
|---|
| 30 | |
|---|
| 31 | // South ===================================== |
|---|
| 32 | geffen,120,62,0 script Kafra Employee::kaf_geffen 115,{ |
|---|
| 33 | cutin "kafra_03",2; |
|---|
| 34 | callfunc "F_KafSetGef"; |
|---|
| 35 | mes "[Kafra Employee]"; |
|---|
| 36 | mes "Welcome~!"; |
|---|
| 37 | mes "The Kafra Services"; |
|---|
| 38 | mes "are always on your side."; |
|---|
| 39 | mes "So how can I help you?"; |
|---|
| 40 | callfunc "F_Kafra",5,0,0,30,750; |
|---|
| 41 | |
|---|
| 42 | M_Save: |
|---|
| 43 | savepoint "geffen",119,40; |
|---|
| 44 | callfunc "F_KafEnd",0,1,"in the city of Geffen"; |
|---|
| 45 | } |
|---|
| 46 | |
|---|
| 47 | // East ============================================== |
|---|
| 48 | geffen,203,123,2 script Kafra Employee::geffen2 114,{ |
|---|
| 49 | cutin "kafra_04",2; |
|---|
| 50 | callfunc "F_KafSetGef"; |
|---|
| 51 | mes "[Kafra Employee]"; |
|---|
| 52 | mes "Welcome!"; |
|---|
| 53 | mes "The Kafra Corporation"; |
|---|
| 54 | mes "will always support the"; |
|---|
| 55 | mes "adventurers of Rune-Midgard"; |
|---|
| 56 | mes "with its excellent service. So"; |
|---|
| 57 | mes "what can I do for you today?"; |
|---|
| 58 | callfunc "F_Kafra",5,0,0,30,750; |
|---|
| 59 | |
|---|
| 60 | M_Save: |
|---|
| 61 | savepoint "geffen",200,124; |
|---|
| 62 | callfunc "F_KafEnd",0,1,"in the city of Geffen"; |
|---|
| 63 | } |
|---|
| 64 | |
|---|
| 65 | |
|---|
| 66 | // Function: Sets variables for Geffen Kafras ------------------- |
|---|
| 67 | function script F_KafSetGef { |
|---|
| 68 | cleararray @wrpC$[0],"",getarraysize(@wrpC$); |
|---|
| 69 | setarray @wrpD$[0], "Prontera", "Al De Baran", "Orc Dungeon", "Mjolnir Dead Pit"; |
|---|
| 70 | setarray @wrpP[0], 1200, 1200, 1200, 1700; |
|---|
| 71 | set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0]; |
|---|
| 72 | set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1]; |
|---|
| 73 | set @wrpC$[2], @wrpD$[2]+" -> "+@wrpP[2]; |
|---|
| 74 | set @wrpC$[3], @wrpD$[3]+" -> "+@wrpP[3]; |
|---|
| 75 | set @wrpC$[4], "Cancel"; |
|---|
| 76 | setarray @viewpX[0], 120, 203; |
|---|
| 77 | setarray @viewpY[0], 62, 123; |
|---|
| 78 | return; |
|---|
| 79 | } |
|---|
