summaryrefslogtreecommitdiff
path: root/doc/sample/npc_test_checkweight.txt
diff options
context:
space:
mode:
Diffstat (limited to 'doc/sample/npc_test_checkweight.txt')
-rw-r--r--doc/sample/npc_test_checkweight.txt158
1 files changed, 0 insertions, 158 deletions
diff --git a/doc/sample/npc_test_checkweight.txt b/doc/sample/npc_test_checkweight.txt
deleted file mode 100644
index 0f383ffe4..000000000
--- a/doc/sample/npc_test_checkweight.txt
+++ /dev/null
@@ -1,158 +0,0 @@
-//===== Hercules Script =======================================
-//= Sample: CheckWeight
-//===== By: ==================================================
-//= Hercules Dev Team
-//===== Current Version: =====================================
-//= 20131225
-//===== Description: =========================================
-//= Demonstrates 'checkweight' command.
-//============================================================
-
-prontera,161,181,6 script ChkSpace 4_M_JPN,{
- function ChkResult;
- function FinalReport;
-
- // Reset
- resetlvl(1);
- getinventorylist;
- for (.@i = 0; .@i < @inventorylist_count; ++.@i) {
- delitem(@inventorylist_id[.@i], @inventorylist_amount[.@i]); //clear inventory
- }
-
- //basic backward chk
- .@testid = 0;
- .@succes = 0;
- .@ret = checkweight(Apple, 10);
- .@succes += ChkResult(.@testid++, 1, .@ret); //should be success
- .@ret = checkweight("Apple", 10);
- .@succes += ChkResult(.@testid++, 1, .@ret); //should be success
- .@ret = checkweight(Premium_Reset_Stone, 33000);
- .@succes += ChkResult(.@testid++, 0, .@ret); //should be failure too many item amount item weight=0
- .@ret = checkweight("Premium_Reset_Stone", 33000);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure too many item amount
- .@ret = checkweight(Blue_Gemstone, 500);
- .@success += ChkResult(.@testid++, 1, .@ret); //should be success weight based on max weight=2030
- .@ret = checkweight(Blue_Gemstone, 1000);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure weight based on max weight=2030
- .@ret = checkweight(Magic_Stone_Ring, 100);
- .@success += ChkResult(.@testid++, 1, .@ret); //should be success
- .@ret = checkweight(Magic_Stone_Ring, 101);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure (with MAX_INVENTORY = 100)
- .@ret = checkweight(-1, 1);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure invalid item id
- .@ret = checkweight(Apple, 0);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure invalid amount
-
- debugmes "End backward test";
- FinalReport(.@testid, .@succes);
-
- //update using list test
- .@testid = 0;
- .@succes = 0;
-
- .@ret = checkweight(Apple, 10, Banana, 10);
- .@success += ChkResult(.@testid++, 1, .@ret); //should be success
- .@ret = checkweight("Apple", 10, "Banana", 10);
- .@success += ChkResult(.@testid++, 1, .@ret); //should be success
- .@ret = checkweight(Apple, 80, Banana, 33000);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure
- .@ret = checkweight("Apple", 80, "Banana", 33000);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure too many item amount
- .@ret = checkweight("Apple", 10, "Banana", 21, Apple);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure invalid nb of args
- .@ret = checkweight(Blue_Gemstone, 500, Red_Gemstone, 100);
- .@success += ChkResult(.@testid++, 1, .@ret); //should be succes weight 1800/2030
- .@ret = checkweight(Blue_Gemstone, 500, Red_Gemstone, 500);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure weight 3000/2030
- .@ret = checkweight(Magic_Stone_Ring, 95, Green_Apple_Ring, 5);
- .@success += ChkResult(.@testid++, 1, .@ret); //should be success
- .@ret = checkweight(Magic_Stone_Ring, 95, Green_Apple_Ring, 10);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure (with MAX_INVENTORY = 100)
- .@ret = checkweight(Apple, 1, -1, 1);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure invalid item id
- .@ret = checkweight(Apple, 1, Banana, 0);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure invalid amount
- .@ret = checkweight(Premium_Reset_Stone, 31000, Premium_Reset_Stone, 2000);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure overamount inventory
- .@ret = checkweight(Apple, 1, Banana, 1, Grape, 1, Carrot, 1);
- .@success += ChkResult(.@testid++, 1, .@ret); //should be sucess
-
- debugmes "End update by list tests";
- FinalReport(.@testid, .@succes);
-
- //update using array tests
- .@testid = 0;
- .@succes = 0;
-
- setarray .@item[0], Apple, Banana, Grape, Carrot;
- setarray .@count[0], 1, 5, 9, 12;
- .@ret = checkweight2(.@item, .@count);
- .@success += ChkResult(.@testid++, 1, .@ret); //should be sucess
- cleararray .@item[0], 0, 4;
- cleararray .@count[0], 0, 4;
- setarray .@item[0], Apple, Banana, Grape, Carrot;
- setarray .@count[0], 1, 5, -1, 12;
- .@ret = checkweight2(.@item, .@count);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure, invalid amout
- cleararray .@item[0], 0, 4;
- cleararray .@count[0], 0, 4;
- setarray .@item[0], Apple, Banana, Grape, -1;
- setarray .@count[0], 1, 5, 15, 12;
- .@ret = checkweight2(.@item, .@count);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure, invalid id
- cleararray .@item[0], 0, 4;
- cleararray .@count[0], 0, 4;
- setarray .@item[0], Blue_Gemstone, Yellow_Gemstone, Red_Gemstone, Emperium;
- setarray .@count[0], 300, 300, 300, 300;
- .@ret = checkweight2(.@item, .@count);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure, total by weight
- cleararray .@item[0], 0, 4;
- cleararray .@count[0], 0, 4;
- setarray .@item[0], Premium_Reset_Stone, Premium_Reset_Stone;
- setarray .@count[0], 31000, 2000;
- .@ret = checkweight2(.@item, .@count);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure, total by weight
- cleararray .@item[0], 0, 2;
- cleararray .@count[0], 0, 2;
- setarray .@item[0], Magic_Stone_Ring, Green_Apple_Ring;
- setarray .@count[0], 95, 5;
- .@ret = checkweight2(.@item, .@count);
- .@success += ChkResult(.@testid++, 1, .@ret); //should be success
- setarray .@count[0], 95, 10;
- .@ret = checkweight2(.@item, .@count);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure overamount item
- cleararray .@item[0], 0, 2;
- cleararray .@count[0], 0, 2;
- setarray .@item[0], Premium_Reset_Stone, Premium_Reset_Stone, Apple;
- setarray .@count[0], 1, 3;
- .@ret = checkweight2(.@item, .@count);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure, size mistmatch
- cleararray .@item[0], 0, 3;
- cleararray .@count[0], 0, 2;
- setarray .@item[0], Premium_Reset_Stone, Premium_Reset_Stone;
- setarray .@count[0], 1, 3, 5;
- .@ret = checkweight2(.@item, .@count);
- .@success += ChkResult(.@testid++, 0, .@ret); //should be failure, size mistmatch
-
- debugmes "End update by array tests";
- FinalReport(.@testid, .@succes);
-
- end;
-
- function ChkResult {
- .@tid = getarg(0);
- .@expected = getarg(1);
- .@ret = getarg(2);
- .@sucess = (.@ret==.@expected);
- debugmes "Test "+.@tid+" = "+(.@sucess?"Sucess":"Fail");
- return .@sucess;
- }
-
- function FinalReport {
- .@tdone = getarg(0);
- .@succes = getarg(1);
- debugmes "Results = Pass : "+.@succes+"/"+.@tdone+" Fails : "+(.@tdone-.@succes)+"/"+.@tdone;
- if(.@succes != .@tdone) { debugmes "Some failure as occured, enable chkresult print to found out"; }
- return;
- }
-}