summaryrefslogblamecommitdiff
path: root/npc/quests/newgears/2004_headgears.txt
blob: 34b5686d35ca07c4356118be23a9a1627134f61a (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329
1330
1331
1332
1333
1334
1335
1336
1337
1338
1339
1340
1341
1342
1343
1344
1345
1346
1347
1348
1349
1350
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1367
1368
1369
1370
1371
1372
1373
1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395
1396
1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
1411
1412
1413
1414
1415
1416
1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443
1444
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464
1465
1466
1467
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
1482
1483
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499
1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530
1531
1532
1533
1534
1535
1536
1537
1538
1539
1540
1541
1542
1543
1544
1545
1546
1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563
1564
1565
1566
1567
1568
1569
1570
1571
1572
1573
1574
1575
1576
1577
1578
1579
1580
1581
1582
1583
1584
1585
1586
1587
1588
1589
1590
1591
1592
1593
1594
1595
1596
1597
1598
1599
1600
1601
1602
1603
1604
1605
1606
1607
1608
1609
1610
1611
1612
1613
1614
1615
1616
1617
1618
1619
1620
1621
1622
1623
1624
1625
1626
1627
1628
1629
1630
1631
1632
1633
1634
1635
1636
1637
1638
1639
1640
1641
1642
1643
1644
1645
1646
1647
1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
1658
1659
1660
1661
1662
1663
1664
1665
1666
1667
1668
1669
1670
1671
1672
1673
1674
1675
1676
1677
1678
1679
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692
1693
2387
2388
2389
2390
2391
2392
2393
2394
2395
2396
2397
2398
2399
2400
2401
2402
2403
2404
2405
2406
2407
2408
2409
2410
2411
2412
2413
2414
2415
2416
2417
2418
2419
2420
2421
2422
2423
2424
2425
2426
2427
2428
2429
2430
2431
2432
2433
2434
2435
2436
2437
2438
2439
2440
2441
2442
2443
2444
2445
2446
2447
2448
2449
2450
2451
2452
2453
2454
2455
2456
2457
2458
2459
2460
2461
2462
2463
2464
2465
2466
2467
2468
2469
2470
2471
2472
2473
2474
2475
2476
2477
2478
2479
2480
2481
2482
2483
2484
2485
2486
2487
2488
2489
2490
2491
2492
2493
2494
2495
2496
2497
2498
2499
2500
2501
2502
2503
2504
2505
2506
2507
2508
2509
2510
2511
2512
2513
2514
2515
2516
2517
2518
2519
2520
2521
2522
2523
2524
2525
2526
2527
2528
2529
2530
2531
2532
2533
2534
2535
2536
2537
2538
2539
2540
2541
2542
2543
2544
2545
2546
2547
2548
2549
2550
2551
2552
2553
2554
2555
2556
2557
2558
2559
2560
2561
2562
2563
2564
2565
2566
2567
2568
2569
2570
2571
2572
2573
2574
2575
2576
2577
2578
2579
2580
2581
2582
2583
2584
2585
2586
2587
2588
2589
2590
2591
2592
2593
2594
2595
2596
2597
2598
2599
2600
2601
2602
2603
2604
2605
2606
2607
2608
2609
2610
2611
2612
2613
2614
2615
2616
2617
2618
2619
2620
2621
2622
2623
2624
2625
2626
2627
2628
2629
2630
2631
2632
2633
2634
2635
2636
2637
2638
2639
2640
2641
2642
2643
2644
2645
2646
2647
2648
2649
2650
2651
2652
2653
2654
2655
2656
2657
2658
2659
2660
2661
2662
2663
2664
2665
2666
2667
2668
2669
2670
2671
2672
2673
2674
2675
2676
2677
2678
2679
2680
2681
2682
2683
2684
2685
2686
2687
2688
2689
2690
2691
2692
2693
2694
2695
2696
2697
2698
2699
2700
2701
2702
2703
2704
2705
2706
2707
2708
2709
2710
2711
2712
2713
2714
2715
2716
2717
2718
2719
2720
2721
2722
2723
2724
2725
2726
2727
2728
2729
2730
2731
2732
2733
2734
2735
2736
2737
2738
2739
2740
2741
2742
2743
2744
2745
2746
2747
2748
2749
2750
2751
2752
2753
2754
2755
2756
2757
2758
2759
2760
2761
2762
2763
2764
2765
2766
2767
2768
2769
2770
2771
2772
2773
2774
2775
2776
2777
2778
2779
2780
2781
2782
2783
2784
2785
2786
2787
2788
2789
2790
2791
2792
2793
2794
2795
2796
2797
2798
2799
2800
2801
2802
2803
2804
2805
2806
2807
2808
2809
2810
2811
2812
2813
2814
2815
2816
2817
2818
2819
2820
2821
2822
2823
2824
2825
2826
2827
2828
2829
2830
2831
2832
2833
2834
2835
2836
2837
2838
2839
2840
2841
2842
2843
2844
2845
2846
2847
2848
2849
2850
2851
2852
2853
2854
2855
2856
2857
2858
2859
2860
2861
2862
2863
2864
2865
2866
2867
2868
2869
2870
2871
2872
2873
2874
2875
2876
2877
2878
2879
2880
2881
2882
2883
2884
2885
2886
2887
2888
2889
2890
2891
2892
2893
2894
2895
2896
2897
2898
2899
2900
2901
2902
2903
2904
2905
2906
2907
2908
2909
2910
2911
2912
2913
2914
2915
2916
2917
2918
2919
2920
2921
2922
2923
2924
2925
2926
2927
2928
2929
2930
2931
2932
2933
2934
2935
2936
2937
2938
2939
2940
2941
2942
2943
2944
2945
2946
2947
2948
2949
2950
2951
2952
2953
2954
2955
2956
2957
2958
2959
2960
2961
2962
2963
2964
2965
2966
2967
2968
2969
2970
2971
2972
2973
2974
2975
2976
2977
2978
2979
2980
2981
2982
2983
2984
2985
2986
2987
2988
2989
2990
2991
2992
2993
2994
2995
2996
2997
2998
2999
3000
3001
3002
3003
3004
3005
3006
3007
3008
3009
3010
3011
3012
3013
3014
3015
3016
3017
3018
3019
3020
3021
3022
3023
3024
3025
3026
3027
3028
3029
3030
3031
3032
3033
3034
3035
3036
3037
3038
3039
3040
3041
3042
3043
3044
3045
3046
3047
3048
3049
3050
3051
3052
3053
3054
3055
3056
3057
3058
3059
3060
3061
3062
3063
3064
3065
3066
3067
3068
3069
3070
3071
3072
3073
3074
3075
3076
3077
3078
3079
3080
3081
3082
3083
3084
3085
3086
3087
3088
3089
3090
3091
3092
3093
3094
3095
3096
3097
3098
3099
3100
3101
3102
3103
3104
3105
3106
3107
3108
3109
3110
3111
3112
3113
3114
3115
3116
3117
3118
3119
3120
3121
3122
3123
3124
3125
3126
3127
3128
3129
3130
3131
3132
3133
3134
3135
3136
3137
3138
3139
3140
3141
3142
3143
3144
3145
3146
3147
3148
3149
3150
3151
3152
3153
3154
3155
3156
3157
3158
3159
3160
3161
3162
3163
3164
3165
3166
3167
3168
3169
3170
3171
3172
3173
3174
3175
3176
3177
3178
3179
3180
3181
3182
3183
3184
3185
3186
3187
3188
3189
3190
3191
3192
3193
3194
3195
3196
3197
3198
3199
3200
3201
3202
3203
3204
3205
3206
3207
3208
3209
3210
3211
3212
3213
3214
3215
3216
3217
3218
3219
3220
3221
3222















                                                               
                     
                                                                     
                      
                                              
                    
                                            
                        
                                         
                      
                                          
                    

                                                  
                   
                                              
                    
                                           
                    
                                               
                        
                                  
                     

                                                       
                     

                                            
                       
                                          
                         

                                               
                     













                                                                          
                                             

























































                                                                                               
                                             









































































































































































                                                                                                                                    
                                             










































































                                                                                                         
                                             





































































                                                                                
                                             


















































                                                                                               
                                     




























































                                                                                
                                             






























































































































































































































































































































































                                                                                                                                
                                             






























































































                                                                                                     
                                             







































































                                                                                                       
                                                    
















































































































































                                                                                                       
                                     



























































































                                                                                                          
                                                     

























































































































































































































































































































































































                                                                                                                               
                                             























































































































































































                                                                                                           
                                                              

    
                                                             





























































































































                                                                                                                                                                                                    
                                                      



               
                                                      



               
                                                      



               
                                                      




                                                                   
                                            

































































                                                                    
                                                   















































































































































































                                                                                                                                                   
                                                         





















                                                     
                                                                     


            
                                                







                                 

                                                                     

            
                                            



                                
                                                      

































































                                                                                                                                                                                                                                                     
                                                         



































































































































































































































































































































































































































































































































































































































































































































































































































































                                                                                                                           
                                                                

























                                                                                                        
                                                         















































































































                                                                                                     
//===== eAthena Script ======================================= 
//= 2004 Headgear Quests
//===== By: ================================================== 
//= Dj-Yhn
//===== Current Version: ===================================== 
//= 1.2
//===== Compatible With: ===================================== 
//= eAthena
//===== Description: ========================================= 
//= 2004 New Headgears. Official Quests
//===== Additional Comments: =================================
//= names with asterisk(*) are iRO names...
//= names done: 1,3,6,8,9,12,14,15,16,17
//= needed: 2,4,5,7,10,11,13 (7/17)
//= ==Information For NPC's inside File==
//= 1) Black Cat Ears [NekoNeko*] {Payon}
//=   o payon 115 131
//= 2) Crossed Hair Band, Plaster and Flower Hairpin [Arjen] {Geffen}
//=   o geffen 129 148
//= 3) Hot-blooded-headband [Zhenbolt*] {Yuno}
//=   o yuno 300 188
//= 4) Red Tailed Ribbon [Netpia] {Prontera}
//=   o prontera 165 232
//= 5) Indian Headband [Merunte] {Comodo}
//=   o comodo 237 217
//= 6) Mushroom headband [Ipore*] {Geffen}
//=   o geffen 67 87
//= 7) Ears of angel wing &
//=     Ears of devil wing [Old Blacksmith] {Yuno}
//=   o yuno 241 52
//= 8) Sea Otter Cap [Pretty Lindsay*] {Lutie}
//=   o xmas 183 267
//= 9) Brown Bear Cap [Fuzzy Fuzz*] {Lutie}
//=   o xmas 175 156
//=10) Cap of Concentration [Nan Hyang] {Payon}
//=   o payon_in03 8 193
//=11) Tulip Haipin [Ses] {Geffen}
//=   o geffen 83 189
//=12) Party Hat, Straw Hat, Cowboy Hat, Sombrero
//=	and Fur hat [Headgear Merchant (Mike)*] {Lutie}
//=   o xmas_in 35 30
//=13) Big Golden Bell, Headgear of Queen
//=     and Crown of Mistress [Neris] {Yuno}
//=   o yuno_in03 20 18
//=14) Alarm Mask [Muscle Man*]{Aldebaran}
//=   o alde_alche 88 180
//=15) Drooping Kitty, Smokie Leaf, Lazy Smokie
//= 	and Blue Fish [Traveler*] {Morroc}
//=   o morocc 273 79
//=16) Fox Mask [Nine Tail*] {Payon Dungeon}
//=   o pay_dun03 48 84
//=17) Orc Hero Helm [Orc Warrior*] {Orc Village}
//=   o in_orcs01 31 93 & 162 33
//============================================================
//= 1.01 Fixed items names iRO->kRO, fixed some bugs [Qwadrat]
//=	Fixed possible item exploits, fixed Straw Hat
//= 	Added missing checks [Lupus]
//= 1.1	Fixed a bug in Giant-band-aid that didn't counting rotten bandages
//=	Fixed a bug in Fur Hat that didn't count yarn [Evera]
//= 1.2 Syntax fixes for parenthesis, reformatting [KarLaeda]
//============================================================

//Payon /=Black cat ears=/
payon,115,131,3	script	NekoNeko	725,{
	if (countitem(2213) > 0 && countitem(983) > 0 && countitem(914) > 199 && Zeny > 9999) {
		delitem 2213,1;
		delitem 983,1;
		delitem 914,200;
		set Zeny,Zeny-10000;
		mes "[NekoNeko]";
		mes "Hihi? So you have collected all materials.";
		mes "According to our agreement,";
		mes "I will make it for you~ please";
		mes "wait for a while!";
		next;
		mes "[NekoNeko]";
		mes "Zomulazhumudazowuwudududu";
		mes "DidiSusuohwuzaowududaduda";
		next;
		getitem 5057,1;
		mes "[NekoNeko]";
		mes "Thank youfor using!";
		mes "If you need it again in future,";
		mes "come and fine me anytime!";
		close;
	} else {
		mes "[NekoNeko]";
		mes "How are you? Yes, I know.";
		mes "I know why you're trying to talk to me.";
		mes "That's because the Ears of Black Cat";
		mes "that I am wearing is too cute... right? Hahaha";
		next;
		mes "[NekoNeko]";
		mes "Honestly, I made this hairband";
		mes "with my skill of craftmanship.";
		mes "Therefore, not much people know,";
		mes "about this adorable head gear.";
		mes "Isn't that a pity that I use it myself?";
		next;
		mes "[NekoNeko]";
		mes "So, you better ask me to make that.";
		mes "I will make it";
		mes "with a pay of course.";
		mes "Fill your pockets with coints....";
		mes "That's my thinking, hehehehe";
		next;
		mes "[NekoNeko]";
		mes "^FF0000Kitty Band^000000 x1";
		mes "^FF0000Black Dyestuffs^000000 x1";
		mes "^FF0000Fluff^000000 x200";
		mes "and lastly, it requires at least ^FF000010000zeny^000000!";
		mes "If you want it, gather them and bring it to me~";
		next;
		mes "[NekoNeko]";
		mes "^FF0000Ah! Please keep this in mind.";
		mes "If you slot a card in your equipment,";
		mes "and you want to change it to the item now,";
		mes "you will lose the card and refined level.";
		close;
	}
}
//Geffen /=Crossed Hair Ban, Plaster and Flower Hairpin=/
geffen,129,148,3	script	Arjen	779,{
	mes "[Arjen]";
	mes "Ahhh~So boring~ So very boring~";
	mes "There's noone I need to see, and the weather is so good - ! !";
	mes "It's so boring that I have nothing to do.";
	emotion e_gasp; //not sure if this is ET_SCRATCH
	next;
	mes "[Arjen]";
	mes "Oh yes, hey there, you!!";
	mes "Do you want to have a cute and fine hair clip?";
	mes "For a person as skillful as I am, there's nothing I can't make!! Wa haha!";
	mes "Clap ! It will be ready just like that!";
	emotion e_omg; //ET_SURPRISE?
	next;
	mes "[Arjen]";
	mes "Lucky I am freerightnow. So, just bring me the materials and I will whoosh! make it for you!";
	mes "So, any idea of what accessory you would like to have?";
	emotion e_heh; //ET_SMILE
	next;
	switch(select("^3131FFX Hairpin:Giant Band Aid:Flower Hairpin^000000:End conversation.")) {
	case 1:
		if (countitem(2294) > 0 && countitem(7220) > 399) {
			mes "[Arjen]";
			mes "X Hairpin!";
			mes "That's very good !!";
			next;
			mes "[Arjen]";
			mes "Oh yes!";
			mes "The Stellar.."; //star dust? that's not refinable, now is it? =X
			mes "^CE3100During the production, the refine level will disappear, is that ok with you?^000000";
			next;
			switch(select("It's ok, just make it for me!:I will come next time.")) {
			case 1:
				mes "[Arjen]";
				mes "Oh well- Then,";
				mes "it's time to show my skill after all this time !?";
				next;
				mes "^3131FF - Sha Sha !! - ^000000";
				mes "^3131FF - Cha Sha Haa !! - ^000000";
				next;
				if (countitem(2294) > 0 && countitem(7220) > 399) {
					delitem 2294,1;
					delitem 7220,400;
					getitem 5079,1; //X-Hairping == crossed hair band?
				}
				mes "[Arjen]";
				mes " OK - !!";
				mes "I still have my touch! Wa ha ha!!";
				mes "How about that? Do you like it?";
				next;
				mes "[Arjen]";
				mes "If you have any need, come and find me here anytime!";
				mes "So, good bye. Good Bye!";
				close;
			case 2:
				mes "[Arjen]";
				mes "Fine, fine, come back after you've made up your mind!";
				close;
			}
		} else {
			mes "[Arjen]";
			mes "Right - the ^3131FF X Hairpin!^000000";
			mes "That's simple!";
			next;
			mes "[Arjen]";
			mes "^FF0000Stellar x1^000000";
			mes "^FF0000Ectoplasm x400^000000";
			mes "If you've prepared all of this, I will help to make it for you!";
			close;
		}
	case 2:
		if (countitem(970) > 0 && countitem(930) > 499) {
			mes "[Arjen]";
			mes "Giant Band Aid??..";
			mes "Oh well- Then,";
			mes "it's time to show my skill after all this time !?";
			next;
			mes "^3131FF - Sha Sha !! - ^000000";
			mes "^3131FF - Cha Sha Haa !! - ^000000";
			next;
			if (countitem(970) > 0 && countitem(930) > 499) {
				delitem 970,1;
				delitem 930,500;
				getitem 5063,1; //another one in wich I love gravity for changing names =X
			}
			mes "[Arjen]";
			mes " OK - !!";
			mes "I still have my touch! Wa ha ha!!";
			mes "How about that? Do you like it?";
			next;
			mes "[Arjen]";
			mes "If you have any need, come and find me here anytime!";
			mes "So, good bye. Good Bye!";
			close;
		} else {
			mes "[Arjen]";
			mes "Hoho - ^3131FF Plaster !^000000";
			mes "If anyone asked where this is the Plaster that is used when someone is hurt?";
			mes "Tell them it is the real Plaster for injured people.";
			mes "Hmm, isn't that easy?";
			next;
			mes "[Arjen]";
			mes "^FF0000Alcohol x1^000000";
			mes "^FF0000Rotten Bandage x500^000000";
			mes "If you have prepared all the items, I will help to make it for you now?";
			close;
		}
	case 3:
		if (countitem(2269) > 0 && countitem(999) > 9 && Zeny > 19999) {
			mes "[Arjen]";
			mes "Great !! Flower Hairpin ~";
			mes "it's time to show my skill after all this time !?";
			next;
			mes "^3131FF - Sha Sha !! - ^000000";
			mes "^3131FF - Cha Sha Haa !! - ^000000";
			next;
			if (countitem(2269) > 0 && countitem(999) > 9 && Zeny > 19999) {
				delitem 2269,1;
				delitem 999,10;
				set Zeny,Zeny-20000;
				getitem 5061,1; //finally a non-changed name =X
			}
			mes "[Arjen]";
			mes " OK - !!";
			mes "I still have my touch! Wa ha ha!!";
			mes "How about it? Do you like it? Here is the stem left from the production. Take it as a souvenir. Haha.";
			next;
			mes "[Arjen]";
			mes "If you have any need, come and find me here anytime!";
			mes "So, good bye. Good Bye!";
			close;
		} else {
			mes "[Arjen]";
			mes "Yes - ^3131FF Flower Hairpin !^000000";
			mes "Sometimes, I see some strange girls with bare legs and a flower in their mouths.";
			mes "Looking at them, I get an idea!";
			next;
			mes "[Arjen]";
			mes "That is ^3131FFFlower^000000, ^3131FFFlower^000000 !";
			mes "Wa ha ha, isn't that a perfect match?";
			mes "Some even equip it on the Orc Warrior, you should be proud of it, right?";
			mes "Really ~  ~  ~";
			next;
			mes "[Arjen]";
			mes "But the process takes a little more effort,";
			mes "I need to take some process fee.";
			next;
			mes "[Arjen]";
			mes "You should know that,";
			mes "stabilizing a fragile flower on the head";
			mes "takes a lot of concentration and";
			mes "very high level of skills!";
			next;
			mes "[Arjen]";
			mes "So, please bring,";
			mes "^FF0000Romantic Flower x1^000000";
			mes "^FF0000Steel x10^000000";
			mes "together with ^3131FF 20,000 zeny^000000 !";
			mes "If you have prepared all of these, I will make it for you right away!";
			mes "Do you understand that?";
			close;
		}
	case 4:
		mes "[Arjen]";
		mes "Ha, what? You don't want it?";
		mes "Rumblerumblerumble";
		close;
	}
}
//Yuno /=Headband of power=/ <-- Ok, WTF? Thanks again bitches ;_;
//Yuno /=Hot-blooded headband=/ [5070]
yuno,300,188,5	script	Zhenbolt	753,{
	if(countitem(7216) > 299 && countitem(7097) > 299 && countitem(2211) > 0 && countitem(982) > 0) {
		delitem 7216,300;
		delitem 7097,300;
		delitem 2211,1;
		delitem 982,1;
		mes "[Zhenbolt]";
		mes "Uh oh...Have you collected all the items?";
		mes "Good.";
		mes "According to out agreement,";
		mes "I will create it for you, whole hearedly.";
		next;
		mes "[Zhenbolt]";
		mes "........................";
		next;
		mes "[Zhenbolt]";
		mes "........................";
		next;
		mes "[Zhenbolt]";
		mes "..................-work harder!-";
		next;
		mes "[Zhenbolt]";
		mes "Uh oh... It's finished.";
		mes "If you wear it,";
		mes "you will feel some warmth,";
		mes "in this cold world.";
		mes "A great item has been born in this world.";
		mes "Ladies and gentleman, this is ^FF0000Hot-blooded Headband^000000!!";
		getitem 5070,1;
		next;
		mes "[Zhenbolt]";
		mes "With this, I will be able";
		mes "to get back to the person I miss soon.";
		mes "My name is";
		mes "Zhenbolt";
		mes "Main distributor of hear warming sensation!";
		close;
	} else {
		mes "[Zhenbolt]";
		mes "My name is Zhenbolt,";
		mes "a simple practioner that travels around the world,";
		mes "to spead the warmth of heart around the world.";
		next;
		mes "[Zhenbolt]";
		mes "You won't understand the meaning";
		mes "of a burning spirit and heat of passion through mere explaining.";
		mes "So do you want to accept this?";
		mes "I will create an item";
		mes "that stores my heart for you.";
		next;
		mes "[Zhenbolt]";
		mes "However,";
		mes "I cannot leave this place,";
		mes "because I need to pass the message to others...";
		mes "So,";
		mes "I will have to trouble you";
		mes "to gather the materials.";
		next;
		mes "[Zhenbolt]";
		mes "^FF0000Red Muffler^000000 300 unit";
		mes "^FF0000Burning Heart^000000 300 unit";
		mes "^FF0000Bandana^000000 1unit ^FF0000White Dyestuffs^000000 1 unit...";
		mes "To produce the item,";
		mes "you'll need this materials.";
		mes "Come to find me again after you've collected all the materials required.";
		next;
		mes "[Zhenbolt]";
		mes "^FF0000Besides that,";
		mes "Ah! Please keep this in mind.";
		mes "If you slot a card in your equipment,";
		mes "and you want to change it to the item now,";
		mes "you will lose the card and refined level.";
		close;
	}
}
//Prontera /=Red Tailed Ribbon=/ [5083](Red Ribbon)//
prontera,165,232,3	script	Netpia	744,{
	if(countitem(2244) > 0 && countitem(2209) > 0 && countitem(10007) > 0) {
		delitem 2244,1;
		delitem 2209,1;
		delitem 10007,1;
		mes "[Netpia]";
		mes "Wow... You've brought all of it.";
		mes "You've must have done a lot.";
		mes "I will make the item according to our agreement.";
		mes "Please wait for a while.";
		next;
		mes "[Netpia]";
		mes "...........................";
		next;
		mes "[Netpia]";
		mes "...........................";
		next;
		mes "[Netpia]";
		mes ".....................-Work Hard-";
		next;
		mes "[Netpia]";
		mes "Here it is.";
		mes "It's all yours now.";
		mes "Remember to always wear it.";
		getitem 5083,1;
		next;
		mes "[Netpia]";
		mes "Use this,";
		mes "to pass my intention to him...";
		mes "He left me for a while,";
		mes "with the hope to warm the heart of the world.";
		mes "The one who chases that dream...";
		mes "Where is he now?";
		next;
		mes "[Netpia]";
		mes "When you see the Red Ribbon,";
		mes "will you think of me,";
		mes "and continue to work harder?";
		mes "May you be blessed with luck on your journey.";
		close;
	} else {
		mes "[Netpia]";
		mes "Hello?";
		mes "Do you want to wear a Red Ribbon?";
		mes "It's a really beautiful head accesory.";
		mes "I am not trying to trick you,";
		mes "what do you think?";
		next;
		mes "[Netpia]";
		mes "^FF0000Big Ribbon^000000 x1.";
		mes "^FF0000Ribbon with one slot^000000 x1.";
		mes "^FF0000Silk Ribbon^000000 x1...";
		mes "I'll make it for you,";
		mes "if you bring the above items.";
		next;
		mes "[Netpia]";
		mes "Remember to bring it to me.";
		mes "I'll be more then glad,";
		mes "if you wear the Red Ribbon.";
		mes "Then see you soon.";
		next;
		mes "[Netpia]";
		mes "^FF0000Ah... let me tell you about this,";
		mes "Ah! Please keep this in mind.";
		mes "If you slot a card in you equipment,";
		mes "and you want to change it to the item now,";
		mes "you will lose the card and refined level.";
		close;
	}
}
//Comodo /=Indian Headband=/ [5071]
comodo,237,217,5	script	Merunte	732,{
	if (countitem(5010) > 0 && countitem(5049) > 0 && countitem(7101) > 9 && Zeny > 9999) {
		delitem 5010,1;
		delitem 5049,1;
		delitem 7101,10;
		set Zeny,Zeny-10000;
		mes "[Merunte]";
		mes "Oh oh! You have brought it like you've promised!";
		mes "Then we shall pay our end of our bargain,";
		mes "just like the Indians!";
		next;
		mes "[Merunte]";
		mes "Now let me have";
		mes "the materials that you have brought first.";
		mes "I will use it well to make the headband.";
		getitem 5071,1;
		next;
		mes "[Merunte]";
		mes "Ah Wuwuwuwuwuwuwuwuwuwuwu~";
		close;
	} else {
		mes "[Merunte]";
		mes "Ah Wuwuwuwuwuwuwuwuwuwuwu~";
		mes " ";
		mes "Let the spirit of Indian stay glorious forever!";
		mes "With the honor of Comodo Indian,";
		mes "raise the glory of Indian!";
		next;
		mes "[Merunte]";
		mes "For this reason,";
		mes "do you want to try wearing,";
		mes "an Indian Headband? Bring ^FF0000Indian Fillet^000000 x1";
		mes "^FF0000Striped Hairband^000000 x1";
		mes "^FF0000Peco Peco Feather^000000 x10";
		mes "and together with ^FF000010000zeny^000000!";
		next;
		mes "[Merunte]";
		mes "And Indiantakes a promise,";
		mes "more importantly than his life.";
		mes "As long as you bring it, I will make that for you anytime!";
		mes " ";
		mes "Ah Wuwuwuwuwuwuwuwuwuwuwu~";
		next;
		mes "[Merunte]";
		mes "^FF0000Ah! Please keep this in mind";
		mes "If you slot a card in your equipment,";
		mes "and you want to change it to the item now,";
		mes "you will lose the card and refined level.";
		close;
	}
}
//Geffen /=Mushroom Band=/ [5082]
geffen,67,87,3	script	Ipore	700,{
	if (countitem(921) > 299) {
		delitem 921,300;
		mes "[Ipore]";
		mes "Oh Wow. You really have brought the Mushroom Spore x 300?";
		mes "You much have been tired.";
		mes "Then, I shall use these,";
		mes "to perform a magic show for you!";
		mes "Please wait for a while.";
		next;
		mes "- Sha Ka Sha Ka Sha Ka Sha Ka Sha Ka Sha Ka -";
		mes "- Iporeput all the Mushroom Spores-";
		mes "- onto my head. -";
		next;
		mes "[Ipore]";
		mes "Kineisihayituoohyilaahahsaiyi";
		mes "Chahulisitawutehayisikenbiah";
		mes "BiwuBiwuBiwu....Keahahah!!";
		next;
		mes "[Ipore]";
		mes ".......................";
		mes "Shoosh... Anyway,";
		mes "The spore has grown on your head.";
		mes "It looks odd just like that.";
		mes "Let me help you to make it into a headband.";
		next;
		mes "[Ipore]";
		mes "So...How about that? Feeling any better?";
		mes "Making a headband,";
		mes "using the spore that grows from your head...";
		mes "Isn't that romantic? Hehe.";
		next;
		mes "[Ipore]";
		mes "Anyway, you've done a lot.";
		mes "So, take this headban with you to show off somewhere.";
		mes "If you want to make another one,";
		mes "just come and find me!";
		getitem 5082,1;
		close;
	} else {
		mes "[Ipore]";
		mes "Huhuhu...";
		mes "I fount it at last!";
		mes "I have discovered a magic";
		mes "that will make the spore grows on your head.";
		next;
		mes "[Ipore]";
		mes "Of course, it might be inconvenient,";
		mes "with a headfull of mushroom spore...";
		mes "That's why I pick it up";
		mes "and make it into a hairband for you.";
		next;
		mes "[Ipore]";
		mes "Aiyo! No point listening and do not see it for yourself!";
		mes "Just bring 300 ^FF0000Mushroom Spore^000000,";
		mes "and I will let you experience it!";
		mes "I am confident that if you experience such magic,";
		mes "you're surely be thankful to me, won't you?";
		close;
	}
}
//Yuno /=Ears of Angel's Wing & Ears of Devil's Wing=/ [5074]&[5068]
yuno,241,52,3	script	Old Blacksmith	813,{
	mes "[A seemingly skillful craftman]";
	mes "Uh Oh, since you've come to this place,";
	mes "you must have known how to enjoy the scenary.";
	mes "Since you're a Blacksmith, why not do your forging?";
	mes "What's the point staring at the sky?";
	mes "My name is Habir Moah!";
	mes "A wandering Blacksmith with my hammer as my companion.";
	next;
	if (countitem(2254) && countitem(2286) && Zeny>19999) {
		mes "[Habir Moah]";
		mes "Hmm? You do have really good items, don't you?";
		mes "Hmm... however,";
		mes "do you have the insufficientfeeling?";
		mes "If you are willing, take out your";
		mes "^4d4dffAngel Wing^000000 and ^4d4dffElven Ears^000000";
		mes "to create a unusual item.";
		next;
		mes "[Habir Moah]";
		mes "How about that, do you ever though of that?";
		mes "Don't suspect my capability!";
		mes "As a Blacksmith";
		mes "I am considered as one of the most skillful one, if not the most skillful!";
		mes "Through the skill of blacksmith,";
		mes "an ore will become a great steel, that's the rule.";
		next;
		switch(select("Hmm... I'll think about it.:Can you help me make it?:Can I craft Evil headband...?")) {
		case 1:
			mes "[Habir Moah]";
			mes "Hmm, what a pity!";
			mes "I thought I can show my skill again.";
			mes "Oh well.";
			mes "... ... ...";
			mes "Beautiful sky... So blue.";
			close;
		case 2:
			mes "[Habir Moah]";
			mes "Aha, thank you!";
			mes "Let's see the material first, shall we?";
			mes "Angel Wing and Elven Ears,";
			mes "other miscellaneous stuffs and 20000 zeny.";
			mes "All these items really cost something.";
			mes "I will help you make one fine accesory.";
			next;
			mes "[Habir Moah]";
			mes "Before I produce the item, let me remind you.";
			mes "I don't care about";
			mes "the level of refining for the item.";
			mes "If you have worries,";
			mes "I guess you better tidy up your items.";
			next;
			mes "[Habir Moah]";
			mes "^4d4dffPlease Reserve the items,";
			mes "that is required for making the headgear^000000";
			mes "I do not hope that you will blame me,";
			mes "if I fail to make that item.";
			next;
			switch(select("It's ok, just do it.:Hmm, I need to think about it.")) {
			case 1:
				mes "[Habir Moah]";
				mes "So, let's do it!";
				next;
				misceffect 154; //Success Hammer ;P
				mes "[Habit Moah]";
				mes "With my skills,";
				mes "the great creation of me, Habir Moah,";
				mes "is completed!";
				mes "Here it is,";
				mes "the Angel Wing Ears.";
				if (countitem(2254) && countitem(2286) && Zeny>19999) {
					delitem 2254,1;
					delitem 2286,1;
					set Zeny,Zeny-20000;
					getitem 5074,1;
				}
				next;
				mes "[Habir Moah]";
				mes "From now on,";
				mes "everyone will you.";
				close;
			case 2:
				mes "[Habir Moah]";
				mes "If you're interested in it in future,";
				mes "do come and find me.";
				mes " ";
				mes "Ah, what a soothing breeze.";
				close;
			}
		case 3:
			mes "[Habir Moah]";
			mes "Hoho, of couse I can craft";
			mes "Evil Wing!";
			mes "I'll make it into Devil Wing Ears!";
			next;
			mes "[Habir Moah]";
			mes "Let's see the materials required, shall we?";
			mes "Evil Wing and Elven Ears,";
			mes "in addition to that, 20,000 zeny.";
			mes "All these items really cost something.";
			mes "I will help you make one fine accesory.";
			next;
			mes "[Habir Moah]";
			mes "Before I produce the item, let me remind you.";
			mes "I don't care about";
			mes "the level of refining for the item.";
			mes "If you have worries,";
			mes "I guess you better tidy up your items.";
			next;
			mes "[Habir Moah]";
			mes "^4d4dffPlease reserve the items,";
			mes "this is required for making the headgear.^000000";
			mes "I do not hope that you will blame me,";
			mes "if I fail to make that item.";
			next;
			switch(select("It's ok. Let's do it.:I need to tidy up first.")) {
			case 1:
				if (countitem(2255) && countitem(2286) && Zeny > 19999) {
					mes "[Habir Moah]";
					mes "So, let's do it!";
					next;
					misceffect 154;
					mes "[Habir Moah]";
					mes "With my skills,";
					mes "the great creation of me, Habir Moah,";
					mes "is completed!";
					mes "Here it is,";
					mes "Devil Wing Ears";
					if (countitem(2255) && countitem(2286) && Zeny > 19999) {
						delitem 2255,1;
						delitem 2286,1;
						set Zeny,Zeny-20000;
						getitem 5068,1;
					}
					next;
					mes "[Habir Moah]";
					mes "Fromnow on,";
					mes "everyone will you.";
					close;
				} else {
					mes "[Habir Moah]";
					mes "I'm sorry. If you have not prepared all the materials,";
					mes "I won't do that for you.";
					mes "I'll need Evil Wing, Elven Ears and";
					mes "20000 zeny.";
					mes "Can you please confirm that you have all of those?";
					close;
				}
			case 2:
				mes "[Habir Moah]";
				mes "If you're interested in it in future,";
				mes "do come and find me.";
				mes " ";
				mes "Ah, what a soothing breeze.";
				close;
			}
		}
	} else if (countitem(2255) && countitem(2286) && Zeny>19999) {
		mes "[Habir Moah]";
		mes "Hmm? You do have really good items, don't you?";
		mes "Hmm... however,";
		mes "do you have the insufficientfeeling?";
		mes "If you are willing, take out your";
		mes "^4d4dffEvil Wing^000000 and ^4d4dffElven Ears^000000";
		mes "to create a unusual item.";
		next;
		mes "[Habir Moah]";
		mes "How about that, do you ever though of that?";
		mes "Don't suspect my capability!";
		mes "As a Blacksmith";
		mes "I am considered as one of the most skillful one, if not the most skillful!";
		mes "Through the skill of blacksmith,";
		mes "an ore will become a great steel, that's the rule.";
		next;
		switch(select("Hmm... I'll think about it.:Can you help me make it?:Can I craft Angel Wing...?")) {
		case 1:
			mes "[Habir Moah]";
			mes "Hmm, what a pity!";
			mes "I thought I can show my skill again.";
			mes "Oh well.";
			mes "... ... ...";
			mes "Beautiful sky... So blue.";
			close;
		case 2:
			mes "[Habir Moah]";
			mes "Aha, thank you!";
			mes "Let's see the material first, shall we?";
			mes "Evil Wing and Elven Ear,";
			mes "other miscellaneous stuffs and 20000 zeny.";
			mes "All these items really cost something.";
			mes "I will help you make one fine accesory.";
			next;
			mes "[Habir Moah]";
			mes "Before I produce the item, let me remind you.";
			mes "I don't care about";
			mes "the level of refining for the item.";
			mes "If you have worries,";
			mes "I guess you better tidy up your items.";
			next;
			mes "[Habir Moah]";
			mes "^4d4dffPlease Reserve the items,";
			mes "that is required for making the headgear^000000";
			mes "I do not hope that you will blame me,";
			mes "if I fail to make that item.";
			next;
			switch(select("It's ok, just do it.:Hmm, I need to think about it.")) {
				case 1:
					mes "[Habir Moah]";
					mes "So, let's do it!";
					next;
					misceffect 154; //Success Hammer ;P
					mes "[Habit Moah]";
					mes "With my skills,";
					mes "the great creation of me, Habir Moah,";
					mes "is completed!";
					mes "Here it is,";
					mes "the Angel Wing Ears.";
					if (countitem(2255) && countitem(2286) && Zeny>19999) {
						delitem 2255,1;
						delitem 2286,1;
						set Zeny,Zeny-20000;
						getitem 5068,1;
					}
					next;
					mes "[Habir Moah]";
					mes "From now on,";
					mes "everyone will you.";
					close;
				case 2:
					mes "[Habir Moah]";
					mes "If you're interested in it in future,";
					mes "do come and find me.";
					mes " ";
					mes "Ah, what a soothing breeze.";
					close;
				}
		case 3:
			mes "[Habir Moah]";
			mes "Hoho, of course I can craft";
			mes "Angel Wing!";
			mes "I'll make it into Angel Wing Ears!";
			next;
			mes "[Habir Moah]";
			mes "Let's see the materials required, shall we?";
			mes "Angel Wing and Elven Ears,";
			mes "in addition to that, 20,000 zeny.";
			mes "All these items really cost something.";
			mes "I will help you make one fine accesory.";
			next;
			mes "[Habir Moah]";
			mes "Before I produce the item, let me remind you.";
			mes "I don't care about";
			mes "the level of refining for the item.";
			mes "If you have worries,";
			mes "I guess you better tidy up your items.";
			next;
			mes "[Habir Moah]";
			mes "^4d4dffPlease reserve the items,";
			mes "this is required for making the headgear.^000000";
			mes "I do not hope that you will blame me,";
			mes "if I fail to make that item.";
			next;
			switch(select("It's ok. Let's do it.:I need to tidy up first.")) {
			case 1:
				if (countitem(2254) && countitem(2286) && Zeny > 19999) {
					delitem 2254,1;
					delitem 2286,1;
					set Zeny,Zeny-20000;
					mes "[Habir Moah]";
					mes "So, let's do it!";
					next;
					misceffect 154;
					mes "[Habir Moah]";
					mes "With my skills,";
					mes "the great creation of me, Habir Moah,";
					mes "is completed!";
					mes "Here it is,";
					mes "Angel Wing Ears";
					getitem 5074,1;
					next;
					mes "[Habir Moah]";
					mes "Fromnow on,";
					mes "everyone will you.";
					close;
				} else {
					mes "[Habir Moah]";
					mes "I'm sorry. If you have not prepared all the materials,";
					mes "I won't do that for you.";
					mes "I'll need Angel Wing, Elven Ears and";
					mes "20000 zeny.";
					mes "Can you please confirm that you have all of those?";
					close;
				}
			case 2:
				mes "[Habir Moah]";
				mes "If you're interested in it in future,";
				mes "do come and find me.";
				mes " ";
				mes "Ah, what a soothing breeze.";
				close;
			}
		}
	} else {
		mes "[Habir Moah]";
		mes "I am not sure how I have followed the wind,";
		mes "that leads me to Juno...";
		mes "Altough I don't really feel comfortable on a high place like this, the view here is really breath taking.";
		mes "I never knew the sky could be so beautiful,";
		mes "when I was travelling on the land.";
		next;
		mes "[Habir Moah]";
		mes "Anyway, I am a craftman in nature...";
		mes "I feel uneasy if I do not craft anything.";
		mes "And it's been a while since my last creation.";
		mes "If there're materials,";
		mes "I'll surely create the best creation of my life.";
		mes "Unfortunately, there weren't any. ...Hehe...";
		next;
		mes "[Habir Moah]";
		mes "May I ask, do you have either Angel Wing,";
		mes "Evil Wing or Elven Ear?";
		mes "If you do, can you bring it to me?";
		mes "I will help you to make a beautiful";
		mes "Ears of Angel's Wing and Ears of Devil's Wing.";
		next;
		switch(select("Can you tell me about the details?:I'll consider about it.")) {
		case 1:
			mes "[Habir Moah]";
			mes "Oh yes,";
			mes "I need to tell you the details about the materials.";
			mes "Angel Wing Ears requires ^4d4dffAngel Wings^000000 and";
			mes "^4d4dffElven Ears^000000 &#1038;Aand the cost for other materials is";
			mes "approximatedly ^4d4dff20000 zeny^000000";
			next;
			mes "[Habir Moah]";
			mes "Devil Wing Ears requires ^4d4dffEvil Wing^000000 and";
			mes "^4d4dffElven Ears^000000 &#1038;Awhile the cost for other materials is";
			mes "approximately ^4d4dff20000 zeny";
			next;
			mes "[Habir Moah]";
			mes "Please come to me after you have got all the materials.";
			mes "I will make the joy of Angel and terror of Devil";
			mes "as a present for you.";
			close;
		case 2:
			mes "[Habit Moah]";
			mes "I always look at thge sky at this location...";
			mes "So if you need me, you know where to find me.";
			close;
		}
	}
}
//Lutie /=Sea Otter Cap=/
xmas,183,267,3	script	Pretty Lindsay	793,{
	if (countitem(5033) && countitem(5064)) {
		delitem 5033,1;
		delitem 5064,1;
		mes "[Pretty Lindsay]";
		mes "Wow~ you really have brought all the items here.";
		mes "Hang on for a while~";
		mes "Lindsay will make that for you right now.";
		next;
		mes "[Pretty Lindsay]";
		mes "Just like what my mom taught me,";
		mes "first, place this on the ground...";
		mes "Preparation complete. . . .";
		mes "Haya, yah!";
		next;
		misceffect 261;
		mes "^FF0000Lindsay put the RaccoonHat on the ground,";
		mes "and place the Smokie Leaf on top of it.";
		mes "Then she say something that none could understand its meaning.";
		mes "There's a bright glitter,";
		mes "and the fur of the RaccoonHat slowly turns into blue color.";
		mes "And finally, the shape of Smokie turns into Otter.";
		next;
		mes "[Pretty Lindsay]";
		mes "Pheww! It's done!";
		mes "It's so tiring I am feeling weak right now!";
		mes "Here~ Take it~";
		getitem 5078,1;
		next;
		mes "[Pretty Lindsay]";
		mes "This is.. This is the best creation of Lindsay.";
		mes "Remember to put it on always~";
		mes "Farewell~";
		close;
	} else {
		mes "[Pretty Lindsay]";
		mes "Hi~ Wassup?";
		if (sex) {
			mes "Handsome boy.";
		} else {
			mes "Beautiful?";
		}
		next;
		mes "[Pretty Lindsay]";
		mes "Do you want to get a cute headgear?";
		mes "Pretty Lindsay is going to create";
		mes "a cap that looks like a Sea Otter this time.";
		mes "How about that? It should be cute, ya?";
		emotion e_heh; //ET_SMILE
		next;
		mes "[Pretty Lindsay]";
		mes "Imagina that~ If you get to wear that hat,";
		mes "you will have the feeling,";
		mes "that you're like an Sea Otter.";
		mes "If you can be like an Sea Otter.. Woah!";
		mes "I am getting excited just by imagining it.";
		next;
		mes "[Pretty Lindsay]";
		mes "However, production of ^4D4DFFSea-Otter Hat^000000 requires,";
		mes "^0000FFRaccoonHat^000000 x1 ^0000FFSmokie Leaf^000000 x1";
		mes "So, if you want to get a Sea-Otter Hat, brother,";
		mes "just bring along the materials,";
		mes "and Lindsay will make it for you immediately.";
		next;
		switch(select("I will come again when I have collected them.:Yo..why RaccoonHat?")) {
		case 1:
			mes "[Pretty Lindsay]";
			mes "Hmm~ Come back soon~";
			emotion e_heh; //ET_SMILE
			close;
		case 2:
			mes "[Pretty Lindsay]";
			mes "Ah..why Sea-Otter Hat production";
			mes "requires Smokie Hat?";
			mes "Hmm. .That's because. . . secrets.. .";
			next;
			mes "[Pretty Lindsay]";
			mes "When you place Smokie Leaf with RaccoonHat,";
			mes "and say the spell,";
			mes "according to what my mom had taught, the RaccoonHat will";
			mes "^003063Bang!!^000000 and turn into Sea-Otter Hat.";
			next;
			mes "[Pretty Lindsay]";
			mes "But I don't know why it can be like that.";
			mes "Mom never tell me the reason.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes ". . . . . . . . . . . . . . . . .";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Ok..Ok, I will come again when I have collected all the items.";
			close;
		}
	}
}
//Lutie /=Brown Bear Cap=/ [5059]
xmas,175,156,3	script	Fuzzy Fuzz	712,{
	if (countitem(5030) && countitem(7213) > 99 && countitem(7217) > 99 && countitem(7161) > 299) {
		delitem 5030,1;
		delitem 7213,100;
		delitem 7217,100;
		delitem 7161,300;
		mes "[Fuzzy Fuzz]";
		mes "Good! You've brought it!";
		mes "The production might take some time.";
		mes "There's a lot of amendment to be done.";
		mes "So, please wait for a while.";
		next;
		mes "[Fuzzy Fuzz]";
		mes ". . . TutaTusa. . .";
		mes "Pluck this off. . . .";
		mes "Wuha!~ Sew it happily..";
		mes "Wait a little longer.";
		next;
		mes "[Fuzzy Fuzz]";
		mes "Didn't they say people who wait will be more lucky?";
		mes "It's almost done. So wait for a little while.";
		mes "Rub your hands if you feel cold.";
		next;
		mes "[Fuzzy Fuzz]";
		mes "It is done!";
		mes "I've made a cap that is suitable for you!";
		mes "I know I made it, but it really looks nice.";
		mes "I used a lot of efforts,";
		mes "so please take good care of it.";
		mes "Here~ Please take it with you~";
		getitem 5059,1;
		close;
	} else {
		mes "[Fuzzy Fuzz]";
		if (sex) {
			mes "Hey you, hold it right there!";
		} else {
			mes "Yoh miss, hold it right there.";
		}
		mes "You who look like a slow and dumb bear,";
		mes "I have a cap that fits you,";
		mes "how about that? do you want it?";
		emotion e_omg; //ET_SURPRISE?
		next;
		mes "[Fuzzy Fuzz]";
		mes "Haha.. Looks like you're not happy";
		mes "because I said you look dumb, right?";
		mes "How sensitive . . .";
		mes "What I mean is, you're honest and easy to be tricked.";
		mes "OkOk.. don't look at me like that.";
		emotion e_sry; //ET_SORRY
		next;
		mes "[Fuzzy Fuzz]";
		mes "I can't make the cap now because I do not have the materials.";
		mes "Can you please.";
		mes "find the materials for me?";
		mes "I will help to make the 'Teddybear Hat' for you.";
		next;
		mes "[Fuzzy Fuzz]";
		mes "Come, let me tell you about the required materials.";
		mes "You won't need very much materials here.";
		mes "^0000FFPanda Hat^000000 x1 ^0000FFNeedle Packet^000000 x100";
		mes "^0000FFSpool^000000 x100 ^0000FFBlack Bear's Skin^000000 x300";
		mes "That's all,";
		mes "isn't that easy to be found?";
		next;
		mes "[Fuzzy Fuzz]";
		mes "I will be waiting for you!";
		emotion e_heh; //ET_SMILE
		close;
	}
}
//payon /=Cap of Concentration=/ [5073]
payon_in03,8,193,4	script	Nan Hyang	75,{
	if (countitem(2285) && countitem(1550)) {
		mes "[Nan Hyang]";
		mes "Sigh, give that to me.";
		mes "Before I start,";
		mes "take note of this,";
		mes "In the process of production ^FF0000'Model Training Hat'^000000,";
		mes "If ^FF0000the 'Book' is slotted with card,";
		mes "or possesses refined level^000000,";
		emotion e_heh; //ET_SMILE
		next;
		mes "[Nan Hyang]";
		mes "^FF0000the effect will dissappear,";
		mes "Of course, the same goes to the 'Apple of Archer' too^000000.";
		mes "So do you want me to make it now?";
		next;
		switch(select("Start making it:Wait, don't.")) {
		case 1:
			mes "[Nan Hyang]";
			mes "Request accepted,";
			mes "I will start it right now.";
			mes "Please have a seat,";
			mes "and wait for me, will you?";
			mes "This is to make sure that you have the correct posture.";
			mes "Don't worry, it's for free.";
			emotion e_ok; //ET_OK
			next;
			mes "[Nan Hyang]";
			mes "Please be patient!";
			next;
			mes ". . . . . . . . . . . . . . . . . .";
			mes " . . . . . . . . . . . . . . . . . ";
			mes ". . . . . . . . . . . . . . . . . .";
			mes " . . . . . . . . . . . . . . . . . ";
			next;
			mes "[Nan Hyang]";
			mes "This is not a hard task,";
			mes "so it's going to be completed right away..";
			mes "Please wear this hat,";
			mes "to keep a correct posture.";
			mes "Thank you!";
			next;
			mes "[Nan Hyang]";
			mes "An apple is placed on the book,";
			mes "keep it balanced and don't let is fall.";
			mes "This is the reason to put on the 'Model Training Hat',";
			mes "to keep the balance in order to keep the correct posture.";
			emotion e_oh; //ET_AHA? =X
			next;
			mes "[Nan Hyang]";
			mes "You might feel unconfortable and pain on your neck at the beginning.";
			mes "But as you use it,";
			mes "you will slowly found your posture going better.";
			if (countitem(2285) && countitem(1550)) {
				delitem 2285,1;
				delitem 1550,1;
				getitem 5073,1;
			}
			next;
			mes "[Nan Hyang]";
			mes "Here it is.";
			mes "Please take it.";
			mes "Ah.. Before I forget,";
			mes "This is the Arrow taken from the Apple of Archer.";
			mes "Please take it.";
			getitem 1750,1;
			next;
			mes "[Nan Hyang]";
			mes "Farewell then.";
			mes "Have a balanced day.";
			close;
		case 2:
			mes "[Nan Hyang]";
			mes "Ah.. isn't this an item that requires a lot of equipments?";
			mes "If you've fully prepared, come and find me.";
			emotion e_hmm; //ET_THINK?
			close;
		}
	} else {
		mes "[Nan Hyang]";
		mes "Good day.";
		mes "This place teaches manners and posture.";
		mes "May I know,";
		mes "how can I help you here?";
		emotion e_omg; //ET_SURPRISE?
		next;
		switch(select("I want to learn too . .:I'm sorry. I think I came to a wrong place.")) {
		case 1:
			mes "[Nan Hyang]";
			mes "Oh, I see.";
			mes "But how do I say this?";
			mes "I'm really sorry,";
			mes "we are not having any intake currently.";
			next;
			mes "[Nan Hyang]";
			mes "And since the president is going outstation,";
			mes "and we're not sure,";
			mes "when he'll return,";
			mes "(Phew..how long are you going to";
			mes "stay in the in. . . .)";
			next;
			mes "[Nan Hyang]";
			mes "Hmm, beofre you take the course of manners,";
			mes "we have to correct";
			mes "your unbalance posture first.";
			mes "This means that,";
			mes "a correct posture is a polite action.";
			mes "That's what I think.";
			next;
			mes "[Nan Hyang]";
			mes "Since it is quite impossible to correct your posture now,";
			mes "I will let you correct it yourself.";
			mes "The method is";
			mes "to create a 'Model Training Hat',";
			mes "for you.";
			next;
			mes "[Nan Hyang]";
			mes "Do you want me to make this for you?";
			mes "If you want it,";
			mes "please take the materials required here.";
			mes "Generally I can give it to you for free.";
			mes "But there's no stock in the storage anymore.";
			emotion e_hmm; //ET_QUESTION?
			next;
			mes "[Nan Hyang]";
			mes "If you bring ^0000FFApple of Archer^000000 x1 and ^0000FFBook^000000 x1,";
			mes "I will produce it,";
			mes "and give the product to you.";
			next;
			mes "[Nan Hyang]";
			mes "After you've get these items,";
			mes "come and find me.";
			mes "Farewell then.";
			close;
		case 2:
			mes "[Nan Hyang]";
			mes "Oh, I see.";
			mes "This place should be kept silent.";
			mes "If you do not have any important matters,";
			mes "can you please go out? Thank you.";
			mes "Good byethen. . .";
			close;
		}
	}
}
//geffen /=Tulip Hairpin=/
geffen,83,189,5	script	Ses	716,{
	mes "[Ses]";
	mes "My name is Ses.";
	mes "Ses like to fold paper.";
	mes "I used a big colorful paper to make a huge boat for mummy yesterday.";
	mes "She thank me and touch my head, hehe.";
	emotion e_heh; //ET_SMILE
	next;
	mes "[Ses]";
	mes "Today, the teacher teaches us the method to make beautiful flower!!!";
	mes "Altough it's a little bit hard~ it's very interesting~";
	mes"The flower is beautiful when you put it on your head. Everyone tell me so, and I'm so happy!";
	emotion e_heh; //ET_THROB?=X
	next;
	if (countitem(2278) && countitem(975)) {
		mes "[Ses]";
		mes "Hehe- Mr. Smile!! Scarlet Dyestuffs!!!";
		mes "WuYeaghhhhh---";
		mes "Come, let me";
		mes "help you make a beautiful flower !!";
		emotion e_swt; //ET_SWEAT
		next;
		mes "[Ses]";
		mes "Let me make it for you, ok? Ok????";
		emotion e_swt;
		next;
		switch(select("Allow you to do so:I reject")) {
		case 1:
			mes "[Ses]";
			mes "Wahahahaha~";
			emotion e_heh;
			next;
			mes "[Ses]";
			mes "Take this Mr Smile,";
			mes "cut here a little, cut there some~~";
			mes "and a little there, and here....";
			mes "yiyik...";
			emotion e_ho; //ET_DELIGHT?
			next;
			mes "[Ses]";
			mes "Ha- !! It's done!!!!";
			if (countitem(2278) && countitem(975)) {
				delitem 2278,1;
				delitem 975,1;
				getitem 5077,1;
			}
			next;
			mes "[Ses]";
			mes "Hehe, it's done,";
			mes "How about it? Cute, isn't it? Right?";
			next;
			mes "[Ses]";
			mes "Am I good?";
			mes "Hehe, I am making one for my bother too.";
			mes "You need one, brother.";
			mes "come and find me again if you want me to make a beautiful flower again.";
			mes "Good bye then~";
			close;
		case 2:
			mes "[Ses]";
			mes "Yiyee~~ I don't need to help you do it again then!!";
			close;
		}
	} else {
		mes "[Ses]";
		mes "Do you want to make on too, big brother?";
		mes "I will teach you... hehehe";
		next;
		mes "[Ses]";
		mes "However, you need to prepare some items,";
		mes "because I don't have anything now.";
		mes "Can you bring it to me, big brother?";
		next;
		switch(select("Sure:No")) {
		case 1:
			mes "[Ses]";
			mes "So please bring,";
			mes "^3131FFMr. Smile x1";
			mes "Scarlet Dyestuffs x1^000000";
			mes "I will make a beautiful red flower for you.";
			next;
			mes "[Ses]";
			mes "I will wait for you here. Remember to come, ok!?";
			close;
		case 2:
			mes "[Ses]";
			mes "Hooyeahyeahyeah~~~~~";
			emotion e_sob;
			close;
		}
	}
}
//Lutie /=Party Hat, Straw Hat, Cowboy Hat, Sombrero and Fur hat=/
xmas_in,35,30,3	script	Headgear Merchant	797,{
	mes "[Mike]";
	mes "I like hats...";
	mes "I like hats more than any other thing in this world!!";
	mes "Even if you compared hats with eating,";
	mes "wearing a new hat is far more important";
	next;
	mes "[Mike]";
	mes "Hat, Cap, Holy Bonnet,";
	mes "Turban, Iron Helm,";
	mes "Hemmed Sallet, Munak Turban...";
	mes "I like them all!!";
	mes "(Wuhoo! Wuhoohoo!!)";
	next;
	mes "[Mike]";
	mes "I have learned the way to modified a hat,";
	mes "and I am researching";
	mes "to design the most fashionable hat.";
	next;
	switch(select("Party Hat:Straw Hat:Cowboy Hat:Sombrero:Fur Hat")) {
	case 1: //Party hat [5060]
		if(countitem(2236) && countitem(7151) > 99 && countitem(7111) > 99) {
			mes "[Mike]";
			mes "Party Hat! It is made according to the Santa's Hat,";
			mes "decorated with some papers.";
			mes "This is the best Party Hat!! Do you want it?";
			mes "(Ohhhh, beautiful! So beautiful!)";
			next;
			mes "[Mike]";
			mes "Wait, before I start the production, let's confirm this.";
			mes "I will use items regarless of whether,";
			mes "it had been refined or slotted with cards.";
			mes "So you better just prepare the items required,";
			mes "and put the others in the storage.";
			next;
			mes "[Mike]";
			mes "You've brought all the materials...";
			mes "Great! The one who wants a Party Hat,";
			mes "do you want me to make it for you right now?";
			next;
			switch(select("No:Yes")) {
			case 1:
				mes "[Mike]";
				mes "Hmm, is that so...";
				mes "Let keep wearing your Santa's Hat then.";
				mes "Hmmmhmmmhmmm....";
				close;
			case 2:
				mes "^3355FFDeteDete ChebenCheben";
				mes "PotterPotter MeganMegan";
				mes "PosongPosong ShahaShaha";
				next;
				if(countitem(2236) && countitem(7151) > 99 && countitem(7111) > 99) {
					delitem 2236,1;
					delitem 7151,100;
					delitem 7111,100;
					getitem 5060,1;
				}
				mes "[Mike]";
				mes "Very Good!";
				mes "Force the birthday fellow to put this on,";
				mes "then you can play tricks on him. That should be fun...";
				mes "Please come again too next time~";
				next;
				mes "[Mike]";
				mes "And, this is what's left after the process.";
				mes "Here, take it!";
				mes "Maybe it might be useful to you... (Hehehehe)";
				getitem 949,10;
				close;
			}
		} else {
			mes "[Mike]";
			mes "Party Hat! It's a necessity,";
			mes "for anyone who throws a birthday party.";
			mes "No matter how serious looking one is,";
			mes "the hat will make him look cute and funny!";
			next;
			mes "[Mike]";
			mes "In my opinion, it is suitable not only for birthday,";
			mes "but as well as entertaining event!";
			mes "This beautiful hat is just suitable for fun.";
			mes "(...How about organizing a party for adventure?!?)";
			next;
			mes "[Mike]";
			mes "Anyway, the material required are";
			mes "^3355FFSanta's Hat^000000 x1";
			mes "^3355FFOil Paper^000000 x100";
			mes "^3355FFSlick Paper^000000 x100";
			next;
			mes "[Mike]";
			mes "These are what I need.";
			mes "So don't forget to collect the material, ok?";
			mes "I will always be around....";
			mes "So come back only after you have collected them!";
			close;
		}
	case 2: //Straw Hat [5062]
		if(countitem(2280) && countitem(7197) > 299 && countitem(7150) > 299) {
			mes "[Mike]";
			mes "Straw Hat! This hat is based on Sahkkat,";
			mes "that is make of bamboo and rattan.";
			mes "Wearing it makes you think that you're going to have a good harvesting year!";
			mes "(Look, power of farmer!!)";
			next;
			mes "[Mike]";
			mes "Wait, before I start the production, let's confirm this.";
			mes "I will use items regardless of whether";
			mes "it had been refined or slotted with cards.";
			mes "So you better just prepare the items required,";
			mes "and put the others in the storage.";
			next;
			mes "[Mike]";
			mes "You've brought all the materials...";
			mes "Great! The one who wants a Straw Hat,";
			mes "do you want me to make it for you right now?";
			next;
			switch(select("No, thanks:Sure")) {
			case 1:
				mes "[Mike]";
				mes "Hmm, is that so...";
				mes "Let keep wearing your Sahkkat then.";
				mes "Hmmmhmmmhmmm....";
				close;
			case 2:
				mes "^3355FFSakaSaka WakaWaka";
				mes "JekaJeka HuyiHuyi";
				mes "PokaPoka TewuTewu^000000";
				next;
				if(countitem(2280) && countitem(7197) > 299 && countitem(7150) > 299) {
					delitem 2280,1;
					delitem 7197,300;
					delitem 7150,300;
					getitem 5062,1;
				}
				mes "[Mike]";
				mes "HmmHmm! It feels that the harvest of this year shall be good!";
				mes "I hope next year will be the same too...";
				mes "Ahahaha, what am I talking about...";
				mes "Please come again if you want more~";
				close;
			}
		} else {
			mes "[Mike]";
			mes "Staw Hat! It gives you energy to work,";
			mes "even under the heat of the sun";
			mes "as well as providing shades that give you a cool feeling.";
			mes "This hat will make you hope for a good harvest this year too!";
			next;
			mes "[Mike]";
			mes "This hat is suitable for the farmers,";
			mes "who want to plant or cultivate their crops.";
			mes "You have the feel of a villager when you wear it!";
			mes "(For your info, I am a city kid!)";
			next;
			mes "[Mike]";
			mes "Anyway, the materials required for production are";
			mes "^3355FFSakkat^000000 x1";
			mes "^3355FFTough Vines^000000 x300";
			mes "^3355FFPiece of Bamboo^000000 x300";
			next;
			mes "[Mike]";
			mes "These are what I need.";
			mes "So don't forget to collect all the material, ok?";
			mes "I will always be around....";
			mes "So come back only after you have collected them!";
			close;
		}
	case 3: //Cowboy Hat [5075]
		if (countitem(2248) && countitem(7030) > 107 && countitem(7194) > 107 && countitem(7120) > 3) {
			mes "[Mike]";
			mes "Cowboy Hat! A hat of western feel,";
			mes "but looks toughet than Western Grace,";
			mes "That is suitable for the western's males!";
			mes "(Qiang... Yeehahaa~...)";
			next;
			mes "[Mike]";
			mes "Wait, before I start the production, let's confirm this.";
			mes "I will use item regardless of wether";
			mes "It had been refined or slotted with cards.";
			mes "So you better just prepare the items required,";
			mes "and put the others in the storage.";
			next;
			mes "[Mike]";
			mes "You've brought all the materials...";
			mes "Great! The one who wants a Cowboy Hat,";
			mes "do you want me to make it for you right now?";
			switch(select("No:Yes")) {
			case 1:
				mes "[Mike]";
				mes "Hmm,is that so...";
				mes "Let keep wearing your typical Western Grace then.";
				mes "Hmmmhmmmhmmm....";
				close;
			case 2:
				mes "^3355FFDudududu bangbangbangbang";
				mes "TadamTadam BiyongBiyong";
				mes "Wuuuuu Ahwuwuwuwuw^000000";
				next;
				if (countitem(2248) && countitem(7030) > 107 && countitem(7194) > 107 && countitem(7120) > 3) {
					delitem 2248,1;
					delitem 7030,108;
					delitem 7194,108;
					delitem 7120,4;
					getitem 5075,1;
				}
				mes "[Mike]";
				mes "HeeeHaH! With that";
				mes "you can tame even the wildest stiallion!";
				mes "Please come again if you need more~";
				close;
			}
		} else {
			mes "[Mike]";
			mes "Cowboy Hat!A hat of western feel,";
			mes "where you seem to found the boiling blood of the cowboys...";
			mes "It's as if you are going to draw something out,";
			mes "and start shooting!";
			next;
			mes "[Mike]";
			mes "The Cowboy Hat with thefeel of opening a barren land...";
			mes "It makes guys look cool!";
			mes "and it makes gals look prettier";
			mes "(Is tought the new concept of beauty...?)";
			next;
			mes "[Mike]";
			mes "Anyway, the materials required for production are";
			mes "^3355FFWestern Grace^000000 x1";
			mes "^3355FFClaw of Desert Wolf^000000 x108";
			mes "^3355FFSoft Blade of Grass^000000 x108";
			mes "^3355FFBurning Horseshoe^000000 x4";
			next;
			mes "[Mike]";
			mes "These are what I need.";
			mes "So don't forget to collect the material, ok?";
			mes "I will always be around....";
			mes "So come back only after you have collected them!";
			close;
		}
	case 4: //Sombrero [5067]
		if (countitem(5062) && countitem(952) > 49 && countitem(1907)) {
			mes "[Mike]";
			mes "SipoleiyeahhhhhhWoohohoh!!";
			mes "Amigo! Adios Amigo!";
			mes "If you like the sun and happy melody,";
			mes "this is the right hat for you!!";
			next;
			mes "[Mike]";
			mes "Wait, before I start the production, let's confirm this.";
			mes "I will use items regardless of wether";
			mes "it had been refined or slotted with cards.";
			mes "So you better just prepare the items required";
			mes "and put the others in the storage";
			next;
			mes "[Mike]";
			mes "You've brought all the materials...";
			mes "Great! The one who wants a Sombrero,";
			mes "so you want me to make if for you right now?";
			switch(select("No:Yes")) {
			case 1:
				mes "[Mike]";
				mes "Hmmm, is that so...";
				mes "Let keep wearing your shady Straw Hat then.";
				mes "Hmmmhmmmhmmm....";
				close;
			case 2:
				mes "^3355FFQingkaQinka KiangggQiangkiang";
				mes "Diringringling kaciangkaciang";
				mes "Adios Mamamiya^000000";
				next;
				if (countitem(5062) && countitem(952) > 49 && countitem(1907)) {
					delitem 5062,1;
					delitem 952,50;
					delitem 1907,1;
					getitem 5067,1;
				}
				mes "[Mike]";
				mes "If you wear this to the desert,";
				mes "you'll be Muka's friend too!! Full with joyous tempo and heat!!";
				mes "Please come again if you want more~";
				close;
			}
		} else {
			mes "[Mike]";
			mes "Yibayiba, andeleh andeleh!!";
			mes "Amigo! Adios, Amigo!";
			mes "Come again, Morocc!";
			mes "Astalacista Baby!";
			next;
			mes "[Mike]";
			mes "For you who like the sun and loud music!!";
			mes "I present you with";
			mes "the tri-level hat, Sombrero!!";
			mes "(From Yggdrasil tree trill here!?)";
			next;
			mes "[Mike]";
			mes "Anyway, the materials required for production are";
			mes "^3355FFStraw Hat^000000 x1,";
			mes "^3355FFCactus Needle^000000 x50,";
			mes "^3355FFGuitar^000000 x1";
			next;
			mes "[Mike]";
			mes "These are what I need";
			mes "So don't forget to collect the material, ok?";
			mes "I will always be around....";
			mes "So come back only after you have collected them!";
			close;
		}
	case 5: //fur hat [5076]
		if (countitem(2226) && countitem(7038) > 499) {
			mes "[Mike]";
			mes "Fur Hat! Yo, Man! Check it out!";
			mes "It's good for keeping warm! But it's fashionable too!";
			mes "Even if you went to places as cold as Lutie,";
			mes "you will be ok with this Beanie!!";
			next;
			mes "[Mike]";
			mes "Wait, before I start the productions, let's confirm this.";
			mes "I will use items regardless of wether";
			mes "it had been refined or slotted with cards.";
			mes "So you better just prepare the items required,";
			mes "and put the others in the storage.";
			next;
			mes "[Mike]";
			mes "You've brought all the materials...";
			mes "Great! The one who wants a Beanie,";
			mes "do you want me to make it for you right now?";
			next;
			switch(select("No:Yes")) {
			case 1:
				mes "[Mike]";
				mes "Hmm, is that so...";
				mes "Let keep wearing your Cap that is produce in bundles then.";
				mes "Hmmmhmmmhmmm....";
				close;
			case 2:
				mes "^3355FFKafokapo Kafokapo";
				mes "poterpote poterpote";
				mes "PosongPosong PosongPosong";
				next;
				if (countitem(2226) && countitem(7038) > 499) {
					delitem 2226,1;
					delitem 7038,500;
					getitem 5076,1;
				}
				mes "[Mike]";
				mes "Complete! The nicely knitted,";
				mes "cute white hat! Yeat! Go Go!";
				mes "Please come again if you need more~";
				close;
			}
		} else {
			mes "[Mike]";
			mes "Beanie! Gimme a chocolate!! Right!";
			mes "No matter who wears it,";
			mes "you will feel the snowy winter!! Event if you are from Morocc,";
			mes "you will look more like a traveller from Lutie if you put that on!";
			next;
			mes "[Mike]";
			mes "There was a rumor";
			mes "people wearing it will pull out his hard and shout Yo without knowing it-";
			mes "I think we better change a topic...";
			mes "(Hot weather, the head can't stand the heat?!?)";
			next;
			mes "[Mike]";
			mes "Anyway, the material required for production are";
			mes "^3355FFCap^000000 x1,";
			mes "^3355FFYarn^000000 x500.";
			next;
			mes "[Mike]";
			mes "These are what I need.";
			mes "So don't forget to collect the material, ok?";
			mes "I will always be around....";
			mes "So come back only after you have collected them!";
			close;
		}
	}
}
//Yuno /=Big Golden Bell, Headgear of Queen and Mistress Crown=/
yuno_in03,20,18,6	script	Neris	726,{
	mes "[Neris]";
	mes "This time,";
	mes "as a gratitude of everyone's support to the Museum,";
	mes "we have prepared a special item,";
	mes "That is ...!";
	next;
	mes "[Neris]";
	mes "If an accessoiries for monsters is reconstructed, it can be equipped by human too!";
	next;
	mes "[Neris]";
	mes "We are in the experimenting stage currently,";
	mes "and there're only 3 type of monster's accesories that can be equipped.";
	mes "Maybe there're more to come in the future.";
	mes "However,";
	mes "we cannot provide these accessories to everyone without limit.";
	mes "We would like to ask for the materials and production fee,";
	mes "before we can provide the accessories to you.";
	next;
	mes "[Neris]";
	mes "Please select an accessoiries that you are curious of, or wich us to produce for you.";
	next;
	switch(select("Decorative Golden Bell:Crown of Ancient Queen:Crown of Mistress")) {
	case 1: //Big golden bell [5091]
		mes "[Neris]";
		mes "The Decorative Golden Bell is";
		mes "the accessory equipped by the monster 'Sohee'.";
		mes "It's very suitable and looks good on female players.";
		mes "Altough it might be a little big, I'm sure you'll like it.";
		next;
		if (countitem(10016) && countitem(714) && countitem(969) > 2 && Zeny > 19999) {
			delitem 10016,1;
			delitem 714,1;
			delitem 969,3;
			set Zeny,Zeny-20000;
			mes "[Neris]";
			mes "So you have brought all the required materials.";
			mes "Please wait for a while.";
			next;
			mes "^3355FF- Dang Dang! Qing Yi Qing Yi! Ding Ding Dang Dang! -^000000";
			getitem 5091,1;
			next;
			mes "[Neris]";
			mes "EEyaah~ The elegant golden bell is complete.";
			mes "Walk around with it.";
			mes "Altough it won't make the ding dong sounds,";
			mes "it sure is beautiful.";
			next;
			mes "[Neris]";
			mes "Don't you feel that you look like a Sohee now?";
			mes "But don't commit suicide like her.";
			mes "If you want to make anymore of it,";
			mes "do come and find me again.";
			mes "Finally, please come to visit the Monster Museum frequently.";
			close;
		} else {
			mes "[Neris]";
			mes "The material required for the production of this item are,";
			mes "^3355FFGolden Bell x1, Emperium x1, Gold x3^000000 and";
			mes "20,000 zeny";
			next;
			mes "[Neris]";
			mes "As long as you are prepared,";
			mes "with the materials and zeny required for the production,";
			mes "I will make it for you anytime.";
			close;
		}
	case 2: //Headgear of Queen [5080] (Crown of ancient queen)
		mes "[Neris]";
		mes "The Crown of Ancient Queen is the equipment of";
		mes "monster 'Isis'.";
		mes "When you wear it,";
		mes "you will feel like a queen.";
		next;
		if (countitem(10006) && countitem(714) && countitem(969)>2 && Zeny>19999) {
			delitem 10006,1;
			delitem 714,1;
			delitem 969,3;
			set Zeny,Zeny-20000;
			mes "[Neris]";
			mes "So you have brought all the required materials.";
			mes "Please wait for a while.";
			next;
			mes "^3355FF- Dang Dang! Qing Yi Qing Yi! Ding Ding Dang Dang! -";
			getitem 5080,1;
			next;
			mes "[Neris]";
			mes "Here it is! The Crown of Ancient Queen!";
			mes "Altough you won't become a real queen after wearing it,";
			mes "you will surely";
			mes "have a different feeling.";
			next;
			mes "[Neris]";
			mes "After you wear this,";
			mes "I think you should really have a good figure,";
			mes "because that will be more meaningful.";
			mes "If you need to make it again,";
			mes "do come find me again.";
			mes "Finally, please come to visit the Monster Museum frequently.";
			close;
		} else {
			mes "[Neris]";
			mes "The materials required for the production are";
			mes "^3355FFQueen's Hair Ornament x1, Emperium x1, Gold x3^000000 and";
			mes "20,000 zeny.";
			next;
			mes "[Neris]";
			mes "As long as you are prepared";
			mes "with the materials and zeny required for the production";
			mes "I will make it for you anytime.";
			close;
		}
	case 3: //crown of mistress [5081]
		mes "[Neris]";
		mes "Crown of Mistress is";
		mes "brought by monster 'Mistress'."; //Maya? riiiight!
		mes "You can feel the precence of Mistress from it.";
		next;
		if (countitem(2249) && countitem(714) && countitem(969)>2 && Zeny>39999) {
			mes "[Neris]";
			mes "So you have brought everything.";
			mes "^FF0000However, during the process of production,";
			mes "no matter how many times";
			mes "the coronet is refined,";
			mes "it does not have effect to the product.";
			next;
			mes "[Neris]";
			mes "^FF0000So,";
			mes "please bring along only the Coronet x 1 that is required for the production.";
			mes "If anything is missing,";
			mes "we will not take responsible of it.^000000";
			mes "So, are you ready?";
			next;
			switch(select("Yes, I am.:Hold on, please")) {
			case 1:
				mes "[Neris]";
				mes "Please wait for a while.";
				next;
				mes "^3355FF- Dang Dang! Qing Yi Qing Yi! Ding Ding Dang Dang! -";
				if (countitem(2249) && countitem(714) && countitem(969)>2 && Zeny>39999) {
					delitem 2249,1;
					delitem 714,1;
					delitem 969,3;
					set Zeny,Zeny-40000;
					getitem 5081,1;
				}
				next;
				mes "[Neris]";
				mes "Woohoo!";
				mes "The beautiful Crown of Mistress is completed.";
				mes "Altough you won't have any servants,";
				mes "after you've worn it,";
				mes "I am sure you're having a different feeling.";
				next;
				mes "[Neris]";
				mes "If you wear this crown,";
				mes "and takea photo with Mistress,";
				mes "it will be very interesting.";
				mes "If you want to make anymore of it,";
				mes "do come find me again.";
				mes "Finally, please come to visit the Monster Museum frequently.";
				close;
			case 2:
				mes "[Neris]";
				mes "Please confirm it first";
				mes "before you come to me~";
				close;
			}
		} else {
			mes "[Neris]";
			mes "The materials required for production are";
			mes "^3355FFCoronet x1, Emperium x1, Gold x3^000000 together with";
			mes "40,000 zeny.";
			next;
			mes "[Neris]";
			mes "As long as you are prepaired";
			mes "with the materials and zeny required for the production,";
			mes "I will make it for you anytime.";
			close;
		}
	}
}
//Aldebaran /=Alarm Mask=/
//Effects: EF_BLASTMINE: 106
//EF_FLASHER:99
alde_alche,88,180,1	script	Muscle Man#Alarm	1193,{
end;
}
alde_alche,88,180,1	script	Muscle Man#Masked Alarm	748,{
	mes "[Muscle Man]";
	mes "Muscle, muscle. I like it. Hehe!!";
	mes "What a beautiful robotic muscle!";
	misceffect 99;
	disablenpc "Muscle Man#Masked Alarm";
	enablenpc "Muscle Man#Alarm";
	enablenpc "#Masked Alarm1";
	enablenpc "#Masked Alarm2";
	enablenpc "#Masked Alarm3";
	enablenpc "#Masked Alarm4";
	donpcevent "#Masked Alarm1::OnBlast";
	donpcevent "#Masked Alarm2::OnBlast";
	donpcevent "#Masked Alarm3::OnBlast";
	donpcevent "#Masked Alarm4::OnBlast";
	next;
	disablenpc "Muscle Man#Alarm";
	enablenpc "Muscle Man#Masked Alarm";
	if (countitem(2288) && countitem(1095) > 2999) {
		switch(select("Give him the item:End")) {
		case 1:
			mes "You found... You found it. You really found it!";
			mes "That's great! That's so great!";
			next;
			mes "[Muscle Man]";
			mes "Yes... From today onwards, the Clock Hand and Mr. Scream are mine! My Precious!";
			next;
			mes "[Muscle Man]";
			mes "And this, this shall be your precious.";
			if (countitem(2288) && countitem(1095) > 2999) {
				delitem 1095,3000;
				delitem 2288,1;
				getitem 5086,1;
			}
			next;
			mes "[Muscle Man]";
			mes "Good... Good bye! If you find more, remember to bring it here!!";
			donpcevent "#Masked Alarm1::OnBlast";
			donpcevent "#Masked Alarm2::OnBlast";
			donpcevent "#Masked Alarm3::OnBlast";
			donpcevent "#Masked Alarm4::OnBlast";
			disablenpc "#Masked Alarm1";
			disablenpc "#Masked Alarm2";
			disablenpc "#Masked Alarm3";
			disablenpc "#Masked Alarm4";
			close;
		case 2:
			mes "[Muscle Man]";
			mes "Hmm? Do you have anything to say to me?";
			mes "I smell something. Isn't that the nice smell of the grease from Mr. Alarm that I sense now?";
			donpcevent "#Masked Alarm1::OnBlast";
			donpcevent "#Masked Alarm2::OnBlast";
			donpcevent "#Masked Alarm3::OnBlast";
			donpcevent "#Masked Alarm4::OnBlast";
			disablenpc "#Masked Alarm1";
			disablenpc "#Masked Alarm2";
			disablenpc "#Masked Alarm3";
			disablenpc "#Masked Alarm4";
			close;
		}
	} else {
		mes "[Muscle Man]";
		mes "This is the item created by 'Loui Meato' that is attached to the arms and legs of Alarm.";
		mes "This is the ancient technique that can be found in the Clock Tower.";
		next;
		mes "[Muscle Man]";
		mes "If there's any skill to shrink this thing, 'Loui Meato' can be used by everyone soon!";
		next;
		mes "[Muscle Man]";
		mes "Although I've lost my arm and legs in an alchemy accident, but if I can make this technique for public, it will benefit a lot of people!";
		next;
		mes "[Muscle Man]";
		mes "Therfore... I want to ask you";
		mes "Do you have the will to help my in this research?";
		next;
		mes "[Muscle Man]";
		mes "The material is not enough. I want the Alarm's ^0000FFClock Hand^000000 and that strange ^0000FFMr. Scream^000000 that is said to look like the mask of Alarm.";
		mes "It will help a lot if you have those things.";
		next;
		mes "[Muscle Man]";
		mes "However, when I saw the Alarm in the Clock Tower, I will be fascinated by the great work on the creature's mechanical parts that is so brilliantly designed and manifactured.";
		mes "I've forgotten everything, including the materials required for the research.";
		next;
		mes "[Muscle Man]";
		mes "I am telling you this, to give you the opportunity to help me.";
		mes "So how about that? Do you wish to help me? The price is the Mask of Alarm that looks really good! It's a very important thing, you know?";
		next;
		donpcevent "#Masked Alarm1::OnBlast";
		donpcevent "#Masked Alarm2::OnBlast";
		donpcevent "#Masked Alarm3::OnBlast";
		donpcevent "#Masked Alarm4::OnBlast";
		disablenpc "#Masked Alarm1";
		disablenpc "#Masked Alarm2";
		disablenpc "#Masked Alarm3";
		disablenpc "#Masked Alarm4";
		switch(select("I will help you:............")) {
		case 1:
		case 2:
			mes "[Muscle Man]";
			mes "Ohohoh! You agree that Mr. Alarm is beautiful too!";
			mes "Good, good!";
			next;
			mes "[Muscle Man]";
			mes "What I want is, ^0000FFClock Hand x3000^000000 and";
			mes "^0000FFMr. Scream x1 ^000000";
			mes "With these items, I will be able to reasearch the fascinating parts of Mr. Alarm.";
			next;
			mes "[Muscle Man]";
			mes "I have said before. If you're able to find these things, I will give you Mr. Alarm's Mask.";
			mes "You will have the chance to wear ^0000FFAlarm's Mask^000000!";
			next;
			mes "[Muscle Man]";
			mes "Go! Go and find them now!";
			mes "Follower of Mr Alarm.";
			mes "The researcher of 'Loui Meato'.";
			mes "He who wants to be Mr. Alarm!";
			close;
		}
	}
OnInit:
	disablenpc "#Masked Alarm1";
	disablenpc "#Masked Alarm2";
	disablenpc "#Masked Alarm3";
	disablenpc "#Masked Alarm4";
	disablenpc "Muscle Man#Alarm";
	end;
}
alde_alche,86,184,3	script	#Masked Alarm1	1193,{
end;
OnBlast:
misceffect 106;
end; }
alde_alche,89,184,3	script	#Masked Alarm2	1193,{
end;
OnBlast:
misceffect 106;
end; }
alde_alche,92,184,3	script	#Masked Alarm3	1193,{
end;
OnBlast:
misceffect 106;
end; }
alde_alche,95,184,3	script	#Masked Alarm4	1193,{
end;
OnBlast:
misceffect 106;
end; }
//Morocc /= Drooping Kitty, Huge Leaf, Lazy Smokie and Blue Fish =/
morocc,273,79,4	script	Traveler	99,{
	function creation_lines {
	 	mes "[Human]";
		mes "Ah....So do you have all of it?";
		mes "Haha";
		mes "What an opportunity for me to show my skill.";
		mes "Please wait for a moment.";
		mes "....";
		next;
		next;
		mes "SiwuSiwu...";
		next;
		mes "SiwuSiwu...";
		mes "DudaTeda...";
		next;
		mes "SiwuSiwu...";
		mes "DudaTeda...";
		mes "ChepoChepo....";
		next;
		mes "SiwuSiwu...";
		mes "DudaTeda...";
		mes "ChepoChepo....";
		mes "HuizheHuizhe.....";
		mes "I think I heard some strange noises.";
		next;
		mes "[Human]";
		mes "Uhoh, can you wait for a while?";
		mes "It's almost done.";
		mes "............";
		next;
		mes "HeniHeniHeni...";
		mes "............";
		next;
		mes "HeniHeniHeni...";
		mes "KodeKode...";
		mes "............";
		next;
		mes "[Human]";
		mes "Ah, finally it is done.";
		mes "I have not done this too long.";
		mes "So it takes a little longer then I expect.";
		mes "Haha";
		next;
		mes "[Human]";
		mes "Now, here it is.";
		mes "I rarely feel this happy.";
		mes "Ah, I will take the claw too.";
		mes "Just think of it as ... some process fee.";
		mes "Haha....";
		return;
	}

	if(countitem(7030)) {
		mes "[Human]";
		mes "Ah....";
		mes "Claw of the Desert Wolf...";
		mes "You have this...";
		mes "This is the true symbol of Desert.";
		mes "Haha...";
		mes "It's been a while since I saw this last time.";
		mes "It really makes me feel reenergized!";
		next;
		mes "[Human]";
		mes "Haha... You have let me see a great thing.";
		mes "And I am going to pay you back!";
		mes "I have traveled to a lot of places,";
		mes "and learn to create a lot of things.";
		mes "May I know what do you want?";
		next;
		mes "[Human]";
		mes "Oh yes..."; //here we go again =3
		mes "If your equipment has been refined";
		mes "or slotted with cards,";
		mes "^FF0000the level of refines and cards will dissapear too.^000000";
		mes "So please confirm the item you require.";
		next;
		switch(select("Drooping Cat:Smokie Leaf:Lazy Smokie:Blue Fish:There's nothing that I like.")) {
		case 1:
			if (countitem(2233) && countitem(983) && countitem(7206) > 299 && countitem(7030)) {
				delitem 2233,1;
				delitem 983,1;
				delitem 7206,300;
				delitem 7030,1;
				creation_lines;
				getitem 5058,1;
				close;
			} else {
				mes "[Human]";
				mes "Ah, you want the Drooping Cat.";
				mes "Well,";
				mes "I can make that for you,";
				mes "but you will have to gather the required materials by yourself.";
				mes "I heard that it is not easy to find the materials.";
				next;
				mes "[Human]";
				mes "They are..";
				mes "^FF0000One slot circlet^000000 and";
				mes "^FF0000Black Dyestuff x1^000000";
				mes "plus ^FF0000Black Cat Doll x 300^000000.";
				mes "This is all you need.";
				mes "If you bring them to me, I will make the Cat for you.";
				close;
			}
		case 2: //Smokie Leaf [5064]
			if (countitem(945) > 599 && countitem(7030)) {
				delitem 945,600;
				delitem 7030,1;
				creation_lines;
				getitem 5064,1;
				close;
			} else {
				mes "[Human]";
				mes "Ah, so you want the Smokie Leaf.";
				mes "Well,";
				mes "I can make that for you,";
				mes "but you will have to";
				mes "gather the required materials by yourself.";
				mes "I heard that it is not easy to find the materials.";
				next;
				mes "[Human]";
				mes "This item ..";
				mes "requires ^FF0000Raccoon Leaf x600^000000 ";
				mes "It might be a lot, but I'm sure you can get it, can't you?";
				mes "If you bring it to me, I will make the headgear for you.";
				close;
			}
		case 3: //Lazy Smokie [5084]
			if (countitem(1026)>999 && countitem(7065)>99 && countitem(945)>9 && countitem(7030)) {
				delitem 1026,1000;
				delitem 7065,100;
				delitem 945,10;
				delitem 7030,1;
				creation_lines;
				getitem 5084,1;
				close;
			} else {
				mes "[Human]";
				mes "Ah, so you want the Lazy Smokie.";
				mes "Well,";
				mes "I can make that for you,";
				mes "but you will have to";
				mes "gather the required materials by yourself.";
				mes "I heard that it is not easy to find the materials.";
				next;
				mes "[Human]";
				mes "The materials are..";
				mes "^FF0000Acorn x1000^000000 and";
				mes "^FF0000Sea-Otter Fur x100^000000, as well as ^FF0000Raccoon Leaf x10^000000";
				mes "That's all you need.";
				mes "If you bring it to me, I will make the headgear for you.";
				close;
			}
		case 4: //Blue Fish [5065]
			if (countitem(624) && countitem(959)>299 && countitem(544)>49 && countitem(1023) && countitem(938)>99 && countitem(7030)) {
				delitem 624,1;
				delitem 959,300;
				delitem 544,50;
				delitem 1023,1;
				delitem 938,100;
				delitem 7030,1;
				creation_lines;
				getitem 5065,1;
			} else {
				mes "[Human]";
				mes "Ah, so you want the Fish.";
				mes "Well,";
				mes "I can make that for you,";
				mes "but you will have to gather the required materials by yourself.";
				mes "I heard that it is not easy to find the materials.";
				next;
				mes "[Human]";
				mes "The materials are..";
				mes "^FF0000Rotten Fish x1";
				mes "Stinky Scale x300, Raw Fish x50,";
				mes "Fish Tail x1^000000 and lastly, it requires at least ^FF0000Sticky Mucus x100^000000";
				mes "That's all you need.";
				mes "If you bring it to me, I will make the headgear for you.";
				close;
			}
		case 5: //cancel
			mes "[Human]";
			mes "Oh.. is that so?";
			mes "Haha...";
			mes "I thought I have the chance to do it again.";
			mes "Oh well,";
			mes "enjoy your journey then.";
			close;
		}
	} else {
		mes "[Human]";
		mes "Hello there.";
		mes "a good day isn't it?";
		mes "Hmm... If you don't mind,";
		mes "can I tell you a little about myself?";
		mes "I know you're kind of unwilling to do so,";
		mes "but please, do listen for a while, will you?";
		next;
		mes "[Human]";
		mes "Hmm...";
		mes "The city of desert, Morocc";
		mes "has this special attraction.";
		mes "The wind of flame blows during the heat of the day,";
		mes "but the sunsets dye the hills of sand into a violet screne.";
		mes "Besides that, the freezing chill of night never stops until morning.";
		next;
		mes "[Human]";
		mes "All these are the pride of Morocc.";
		mes "However,";
		mes "These are not enough to feed the greed of human.";
		mes "Thay want to take everything";
		mes "except the desert";
		mes "as their belongings.";
		next;
		mes "[Human]";
		mes "So, I started to travel,";
		mes "going around this world to experience the adventure.";
		mes "Some view that can only be found in certain places,";
		mes "at their origin habitat.";
		next;
		mes "[Human]";
		mes "Therefore,";
		mes "I have decided to create items,";
		mes "that possesses the special characteristecs of the places.";
		mes "I have gained a few successes,";
		mes "but the materials required are too hard to be found.";
		mes "Therefore, I can't produce too many items.";
		next;
		mes "[Human]";
		mes "Oh! Uh Oh...";
		mes "I have spoken too much.";
		mes "Sorry for taking your time.";
		mes "There's nothing to do recently...";
		mes "I just hope to see";
		mes "some item that is related to the desert....";
		next;
		mes "[Human]";
		mes "Hmmph...Anyway,";
		mes "thank you for listening to me.";
		mes "Enjoy your journey...";
		mes "Think of the desert, you think of wolves... hahaha.";
		close;
	}
}
//Payon /=Fox Mask=/ //==Lets hope this works as it's supposed==//
pay_dun03,48,84,4	script	Nine Tail#1	1180,1,1{
	mes "[Nine Tail]";
	mes "Kee! KeeKee!";
	mes "KeeKeeKee! KeeKee! KeeKee!";
	next;
	switch(select("Shaking your head:Nodding")) {
	case 1:
		mes "[Nine Tail]";
		mes "KeeKee! Ke! Kee!";
		close2;
		donpcevent "Nine Tail#1::OnReset";
		end;
	case 2:
		emotion e_hmm;
		close2;
		disablenpc "Nine Tail#1";
		enablenpc "Nine Tail#2";
		end;
	}

OnInit:
	disablenpc "Nine Tail#1";
	disablenpc "Nine Tail#2";
	monster "pay_dun03",48,84,"Nine Tail",1180,1,"NT::OnMobDead";
	end;

OnReset:
	killmonster "pay_dun03","NT::OnMobDead";
	disablenpc "Nine Tail#1";
	disablenpc "Nine Tail#2";
	initnpctimer;
	end;

OnTimer300000:
OnSpawn:
	stopnpctimer;
	killmonster "pay_dun03","Nine Tail#1::OnMobDead";
	monster "pay_dun03",48,84,"Nine Tail",1180,1,"NT::OnMobDead";
	end;
}
pay_dun03,48,84,1	script	NT	-1,{
OnMobDead:
	enablenpc "Nine Tail#1";
	end;
}
pay_dun03,48,84,4	script	Nine Tail#2	1180,{
	if(countitem(1022)>998) {
		mes "[Nine Tail]";
		mes "Uh Oh!! You've brought it, human.";
		mes "Good...I think you can save yourself with these.";
		next;
		switch(select("Give it to him:Do not give it to him")) {
		case 1:
			mes "[Nine Tail]";
			mes "Go now. You have got what you wanted, human. Now leave!";
			if(countitem(1022)>998) {
				delitem 1022,999;
				getitem 5069,1;
			}
			close2;
			disablenpc "Nine Tail#2";
			donpcevent "Nine Tail#1::OnReset";
			end;		
		case 2:
			close2;
			disablenpc "Nine Tail#2";
			donpcevent "Nine Tail#1::OnReset";
			end;
		}
	}
	else {
		mes "[Nine Tail]";
		mes "......Aiyo? Isn't this the appearance of a human boy?";
		mes "Has my transfiguration skill gone wrong again... oh... oh well.";
		next;
		mes "[Nine Tail]";
		mes "Do you know how it feels to be chased everyday? How tough that is? Huh?";
		mes "I just want to live a quiet life with my husband!";
		next;
		mes "[Nine Tail]";
		mes "But one day, someone intruded into our habitat and tried to catch us.";
		next;
		mes "[Nine Tail]";
		mes "Do you know how much that Sohee that lives besides me likes to complain to me everyday? Someone will pull a disgusting face and say 'Haha, Miss Sohee~' and they will chase to rip off her clothes. They are making her crazy!";
		next;
		mes "[Nine Tail]";
		mes "It is just a flawless body as fine as pine, and as beautiful as the flower. Why can't anyone understand that?";
		next;
		mes "[Nine Tail]";
		mes "Hmmm...let me calm down first.";
		mes "I just want to save my husband and bring him back.";
		mes "I hope you can help me.";
		next;
		mes "[Nine Tail]";
		mes "To save my husband,";
		mes "please bring along ^FF0000999 ^0000FFNine Tails^000000!";
		mes "What? You said that's too much?";
		next;
		mes "[Nine Tail]";
		mes "Hmmph, it really makes me angry to think of what you've done to us...";
		mes "I understand. You human won't do anything without a reward...";
		next;
		mes "[Nine Tail]";
		mes "Hmm, ok. What do you think of the mask I'm wearing? The ^0000FFKitsune Mask^000000. Gather the item I want, and I will give you this.";
		mes "You must gather ^FF0000999 ^0000FFNine Tails^000000!";
		close2;
		disablenpc "Nine Tail#2";
		donpcevent "Nine Tail#1::OnReset";
		end;
	}
}
//Orc Village /=Orc Hero Helm=/
in_orcs01,31,93,1	script	Orc Warrior#1	1023,2,2{
	if (orcs_hero_hat == 1) {
		if (countitem(909)>999) {
			delitem 909,1000;
			mes "[Orc Warrior]";
			mes "Good, you have collected it all, haven't you?";
			mes "So you really want to have a talk, hahahahaha!!";
			mes "Ok, I will talk to you then";
			next;
			mes "[Orc Warrior]";
			mes "I don't like humans.";
			mes "All of the Orcish Tribe dislike humans.";
			mes "Do you know that?";
			mes "I really hate it when you come to find us.";
			set orcs_hero_hat,2;
			next;
			mes "[Orc Warrior]";
			mes "So if you want to hear more. Prepare another ^FF0000Jellopy x1000^000000";
			mes "This means, get out of my sight...!";
			mes "Humans...";
			close;
		}
	} else if (orcs_hero_hat == 2) {
		if (countitem(909) > 999) {
			delitem 909,1000;
			mes "[Orc Warrior]";
			mes "Good, you have collected it all, haven't you?";
			mes "So you really want to have a talk, hahahahahaha!!";
			mes "Ok, I will talk to you then";
			next;
			mes "[Orc Warrior]";
			mes "Do you want to know why we hate humans?";
			mes "That's because,";
			mes "out village is living a quiet life,";
			mes "before the rude intrusion of you human.";
			next;
			mes "[Orc Warrior]";
			mes "Can you just build your city";
			mes "and live there quietly?";
			mes "Why do you create chaos everywhere...";
			mes "I can't understand";
			set orcs_hero_hat,3;
			next;
			mes "[Orc Warrior]";
			mes "Go, if you want another conversation, prepare ^FF0000Jellopy x1000^000000 again,";
			mes "If you're statisfied with such kind of converstaion.";
			mes "Hahahahaha";
			close;
		} else {
			mes "[Orc Warrior]";
			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000...";
			mes "If you want to talk to me,";
			mes "show your will, humans.";
			mes "I don't care, just brought 1000 Jellopy.";
			close;
		}
	} else if (orcs_hero_hat == 3) {
		if (countitem(909)>999) {
			delitem 909,1000;
			mes "[Orc Warrior]";
			mes "Good, you have collect it all, haven't you? ";
			mes "So you really want to have a talk, hahahahaha!!";
			mes "Ok, I will talk to you until you're fed up then.";
			next;
			mes "[Orc Warrior]";
			mes "If you compare the achievement, ";
			mes "we won't lose to you humans.";
			mes "The same goes to the Goblin in the jungle,";
			mes "and the Kobold, who are the master of the grassland...";
			next;
			mes "[Orc Warrior]";
			mes "Before you human build cities, ";
			mes "we orc warriors has developed sophisticated tunnel in caves,";
			mes "as well as water way.";
			mes "We use the things we found in the wild,";
			mes "to create the things we wanted.";
			next;
			mes "[Orc Warrior]";
			mes "Then we build high tower.";
			mes "However, the evil forces ";
			mes "have made the master of the tower betray our tribe...";
			mes " And those who fail to escape there,";
			mes "they're still suffering,";
			mes "at that place.";
			next;
			mes "[Orc Warrior]";
			mes "...Hmm, this,";
			mes "Why do I tell this to you humans?";
			mes "The conversation ends here today.";
			set orcs_hero_hat,4;
			next;
			mes "[Orc Warrior]";
			mes "So, if you want to hear more,";
			mes "prepare ^FF0000Jellopy x 1000 again^000000";
			close;
		} else {
			mes "[Orc Warrior]";
			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000...";
			mes "If you want to talk to me";
			mes "Show your will, human.";
			mes "I don't care, just brought 2000 Jellopy.";
			close;
		}
	} else if (orcs_hero_hat == 4) {
		if (countitem(909)>999) {
			delitem 909,1000;
			mes "[Orc Warrior]";
			mes "Good, you have collect it all, haven't you? ";
			mes "So you really want to have a talk, hahahahaha!!";
			mes "Ok, I will talk to you until you're fed up then.";
			next;
			mes "[Orc Warrior]";
			mes "Yes, until that time,";
			mes "human and the orc warriors";
			mes "do lead a peaceful life.";
			mes "But as time goes by, the misunderstanding,";
			mes "has accumulated and cannot be broken.";
			next;
			mes "[Orc Warrior]";
			mes "The powerless human only wants fame and wealth.";
			mes "A true warrior,";
			mes "will only emphasize on glory and honor...";
			mes "Those who do not care what method they use to achieve their goal,";
			mes "will be lead to the path of perdition easily.";
			next;
			mes "[Orc Warrior]";
			mes "They only care about their safety,";
			mes "and ignore about others.";
			mes "They will not let anthing that";
			mes "pose a threat to them to live... ";
			mes "No matter it's other tribe,";
			mes "or unknown creature, they will kill";
			mes "even their closest companion if they had to.";
			next;
			mes "[Orc Warrior]";
			mes "...I have talked too much, and there's nothing more to talk about.";
			mes "The conversation ends here.";
			set orcs_hero_hat,5;
			next;
			mes "[Orc Warrior]";
			mes "So, if you want to hear more,";
			mes "prepare ^FF0000Jellopy x 1000 again^000000";
			close;
		} else {
			mes "[Orc Warrior]";
			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";
			mes "If you want to talk to me,";
			mes "show you will, humans.";
			mes "I don't care, just brought 3000 Jellopy.";
			close;
		}
	} else if (orcs_hero_hat == 5) {
		if (countitem(909)>999) {
			delitem 909,1000;
			mes "[Orc Warrior]";
			mes "You reall have the patience to collect these things.";
			mes "You really want to talk to me, don't you?... ";
			mes "If that's so, I will talk about other things.";
			next;
			mes "[Orc Warrior]";
			mes "The Orc Warriors think that the best things are";
			mes "battle and victory.";
			mes "It is the greatest honor,";
			mes "to fight and beat the enemies face to face.";
			next;
			mes "[Orc Warrior]";
			mes "The spirit to win will not stop even for death.";
			mes "However, some tribesmate that die of trickery,";
			mes "will get up from the grave,";
			mes "wandering to look for a target to fight.";
			next;
			mes "[Orc Warrior]";
			mes "During the battle,";
			mes "we are different from you.";
			mes "We don't use tricks, and we don't run away!";
			mes "We will fight till then end, till we are out of energy.";
			mes "Even when we're lost in the end, we will still make our last attempt to counter.";
			next;
			mes "[Orc Warrior]";
			mes "Besides that, we don't rely of potions.";
			mes "You human are too weak.";
			mes "That's why you use potions and herbs.";
			mes "Without potion, you will quit immediately, don't you?";
			mes "Hmm, I'm not sure whether you are like that too.";
			set orcs_hero_hat,6;
			next;
			mes "[Orc Warrior]";
			mes "So, if you want to hear more,";
			mes "prepare ^FF0000Jellopy x 1000 again^000000";
			close;
		} else {
			mes "[Orc Warrior]";
			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";
			mes "If you want to talk to me,";
			mes "show you will, humans.";
			mes "I don't care, just brought 4000 Jellopy.";
			close;
		}
	} else if (orcs_hero_hat == 6) {
		if (countitem(909)>999) {
			delitem 909,1000;
			mes "[Orc Warrior]";
			mes "You reall have the patience to collect these things.";
			mes "You really want to talk to me, don't you?... ";
			mes "If that's so, I will talk about other things.";
			next;
			mes "[Orc Warrior]";
			mes "The warriors of the tribe,";
			mes "are selected among the strongest.";
			mes "When they grow up, we'll send them into the jungle,";
			mes "to test their qualification to be a real warrior.";
			next;
			mes "[Orc Warrior]";
			mes "We will recognize";
			mes "the tribesman who come back alive as a warrior.";
			mes "These strong warriors are known as Orc Warriors.";
			mes "For the females that has fighting ability,";
			mes "they are known as Orc Lady.";
			next;
			mes "[Orc Warrior]";
			mes "And for those with a dexterous hand and";
			mes "possess good eyesight,";
			mes "we'll give them bow and arrow,";
			mes "and called them Orc Archer.";
			mes "They will learn and grow in the countless battles.";
			next;
			mes "[Orc Warrior]";
			mes "And there is another trial of fire.";
			mes "Those who pass the trial,";
			mes "will be protected by fire";
			mes "and gain greater ability and endurance.";
			mes "We called this warriors as High Orc.";
			next;
			mes "[Orc Warrior]";
			mes "Hmm, when human looks at us,";
			mes "you'll think that we look alike... ";
			mes "But for use Orc, we can distinguish it easily.";
			mes "So, when you look at me, ";
			mes "you will feel that I look like";
			mes "no different that the orc warrior outside, isn't it?";
			set orcs_hero_hat,7;
			next;
			mes "[Orc Warrior]";
			mes "So, if you want to hear more,";
			mes "prepare ^FF0000Jellopy x 1000 again^000000";
			close;
		} else {
			mes "[Orc Warrior]";
			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";
			mes "If you want to talk to me,";
			mes "show you will, humans.";
			mes "I don't care, just brought 5000 Jellopy.";
			close;
		}
	} else if (orcs_hero_hat == 7) {
		if (countitem(909)>999) {
			delitem 909,1000;
			mes "[Orc Warrior]";
			mes "I can feel you are getting tired and want to quit now.";
			mes "But you have keep the promise this time.";
			mes "So a promise is a promise, I shall continue to talk to you.";
			next;
			mes "[Orc Warrior]";
			mes "We are talking about the Orc Warrior last time...";
			mes "Yes, in the orcish fighters,";
			mes "there are dexterous one with abilities,";
			mes "that has not pass the trial of fire.";
			mes "They are the warriors that can take care of";
			mes "other orc warriors....";
			next;
			mes "[Orc Warrior]";
			mes "Such kind of warriors are the true hero.";
			mes "We call them Orc Heroes.";
			mes "They had strength and stamin greater than other orcs.";
			mes "They possess ability to lead too.";
			mes "This is the true hero of Orc Warriors.";
			next;
			mes "[Orc Warrior]";
			mes "They get the Voucher of Orcish Hero,";
			mes "and is able to wield the sword only a hero can use.";
			mes "When the Orc Hero wields the sword,";
			mes "the earth shakes...";
			next;
			mes "[Orc Warrior]";
			mes "Orc Hero has his own special headgear too.";
			mes "It is a symbol of";
			mes "the fame and strength of an Orc Hero... Just like you humans.";
			mes "If you want to see it,  you can only feel its power in the battle.";
			set orcs_hero_hat,8;
			next;
			mes "[Orc Warrior]";
			mes "So, if you want to hear more,";
			mes "prepare ^FF0000Jellopy x 1000 again^000000";
			close;
		} else {
			mes "[Orc Warrior]";
			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";
			mes "If you want to talk to me,";
			mes "show you will, humans.";
			mes "I don't care, just brought 6000 Jellopy.";
			close;
		}
	} else if (orcs_hero_hat == 8) {
		if (countitem(909)>999) {
			delitem 909,1000;
			mes "[Orc Warrior]";
			mes "I can feel you are getting tired and want to quit now.";
			mes "But you have keep the promise this time.";
			mes "So a promise is a promise, I shall continue to talk to you.";
			next;
			mes "[Orc Warrior]";
			mes "We talk about the Orc Hero just now.";
			mes "Some orc does not born with an ability,";
			mes "like the Orc Heroes do.";
			mes "It took them a long time to go through numerous battle to be a warrior.";
			next;
			mes "[Orc Warrior]";
			mes "To a Orc Warrior,";
			mes "age does not means coward.";
			mes "In fact is represents experience and skills,";
			mes "that makes him more valiant.";
			next;
			mes "[Orc Warrior]";
			mes "They can perform great battle skill,";
			mes "even without weapons.";
			mes "They can fight for days even without their axe.";
			mes "If they reach that state,";
			mes "weapon are just useless burdens...";
			next;
			mes "[Orc Warrior]";
			mes "Among such experience elders,";
			mes "we called the most experienced one as ";
			mes "Orc Lord. And we honor them,";
			mes "They wear a 3 horn iron helm";
			mes "that represents the leadership of Orcish tribe.";
			set orcs_hero_hat,9;
			next;
			mes "[Orc Warrior]";
			mes "So, if you want to hear more,";
			mes "prepare ^FF0000Jellopy x 1000 again^000000";
			close;
		} else {
			mes "[Orc Warrior]";
			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";
			mes "If you want to talk to me,";
			mes "show you will, humans.";
			mes "I don't care, just brought 7000 Jellopy.";
			close;
	  }
	} else if (orcs_hero_hat == 9) {
		if (countitem(909)>999) {
			delitem 909,1000;
			mes "[Orc Warrior]";
			mes "I've never seen,";
			mes "a human that won't quit like you... So I'll keep my promise";
			mes "to tell you about our tribe today.";
			next;
			mes "[Orc Warrior]";
			mes "Sometimes, there will be those treacherous ones";
			mes "who run away from the battle.";
			mes "We have such kind in out tribe too.";
			mes "Although it is a disgrace, they are Orcs too.";
			mes "They only differ in their level of existance.";
			next;
			mes "[Orc Warrior]";
			mes "Such kind will be cursed.";
			mes "Their body shrinks and the teeth grows.";
			mes "And finally, they lose the heart to fight.";
			mes "Since they don't want to be found by others, ";
			mes "they hide themselves.";
			next;
			mes "[Orc Warrior]";
			mes "They are originally us.";
			mes "But their alteration rise suspicions.";
			mes "Such kind with greed,";
			mes "and hatred to us are called...";
			mes "Zenorc.";
			next;
			mes "[Orc Warrior]";
			mes "Unlike us,";
			mes "human do not change even their hearts have changed.";
			mes "Therefore, we need to be more careful.";
			mes "Because we can tell from the appearances,";
			mes "how treacherous humans are....";
			set orcs_hero_hat,10;
			next;
			mes "[Orc Warrior]";
			mes "So, if you want to hear more,";
			mes "prepare ^FF0000Jellopy x 1000 again^000000";
			close;
		} else {
			mes "[Orc Warrior]";
			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";
			mes "If you want to talk to me,";
			mes "show you will, humans.";
			mes "I don't care, just brought 8000 Jellopy.";
			close;
	  }
	} else if (orcs_hero_hat == 10) {
		if (countitem(909)>999) {
			delitem 909,1000;
			mes "[Orc Warrior]";
			mes "Really? Have you really gathered 10,000 Jellopy?";
			mes "Good, that's enough now.";
			mes "You've shown your sincerity.";
			mes "I will treat you honestly.";
			next;
			mes "[Orc Warrior]";
			mes "It is enough for";
			mes "the stories about our tribe.";
			mes "However, there are difference,";
			mes "from what you've heard and what you'll experience.";
			next;
			mes "[Orc Warrior]";
			mes "I advise that you gather more experience";
			mes "through the battle with us to understand our tribe.";
			mes "The most direct way,";
			mes "is through combat.";
			set orcs_hero_hat,11;
			next;
			mes "[Orc Warrior]";
			mes "I shall stop here.";
			mes "As the token of appreciation to your sincerity,";
			mes "this is the axe that has accompanied me in my pass battles.";
			mes "Take good care of it, thank you.";
			getitem 1304,1;
			next;
			mes "[Orc Warrior]";
			mes "It must be hard for you after all these time.";
			mes "If you want to understand more about Orcs,";
			mes "come and find me again.";
			close;
		} else {
			mes "[Orc Warrior]";
			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";
			mes "If you want to talk to me,";
			mes "show you will, humans.";
			mes "I don't care, just brought 9000 Jellopy.";
			close;
	  }
	} else if (orcs_hero_hat == 11 || orcs_hero_hat == 12) {
		if (countitem(1304)) {
			mes "[Orc Warrior]";
			mes "If must be hard for you after all these time.";
			mes "If you want to understand more about Orcs,";
			mes "come and find me again.";
			close;
		} else {
			set orc_hero_quest,rand(1,10);
			if (orc_hero_quest > 9) {
				if (orcs_hero_hat == 12 && countitem(931)>99) {
					mes "[Orc Warrior]";
					mes "Uhoh, that is really great.";
					mes "After all these battles, I am not sure how much you understand.";
					mes "However, the voucher of Orc warrior";
					mes "is given to a true Orc Warrior.";
					next;
					mes "[Orc Warrior]";
					mes "We use 1000 thousand victories";
					mes "as a qualification to recognize one asa true Orc Warrior.";
					mes "However, you are a human...";
					mes "It is hard to cross the line between two different kinds.";
					next;
					mes "[Orc Warrior]";
					mes "Ok, come again after you've won 10 thousand victories.";
					mes "By that time, we will recognized you as the true warrior.";
					mes "However,";
					mes "you will have to walk a lonely path for such fame.";
					mes "The choise is up to you...";
					next;
					mes "[Orc Warrior]";
					mes "All you get is just fame...";
					mes "But for a human,";
					mes "you get a chance to proof and test your capability...";
					mes "So what do you want to choose?";
					next;
					switch(select("I think I don't need it.:I want to take the 10,000 challenge.")) {
					case 1:
						mes "[Orc Warrior]";
						mes "Alright, I won't force you to choose.";
						mes "Now, please return";
						mes "to your human city slowly.";
						mes "Your friends are waiting for you.";
						close;
					case 2:
						mes "[Orc Warrior]";
						mes "You have chosen a hard path";
						mes "A path of eternal battles is waiting ahead of you.";
						mes "You will have to face";
						mes "thousands,if not ten thousands of warriors.";
						next;
						mes "[Orc Warrior]";
						mes "Then, before you reach your 10,000th victories,";
						mes "Bring me the voucher of orc warrior.";
						mes "Once, ten times, or even hundreds";
						mes "please leave your record of victories.";
						if (countitem(931)>99) {
							delitem 931,100;
							set orcs_hero_hat,13;
							set orcs_hero_hat2,100;
						}
						next;
						mes "[Orc Warrior]";
						mes "If I take the voucher of Orc Warrior,";
						mes "I will record it a 100 victories.";
						mes "Please make sure you defeat 10,000 orc warrior...";
						mes "Please continue your battle, don't stop.";
						close;
					}
				}
				mes "[Orc Warrior]";
				mes "The best way to understand Orcs,";
				mes "is through battle.";
				mes "Thrugh collisions of strength and skills,";
				mes "improve your understanding between each other.";
				next;
				mes "[Orc Warrior]";
				mes "So, go out there and fight.";
				mes "conversation with my is just an acceptance of concepts.";
				mes "One day,";
				mes "You shall be recognized as a true warrior.";
				set orcs_hero_hat,12;
				close;
			} else {
				mes "[Orc Warrior]";
				mes "I feel that you are not statisfied?";
				mes "Do you have any doubts about us?";
				mes "You are a human.";
				mes "Your concern to other tribers,";
				mes "will not benefit you.";
				close;
			}
		}
	} else if (orcs_hero_hat == 13) {
		if (countitem(931)) {
			mes "[Orc Warrior]";
			mes "Stay alive before you grab the victory...";
			mes "Rest here for a while before you leave.";
			mes "Until now, you have achieved "+orcs_hero_hat2+" times of victories.";
			next;
			mes "[Orc Warrior]";
			mes "Do you want to add the record of your current victory";
			mes "into this record? You have won "+countitem(931)+" times this time.";
			next;
			switch(select("Add the record:Add it later")) {
			case 1:
				set orcs_hero_hat2,orcs_hero_hat2+countitem(931);
				delitem 931,countitem(931);
				if (orcs_hero_hat2>9999) {
					mes "[Orc Warrior]";
					mes "And this, achieving more than 10,000 victories";
					mes "is an extraordinary achievement to human...";
					mes "You have completed an unusual task.";
					mes "Through the current battle,";
					mes "You must have learned a lot about the Orcish Tribe.";
					next;
					mes "[Orc Warrior]";
					mes "Although you're a human, you have walked the path of a true warrior....";
					mes "We have recognized you.";
					mes "You are a true warrior!!";
					mes "You are... Orc Lady!!";
					getitem 2299,1;
					set orcs_hero_hat,14;
					next;
					mes "[Orc Warrior]";
					mes "This is your present.";
					mes "I wonder if it fits your head.";
					mes "Wear it well.";
					mes "If you do not want to wear it, take it along with you.";
					getitem 931,1;
					next;
					mes "[Orc Warrior]";
					mes "And, you have been recognized as a warrior...";
					mes "This voucher is for you.";
					mes "Although it has no difference compared to others,";
					mes "keep it well.";
					mes "You will only be recognized as a Orc Warrior,";
					mes "with this voucher.";
					next;
					mes "[Orc Warrior]";
					mes "So, you may go back now...";
					mes "If you ever think of us,";
					mes "come and look for us.";
					mes "A true self of a person can only be shown through endless battles.";
					mes "Return to the land now.";
					close;
				}
				mes "[Orc Warrior]";
				mes "You have worked hard.";
				mes "I hope your futue better will shine with the light of victories.";
				mes "If you ever lost,";
				mes "I hope to see you stand up again.";
				next;
				mes "[Orc Warrior]";
				mes "There are "+(10000-orcs_hero_hat2)+" of battles left.";
				mes "Although it is a though road ahead,";
				mes "I hope that you will pull yourself together and achieve the final victory.";
				close;
			case 2:
				mes "[Orc Warrior]";
				mes "Hmm, as you like it.";
				mes "I will be dissapointed again,";
				mes "If you give up in the middle.";
				close;
			}
		} else {
			mes "[Orc Warrior]";
			mes "Rest here for a while before you leave.";
			mes "Until now, you have achieved "+orcs_hero_hat2+" times of victories.";
			close;
		}
	} else if(orcs_hero_hat == 14) {
		if (countitem(1304)) {
			mes "[Orc Warrior]";
			mes "Hmm? Don't tell me that you assume that";
			mes "you won't be able to get back to the human villages";
			mes "if you are recognized as a Orc Warrior. Hahahaha!";
			mes "You better leave then.";
			close;
		} else {
			set @orc_hero_quest,rand(1,10);
			if (@orc_hero_quest > 9) {
				mes "[Orc Warrior]";
				mes "That? Is that thirst...?";
				mes "Although you're recognized as a warrior,";
				mes "that eyes of yours show you seek more powerful enemies...";
				mes "Maybe you are not statisfied with the current situation.";
				next;
				mes "[Orc Warrior]";
				mes "Alright, do you want to take another trial?";
				mes "Maybe all you accumulated belongings";
				mes "shall become but a dream...";
				mes "This path,";
				mes "is a process feared,";
				mes "by even the most skullful warrior.";
				next;
				mes "[Orc Warrior]";
				mes "a recognized Orc Warrior, maybe you can defeat them...";
				mes "What is your choise?";
				next;
				switch(select("I am statisfied with the current condition:...I will challenge the trial")){
				case 1:
					mes "[Orc Warrior]";
					mes "Yes, it is useful";
					mes "if you are statisfied with yourself sometimes.";
					mes "It takes greater courage,";
					mes "to admit that you can't overcome a greater obstacle.";
					close;
				case 2:
					mes "[Orc Warrior]";
					mes "Good, I praise your honorable spirit.";
					mes "This is an opportunity";
					mes "for a warrior who've won 10,000 victories.";
					mes "You will face";
					mes "the greatest warrior of the Orcish tribe...!";
					next;
					mes "[Orc Warrior]";
					mes "Fight the best warrior of the Orc Warrior.";
					mes "Obtain 100 victories from the Orc Heroes,";
					mes "and bring me the voucher.";
					mes "Although you're a great warrior, this is a ardous task";
					mes "espectially when you have to face it alone....!";
					next;
					mes "[Orc Warrior]";
					mes "Come, go now! Since you can beat 10,000 Orc warrior,";
					mes "there's some possibilities that";
					mes "you can take down 100 Orc Heroes!";
					mes "If that's so, we will recognize you as";
					mes "the Orc Hero...!";
					set orcs_hero_hat,15;
					close;
				}
			} else {
				mes "[Orc Warrior]";
				mes "Oh warrior, continue to shine in the victories of your battles.";
				mes "Stand up again even if you've lost.";
				mes "Show your unshaken spirit.";
				mes "You are the human that is reconized as an Orc Warrior!";
				close;
			}
		}
	} else if(orcs_hero_hat == 15) {
		if (countitem(968)>99) {
			mes "[Orc Warrior]";
			mes "Finally... You have achive the goal.";
			mes "Those who've lost to you have admitted that";
			mes "you have shown yourself as a Hero";
			mes "by crossing the barrier of kinds as a human...";
			mes "I, on behalf of our tribe,";
			mes "pay our greatest respect to you.";
			next;
			mes "[Orc Warrior]";
			mes "Now I ask you to make you final selection,";
			mes "what will you do with the vouchers you've taken?";
			mes "It means nothing to humands,";
			mes "but to the orcs,";
			mes "Heroic Emblem is a belonging";
			mes "of a true hero.";
			next;
			mes "[Orc Warrior]";
			mes "You've obtained this through you hardship.";
			mes "You can take it with you,";
			mes "or give them back to the Orc Heroes.";
			mes "The meaning of giving them back the voucher,";
			mes "is to battle them again...";
			next;
			mes "[Orc Warrion]";
			mes "So, heroic emblem,";
			mes "what will you do with it?";
			next;
			switch(select("I will take it back as token of victories:I'll give them back to Orc Heroes")) {
			case 1:
				mes "[Ork Warrior]";
				mes "Well, that is a good choise.";
				mes "Nobody can change your right to make that decision.";
				mes "Please take good care of";
				mes "these tokens of victory.";
				close;
			case 2:
				mes "[Orc Warrior]";
				mes "This is the true spirit of a warrior...!";
				mes "Respecting your oppenent even after you've won,";
				mes "such deeds";
				mes "should be learned by we Orcs...!";
				if (countitem(968)<100) close;
				delitem 968,100;
				set orcs_hero_hat,16;
				next;
				mes "[Orc Warrior]";
				mes "The one who have defeated 100 Orc Hero...";
				mes "Altough you're a human";
				mes "we know you as the best warrior of the Orcs.";
				mes "You are now... Orc hero!";
				getitem 1124,1;
				next;
				mes "[Orc Warrior]";
				mes "This is the sword given only to the Heroes.";
				mes "Iam not sure wether you can use it.";
				mes "But as a Orc Hero,";
				mes "you should have it.";
				getitem 968,1;
				next;
				mes "[Orc Warrior]";
				mes "And since you're a Orc Hero now...";
				mes "This is the Heroic Emblem for you.";
				mes "Although it has no difference compared to others,";
				mes "keep it well.";
				mes "You will only be recognized as a Orc Hero,";
				mes "with this voucher.";
				next;
				mes "[Orc Warrior]";
				mes "So, you can leave now...";
				mes "A person from human tribe that can understand us,";
				mes "is the one who crosses the boundaries of tribe.";
				mes "Show the tough spirit of you,";
				mes "and set for you new destiny....";
				close;
			}
		} else {
			mes "[Orc Warrior]";
			mes "Tired...? Orc Hero is";
			mes "the best warrior among our warriors.";
			mes "They are known for their capability.";
			mes "It might be to hard for";
			mes "a human to pick on them.";
			next;
			mes "[Orc Warrior]";
			mes "However, this trial is the patch you've chosen.";
			mes "Maybe you want to know you true limit,";
			mes "so you keep your promise to walk this path...!";
			mes "Don't rush for the answer,";
			mes "it might lies beneath the records of your countless battles.";
			close;
		}
	} else if (orcs_hero_hat > 15) {
		if (countitem(968)) {
			mes "[Orc Warrior]";
			mes "Warrior of the Orc Warrior, the greatest Hero";
			mes "You are... Orc Hero!!";
			mes "May the valiant warrior be blessed with light!!";
			close;
		} else {
			mes "[Orc Warrior]";
			mes "Oh Hero, where have you put your voucher...?";
			mes "Without the Heroic Emblem,";
			mes "you shall not be knows as a Orc Hero.";
			mes "Please retrieve it and keep it with you.";
			close;
		}
	} else if (orcs_hero_hat == 0 || orcs_hero_hat ==1) {
		mes "[Orc Warrior]";
		if (sex == 1) {
			mes "What does the son of a human have to do here?";
		} else {
			mes "What does the daughter of a human have to do here?";
		}
		mes "Shouldn't you have nothing to do with us, the Orc Warriors?";
		mes "Or are you tired of the endless war";
		mes "and hope for a truce? That should be good!";
		next;
		mes "[Orc Warrior]";
		mes "We, the Orc Warriors don't simple speak to men.";
		mes "I praise your courage";
		mes "to dare to come and try to talk to me.";
		mes "But we have no intention of hearing what you want to say.";
		next;
		mes "[Orc Warrior]";
		mes "Sit there quietly and leave without making any noises.";
		mes "If you want to rest before you depart,";
		mes "watch your manners, at least to the host, me.";
		if (rand(1,10)>9) {
			next;
			switch(select(".....","I want a conversation with you.")) {
			case 1:
				close;
			case 2:
				mes "[Orc Warrior]";
				mes "Converstation...? Conversation you say?Hahahaha!! ";
				mes "You are really an interesting human.";
				mes "Talk to a Orc Warrior? ";
				mes "This is the first time I see human talk without sword and shield...!";
				next;
				mes "[Orc Warrior]";
				mes "However, I won't be kind to anyone.";
				mes "If you want to talk to me,";
				mes "you'll need to show some respect! Do you understand that?";
				mes "Ok... this is my little suggestion.";
				next;
				mes "[Orc Warrior]";
				mes "Show me the will of a human,";
				mes "who wants to talk to me.";
				mes "To talk to me, gather^FF0000Jellopy x 1000 ^000000 ";
				mes "Bring it to me when you come to talk next time";
				next;
				mes "[Orc Warrior]";
				mes "And, don't question me.";
				mes "I won't give you the rights to question my opinion.";
				mes "And don't you dream that,";
				mes "I will give you anything.";
				mes "Do you still want to talk under these circumstances?";
				mes "Decendent of human?";
				next;
				switch(select("Let's battle, Orc Warrior!!:I will show you my faith")) {
				case 1:
					mes "[Orc Warrior]";
					mes "Yeahyeahyee, what a noisy fella!!";
					mes "If you like to fight, go outside!";
					mes "I really hate to see humans!!";
					close;
				case 2:
					mes "[Orc Warrior]";
					mes "Ok, keep your promise!";
					mes "I want to see how you keep that.";
					mes "You will quit eventually.";
					mes "Hahahahaha!!";
					set orcs_hero_hat,1;
					close;
				}
			}
		} else {
			close;
		}
	}
}
in_orcs01,162,33,1	script	Hero of Orc#1	1087,2,2{
	if (orcs_hero_hat < 16) {
		mes "[Orc Hero]";
		mes ".....Go away, don't interrupt me!";
		mes "If you want to fight me,";
		mes "wait for me at the west forest.";
		mes "I am not in the mood to fight human now.";
		close;
	} else if (orcs_hero_hat == 17) {
		mes "[Orc Hero]";
		mes "Hahaha, interesting, really interesting.";
		mes "You are the most interesting human";
		mes "that I have seen...";
		mes "I like it, interesting...";
		close;
	} else if (orcs_hero_hat == 16) {
		if (countitem(968) && countitem(2299) && countitem(1124) && countitem(931)) {
			if(rand(1,20)>19) {
				mes "[Orc Hero]";
				mes "Hmm, a human that is knows as Hero?";
				mes "DO you know the meaning of returning a Heroic Emblem?...";
				mes "When I am free later,";
				mes "I'll fight with you.";
				next;
				mes "[Orc Hero]";
				mes ".....HmmHmmm...? This iron helm...?";
				mes "It belongs to Orc Warrior...?";
				next;
				mes "[Orc Hero]";
				mes "Wait... You're still using this?";
				mes "Uhoh....";
				mes "Such an interesting human! Hahaha";
				mes "Good, really good...";
				next;
				mes "[Orc Hero]";
				mes "You seem not to be aware of the story behind this viking helm.";
				mes "In the battle between Orc Lord and the humands,";
				mes "he lost it in his defeat...";
				mes "The horn in the center was broken";
				mes "and this helm is created...!";
				next;
				mes "[Orc Hero]";
				mes "Rumors said that if it is given to a human,";
				mes "the human will be recognized as a Hero...";
				mes "Hahaha, interesting.";
				mes "And there're still people who";
				mes "continue to use it...!!";
				next;
				mes "[Orc Hero]";
				mes "So that's the belonging of the Orc Lord!";
				mes "And you are not qualified to have it.";
				mes "So if you don't mind,";
				mes "can you return it to its origional owner?";
				mes "Oh 'Human' Orc Warrior?";
				next;
				switch(select("I refuse to do so:I agree")) {
				case 1:
					mes "[Orc Hero]";
					mes "Hmm, how stubborn.";
					mes "If you think it's important, wear it well.";
					mes "The history of the battle is still kept";
					mes "on this headgear of a warrior.";
					close;
				case 2:
					mes "[Orc Hero]";
					mes "Good, that's more like it.";
					mes "This Viking Helm,";
					mes "I'll give it to him, hahahaha...";
					mes "I never imagined to see this thing here.";
					next;
					mes "[Orc Hero]";
					mes "I'll give you a useful item though!";
					mes "Although you're human,";
					mes "you're recognizedas a Orc Hero before.";
					mes "You should at least have a suitable headgear...";
					next;
					mes "[Orc Hero]";
					mes "Here you can have this.";
					mes "I have nade a special sign on it...";
					mes "So continue to use this in the future,";
					mes "understand? 'Human' Orc Warrior?";
					if (countitem(2299)) {
						delitem 2299,1;
						getitem 5094,1;
						set orcs_hero_hat,17;
					}
					close;
				}
			} else {
				mes "[Orc Hero]";
				mes "Hmm, a human that is recognized a warrior?";
				mes "Do you know the meaning of returning a Heroic Emblem?...";
				mes "When I am free later,";
				mes "I'll fight with you.";
				close;
			}
		} else {
			mes "[Orc Hero]";
			mes "Hmm, a human that is recognized a warrior?";
			mes "You don't look like one though.";
			mes "Is he really going to return the Heroic Emblem?";
			mes "I can't believe it.";
			next;
			mes "[Orc Hero]";
			mes "I won't recognize you as a Hero.";
			mes "He forgets even the most basic things.";
			mes "How can he be called warrior... Humans!!";
			mes "Go to the west forest now.";
			mes "I want you to pass the trial again...!";
			close;
		}
	}
}