Jump to content

dragontechi

Advanced members
  • Content Count

    212
  • Joined

  • Last visited

  • Days Won

    2

dragontechi last won the day on January 23

dragontechi had the most liked content!

Community Reputation

43 Neutral

3 Followers

About dragontechi

  • Rank
    First Mate

Recent Profile Visitors

1,527 profile views
  1. I don't understand very well how this script works can someone help me because no matter how many times I change the id it always ends up giving me the first pet if Item_EMstone_ID ==3924 then ---奇异恶魔果实 敏之精灵 敏捷加防御 local j1 = TakeItem( role, 0,4540, 10 ) ---鲨鱼背鳍 local j2 = TakeItem( role, 0,3443, 10 ) ----沼泽枯木 if j1==0 or j2==0 then SystemNotice ( role ,"Deletion of pet fairy reborn tools failed") return end local rad = math.random ( 1, 100 ) local r1 = 0 local r2 = 0 if Item_JLone_ID ==680 or Item_JLother_ID ==680 then if Item_JLone_ID==Item_JLother_ID then r1,r2 =MakeItem ( role , 681 , 1 , 4 ) elseif lv_JLone>=20 and lv_JLone<25 and lv_JLother >=20 and lv_JLother<25 and rad>=88 then --12% Chance of Mordo JR r1,r2 =MakeItem ( role , 681 , 1 , 4 ) elseif lv_JLone>=25 and lv_JLone<35 and lv_JLother >=25 and lv_JLother<35 and rad>=50 then --50% Chance of Mordo JR r1,r2 =MakeItem ( role , 681 , 1 , 4 ) elseif lv_JLone>=35 and lv_JLother >=35 and rad>=10 then --90% Chance of Mordo JR r1,r2 =MakeItem ( role , 681 , 1 , 4 ) --Mordo JR else r1,r2 =MakeItem ( role , 236 , 1 , 4 ) --Fairy of Agility end else r1,r2 =MakeItem ( role , 236 , 1 , 4 ) --Fairy of Agility end local Item_newJL = GetChaItem ( role , 2 , r2 ) --取新精灵道具指针 local Num_newJL = GetItemForgeParam ( Item_newJL , 1 ) local Part1_newJL = GetNum_Part1 ( Num_newJL ) --Get Num Part 1 到 Part 7 local Part2_newJL = GetNum_Part2 ( Num_newJL ) local Part3_newJL = GetNum_Part3 ( Num_newJL ) local Part4_newJL = GetNum_Part4 ( Num_newJL ) local Part5_newJL = GetNum_Part5 ( Num_newJL ) local Part6_newJL = GetNum_Part6 ( Num_newJL ) local Part7_newJ L= GetNum_Part7 ( Num_newJL ) if lv_JLone>=20 and lv_JLother >=20 then Part2_newJL = 11 ---------敏之精灵技能编号 Part3_newJL = 1 ---------初级阶段 end if lv_JLone>=25 and lv_JLother >=25 then Part2_newJL = 11 ---------敏之精灵技能编号 Part3_newJL = 2 ---------中级阶段 end if lv_JLone>=35 and lv_JLother >=35 then Part2_newJL = 11 ---------敏之精灵技能编号 Part3_newJL = 3 ---------高级阶段 end local rad1 = math.random ( 1, 100 ) if Part3_newJL==3 then GiveItem ( role , 0 , 609 , 1 , 4 ) --Expert Fairy Possession GiveItem ( role , 0 , 612 , 1 , 4 ) --Expert Self Destruct end if Part3_newJL==2 then if rad1 <=95 then GiveItem ( role , 0 , 608 , 1 , 4 ) --Standard Fairy Possession GiveItem ( role , 0 , 611 , 1 , 4 ) --Standard Self Destruct elseif rad1 > 95 and rad1 <=100 then GiveItem ( role , 0 , 609 , 1 , 4 ) --Expert Fairy Possession GiveItem ( role , 0 , 612 , 1 , 4 ) --Expert Self Destruct end end if Part3_newJL==1 then if rad1 <=90 then GiveItem ( role , 0 , 239 , 1 , 4 ) --Novice Fairy Possession GiveItem ( role , 0 , 610 , 1 , 4 ) --Novice Self Destruct elseif rad1 > 90 and rad1 <=98 then GiveItem ( role , 0 , 608 , 1 , 4 ) --Standard Fairy Possession GiveItem ( role , 0 , 611 , 1 , 4 ) --Standard Self Destruct elseif rad1 > 98 and rad1 <=100 then GiveItem ( role , 0 , 609 , 1 , 4 ) --Expert Fairy Possession GiveItem ( role , 0 , 612 , 1 , 4 ) --Expert Self Destruct end end Num_newJL = SetNum_Part1 ( Num_newJL , 1 ) ----------二转标记 Num_newJL = SetNum_Part2 ( Num_newJL , Part2_newJL ) Num_newJL = SetNum_Part3 ( Num_newJL , Part3_newJL ) Num_newJL = SetNum_Part4 ( Num_newJL , Part4_newJL ) Num_newJL = SetNum_Part5 ( Num_newJL , Part5_newJL ) Num_newJL = SetNum_Part6 ( Num_newJL , Part6_newJL ) Num_newJL = SetNum_Part7 ( Num_newJL , Part7_newJL ) SetItemForgeParam ( Item_newJL , 1 , Num_newJL ) SetItemAttr ( Item_newJL , ITEMATTR_VAL_STR , new_str ) SetItemAttr ( Item_newJL , ITEMATTR_VAL_DEX , new_dex ) SetItemAttr ( Item_newJL , ITEMATTR_VAL_STA , new_sta ) SetItemAttr ( Item_newJL , ITEMATTR_VAL_AGI , new_agi ) SetItemAttr ( Item_newJL , ITEMATTR_VAL_CON , new_con ) SetItemAttr ( Item_newJL , ITEMATTR_MAXENERGY , new_MAXENERGY ) SetItemAttr ( Item_newJL , ITEMATTR_MAXURE , new_MAXURE ) end
  2. frmTempBag = UI_CreateForm( "frmTempBag", FALSE, 200, 232, 0, 0, TRUE, FALSE ) UI_ShowForm( frmTempBag, FALSE ) UI_AddFormToTemplete( frmTempBag, FORM_MAIN ) UI_FormSetIsEscClose( frmTempBag, TRUE ) UI_SetIsDrag( frmTempBag,FALSE) UI_SetFormStyle( frmTempBag,1) UI_FormSetHotKey( frmTempBag, ALT_KEY, HOTKEY_D ) --加载背景图片 imgBakTop = UI_CreateCompent( frmTempBag, IMAGE_TYPE, "imgBakTop", 200, 232, 0, 0 ) UI_LoadImage( imgBakTop, "texture/ui/tempbag.tga", NORMAL, 198, 232, 0, 0 ) --Title labTitle = UI_CreateCompent( frmTempBag, LABELEX_TYPE, "labTitle", 400, 150, 10, 5 ) UI_SetCaption( labTitle, "Temporary Bag") UI_SetTextColor( labTitle, COLOR_BLACK ) UI_SetLabelExFont( labTitle, DEFAULT_FONT, TRUE, COLOR_WHITE ) --创建关闭按钮 btnClose = UI_CreateCompent( frmTempBag, BUTTON_TYPE, "btnClose", 14, 14, 178, 3 ) UI_LoadButtonImage( btnClose, "texture/ui/PublicC.tga", 14, 14, 116, 175, TRUE ) UI_SetButtonModalResult( btnClose, BUTTON_CLOSE ) --创建物品表格 grdTempBag = UI_CreateCompent( frmTempBag, GOODS_GRID_TYPE, "grdTempBag", 184, 305, 7, 36 ) UI_SetGridSpace( grdTempBag, 4, 4 ) UI_SetGridContent( grdTempBag, 4, 4 ) UI_SetGridUnitSize( grdTempBag, 32, 32 ) UI_SetMargin( grdTempBag, 21, 4, 0, 0 ) scrollid = UI_GetScroll( grdTempBag ) UI_SetSize( scrollid, 11, 1 ) UI_LoadImage( scrollid, "texture/ui/PublicC.tga", COMPENT_BACK, 11, 1, 194, 13 ) id = UI_GetScrollObj( scrollid, SCROLL_UP ) UI_LoadButtonImage( id, "texture/ui/PublicC.tga", 11, 9, 166, 0, TRUE ) UI_SetSize( id, 11, 9 ) id = UI_GetScrollObj( scrollid, SCROLL_SCROLL ) UI_LoadImage( id, "texture/ui/PublicC.tga", COMPENT_BACK, 9, 43, 166, 10 ) UI_SetSize( id, 9, 43 ) id = UI_GetScrollObj( scrollid, SCROLL_DOWN ) UI_LoadButtonImage( id, "texture/ui/PublicC.tga", 11, 9, 166, 0, TRUE ) UI_SetSize( id, 11, 9 ) add the line to the client but I don't see the bar
  3. when using the &updateall command on a map the exp disappears without any errors in the system
  4. thanks, the solution was to lower the item's id below 6000
  5. I would be very grateful if you could help me with the problem.
  6. The icons I took from a client these files are completely edited from pko 1.38 that he uploaded @V3ct0r
  7. I have a question, can you make the acc merge with the app, but when I put it on even though the statuses are shown, it doesn't give me any statistics, does anyone have an idea of what could be happening?
  8. It works for me only by placing date_default_timezone_set('America/Santo_Domingo');Me funciona
  9. ok in a few minutes i will check
  10. I will send you the config file that was the only thing that config of the web by private
  11. @V3ct0r When trying to log in, I get this error and the date is taken from the user's computer, not from the vps
  12. { "Title": "Tales of Pirates Game Updater by PkoDev", "RepositoryName": "TechiGG", "ApiKey": "xxxxxxxxxxxxxxxxxxxxxxxxxxxx", "Owner": "lastpirates", "ProductHeader": "pkodev-updater", "ClientCommitAt": "" } Operación Recompilar iniciada... 1>------ Operación Recompilar todo iniciada: proyecto: UpdaterLibrary, configuración: Release Any CPU ------ Se ha restaurado C:\Users\el_me\OneDrive\Desktop\PkodevUpdater-main\PkodevUpdater-main\UpdaterLibrary\UpdaterLibrary.csproj (en 10 ms). Se ha restaurado C:\Users\el_me\OneDrive\Desktop\PkodevUpdater-main\PkodevUpdater-main\PkodevUpdater\PkodevUpdater.csproj (en 60 ms). 1>C:\Users\el_me\OneDrive\Desktop\PkodevUpdater-main\PkodevUpdater-main\UpdaterLibrary\OctokitGithubClientFactory.cs(17,30,17,48): warning CS8766: La nulabilidad de los tipos de referencia del tipo de valor devuelto de "GitHubClient? OctokitGithubClientFactory.CreateGitHubClient()" no coincide con el miembro "GitHubClient IOctokitGithubClientFactory.CreateGitHubClient()" implementado de forma implícita (posiblemente debido a los atributos de nulabilidad). 1>C:\Users\el_me\OneDrive\Desktop\PkodevUpdater-main\PkodevUpdater-main\UpdaterLibrary\Models\CommitFile.cs(5,23,5,27): warning CS8618: El elemento propiedad "Name" que no acepta valores NULL debe contener un valor distinto de NULL al salir del constructor. Considere la posibilidad de declarar el elemento propiedad como que admite un valor NULL. 1>C:\Users\el_me\OneDrive\Desktop\PkodevUpdater-main\PkodevUpdater-main\UpdaterLibrary\Models\CommitFile.cs(7,23,7,26): warning CS8618: El elemento propiedad "Url" que no acepta valores NULL debe contener un valor distinto de NULL al salir del constructor. Considere la posibilidad de declarar el elemento propiedad como que admite un valor NULL. 1>C:\Users\el_me\OneDrive\Desktop\PkodevUpdater-main\PkodevUpdater-main\UpdaterLibrary\Models\CommitFile.cs(9,23,9,29): warning CS8618: El elemento propiedad "Status" que no acepta valores NULL debe contener un valor distinto de NULL al salir del constructor. Considere la posibilidad de declarar el elemento propiedad como que admite un valor NULL. 1>C:\Users\el_me\OneDrive\Desktop\PkodevUpdater-main\PkodevUpdater-main\UpdaterLibrary\Models\AppSettings.cs(5,23,5,37): warning CS8618: El elemento propiedad "RepositoryName" que no acepta valores NULL debe contener un valor distinto de NULL al salir del constructor. Considere la posibilidad de declarar el elemento propiedad como que admite un valor NULL. 1>C:\Users\el_me\OneDrive\Desktop\PkodevUpdater-main\PkodevUpdater-main\UpdaterLibrary\Models\AppSettings.cs(7,23,7,29): warning CS8618: El elemento propiedad "ApiKey" que no acepta valores NULL debe contener un valor distinto de NULL al salir del constructor. Considere la posibilidad de declarar el elemento propiedad como que admite un valor NULL. 1>C:\Users\el_me\OneDrive\Desktop\PkodevUpdater-main\PkodevUpdater-main\UpdaterLibrary\Models\AppSettings.cs(9,23,9,28): warning CS8618: El elemento propiedad "Owner" que no acepta valores NULL debe contener un valor distinto de NULL al salir del constructor. Considere la posibilidad de declarar el elemento propiedad como que admite un valor NULL. 1>C:\Users\el_me\OneDrive\Desktop\PkodevUpdater-main\PkodevUpdater-main\UpdaterLibrary\Models\AppSettings.cs(11,23,11,28): warning CS8618: El elemento propiedad "Title" que no acepta valores NULL debe contener un valor distinto de NULL al salir del constructor. Considere la posibilidad de declarar el elemento propiedad como que admite un valor NULL. 1>C:\Users\el_me\OneDrive\Desktop\PkodevUpdater-main\PkodevUpdater-main\UpdaterLibrary\Models\AppSettings.cs(13,23,13,36): warning CS8618: El elemento propiedad "ProductHeader" que no acepta valores NULL debe contener un valor distinto de NULL al salir del constructor. Considere la posibilidad de declarar el elemento propiedad como que admite un valor NULL. 1>C:\Users\el_me\OneDrive\Desktop\PkodevUpdater-main\PkodevUpdater-main\UpdaterLibrary\Models\AppSettings.cs(15,23,15,37): warning CS8618: El elemento propiedad "ClientCommitAt" que no acepta valores NULL debe contener un valor distinto de NULL al salir del constructor. Considere la posibilidad de declarar el elemento propiedad como que admite un valor NULL. 1>UpdaterLibrary -> C:\Users\el_me\OneDrive\Desktop\PkodevUpdater-main\PkodevUpdater-main\UpdaterLibrary\bin\Release\netcoreapp3.1\UpdaterLibrary.dll 1>Compilación del proyecto "UpdaterLibrary.csproj" terminada. 2>------ Operación Recompilar todo iniciada: proyecto: PkodevUpdater, configuración: Release Any CPU ------ 2>C:\Users\el_me\OneDrive\Desktop\PkodevUpdater-main\PkodevUpdater-main\PkodevUpdater\forms\UpdaterWindow.xaml(62,108,62,140): error CS1061: "UpdaterWindow" no contiene una definición para "StartGameBtn_MouseLeftButtonDown" ni un método de extensión accesible "StartGameBtn_MouseLeftButtonDown" que acepte un primer argumento del tipo "UpdaterWindow" (¿falta alguna directiva using o una referencia de ensamblado?) 2>Compilación del proyecto "PkodevUpdater.csproj" terminada -- ERROR. ========== Recompilar todo: 1 correctos, 1 incorrectos, 0 omitidos ========== I get this error when compiling
  13. I am having the same problem to compile
  14. -- Print a log print("Loading pkodev.promo.lua") -- Check that HandleChat function exists if (HandleChat == nil) then -- Write a log print("pkodev.promo.lua: Warning, the HandleChat() function is not exist!") -- Do not load the script return end -- Promocodes system promo = promo or { } -- Name of the file with promocodes promo.file = "promocodes.dat" -- List with promocodes promo.list = {} -- Save data to file promo.save = function(path) -- Open the file local file, msg = io.open(path, "w") -- Check that file is open if (file == nil) then -- Write a log LG("pkodev.mod.promo", string.format("Can't save the list with promocodes to the file '%s': '%s'!", path, msg)) return false end -- Write data for key, value in promo.list do -- Write a line local ret = file:write(string.format("{%s, %d, %d}\n", value.code, value.id, value.count)) -- Check that line is written if (ret == false) then -- Write a log LG("pkodev.mod.promo", string.format("Can't write the data to the file '%s'!", path)) return false end end -- Flush the data file:flush() -- Close the file file:close() -- Write a log LG("pkodev.mod.promo", string.format("The list with promocodes has been successfully saved to the file '%s'!", path)) return true end -- Load data from file promo.load = function(path) -- Open the file local file, msg = io.open(path, "r") -- Check that file is open if (file == nil) then -- Write a log LG("pkodev.mod.promo", string.format("Can't load the list with promocodes from the file '%s': '%s'!", path, msg)) return false end -- Read file line by line for line in file:lines() do -- Extract data from the line local ret, _, code_, id_, count_ = string.find(line, "^{([A-Za-z0-9]+)%s*,%s*([0-9]+)%s*,%s*([0-9]+)}$") -- Check that string matches the pattern if (ret ~= nil) then -- Add data to the list table.insert( promo.list, { code = code_, id = id_, count = count_, } ) end end -- Close the file file:close() -- Write a log LG("pkodev.mod.promo", string.format("%d promocodes have been succsessfully loaded from file '%s'!", table.getn(promo.list), path)) return true end -- Handle chat function hook promo.hadle_chat__original = HandleChat HandleChat = function(role, msg) local ChaLv = Lv(role) if(ChaLv >= 70)then -- Check that message has the '/' symbol if ( string.sub(msg, 1, 1) == "/" ) then -- Get promocode local ret, _, code_ = string.find(msg, "^/([A-Za-z0-9]+)%s*$") -- Check that promocode is found if (ret ~= nil) then -- Search the promocode in the list for key, value in pairs(promo.list) do -- Compare promocodes if (value.code == code_) then -- Write a message BickerNotice(role, string.format("You entered the promocode '%s': %s x %d!", value.code, GetItemName(value.id), value.count) ) -- Give an item GiveItem(role, 0, value.id, value.count, 0) -- Write a log LG("pkodev.mod.promo", string.format("Player '%s' entered a promocode '%s' and received '%s' x %d!", GetChaDefaultName(role), value.code, GetItemName(value.id), value.count) ) -- Save the list to the file promo.save(promo.file) -- Do not call the original function HandleChat() return 0 end end end end -- Call the original function HandleChat() return promo.hadle_chat__original(role, msg) end end promo.load(promo.file) edit the code now the uses of the codes are unlimited you have to be lv 70 or higher to use the code the lv can be modified but I can't find how to limit the use to only 1 use per character
×
×
  • Create New...