well in the hacked one... u cant save in single player mode... i just edited so it would... its simple lol look at this
Code:
function Trig_Save_Actions takes nothing returns nothing
local texttag saveMsg
local string saveCode=""
local integer i=0
local integer pCount=0
local string testCode=""
loop
exitwhen i==10
if(GetPlayerSlotState(Player(i))==PLAYER_SLOT_STATE_PLAYING)then
set pCount=pCount+1
elseif(GetPlayerSlotState(Player(i))==PLAYER_SLOT_STATE_LEFT)then
set pCount=pCount+1
endif
set i=i+1
endloop
if(pCount==1)then
call DisplayTextToPlayer(GetTriggerPlayer(),0,0,"Can not save in single-player")
return
endif
set saveMsg=CreateTextTagUnitBJ("Saving...",udg_units01[GetPlayerId(GetTriggerPlayer())+1],0,8.00,100,100,100,0)
set saveCode=saveCode+SavePokemon()
set saveCode=saveCode+SaveInventory()
set saveCode=saveCode+SaveResources()
call TriggerSleepAction(0)
set saveCode=Bin2Base89(saveCode)
loop
exitwhen(StringLength(saveCode)>=32)
set saveCode="0"+saveCode
endloop
call TriggerSleepAction(0)
set saveCode=EncryptCode(saveCode)
call TriggerSleepAction(0)
set saveCode=SubString(saveCode,0,8)+" "+SubString(saveCode,8,16)+" "+SubString(saveCode,16,24)+" "+SubString(saveCode,24,32)
set saveCode=FormatCode(saveCode)
call DestroyTextTag(saveMsg)
call DisplayTimedTextToPlayer(GetTriggerPlayer(),0,0,60,saveCode)
endfunction
well as u can see... tahst the saving... well if u look at this code " if(pCount==1)then " well this is just no problem! cause look at (pCount==1) well just change the 1 to 0 so if there is 0 people... you cant save! so perfect! so instead of the top code... its
Quote:
function Trig_Save_Actions takes nothing returns nothing
local texttag saveMsg
local string saveCode=""
local integer i=0
local integer pCount=0
local string testCode=""
loop
exitwhen i==10
if(GetPlayerSlotState(Player(i))==PLAYER_SLOT_STATE_PLAYING)then
set pCount=pCount+1
elseif(GetPlayerSlotState(Player(i))==PLAYER_SLOT_STATE_LEFT)then
set pCount=pCount+1
endif
set i=i+1
endloop
if(pCount==0)then
call DisplayTextToPlayer(GetTriggerPlayer(),0,0,"Can not save in single-player")
return
endif
set saveMsg=CreateTextTagUnitBJ("Saving...",udg_units01[GetPlayerId(GetTriggerPlayer())+1],0,8.00,100,100,100,0)
set saveCode=saveCode+SavePokemon()
set saveCode=saveCode+SaveInventory()
set saveCode=saveCode+SaveResources()
call TriggerSleepAction(0)
set saveCode=Bin2Base89(saveCode)
loop
exitwhen(StringLength(saveCode)>=32)
set saveCode="0"+saveCode
endloop
call TriggerSleepAction(0)
set saveCode=EncryptCode(saveCode)
call TriggerSleepAction(0)
set saveCode=SubString(saveCode,0,8)+" "+SubString(saveCode,8,16)+" "+SubString(saveCode,16,24)+" "+SubString(saveCode,24,32)
set saveCode=FormatCode(saveCode)
call DestroyTextTag(saveMsg)
call DisplayTimedTextToPlayer(GetTriggerPlayer(),0,0,60,saveCode)
endfunction
NO need to thank me :)
edit: oh ya! i forgot to upload the map... oh and NO NEED TO THANK ME! remember! coke888 did all this!! well i just enabled save on single!
http://files.wc3edit.net/secure/files/P ... 0HKED1.w3x