wc3edit.net

United Warcraft 3 map hacking!
It is currently January 6th, 2009, 10:48 am

 

All times are UTC




Post new topic Reply to topic  [ 8 posts ] 
Author Message
 Post subject: [JASS] Help in Interpreting JASS
PostPosted: October 20th, 2008, 3:47 pm 
Offline
Newcomer

Joined: September 1st, 2008, 8:53 am
Posts: 2
Hi :D i tried interpreting it myself but i lack knowledge in this, so wonder if u guys could help me? Thanks In Advance :)
Greets

Spoiler:
Code:
function KW takes nothing returns nothing
local player p=GetTriggerPlayer()
local integer id=(1+GetPlayerId(p))
local integer i=1
local integer hk=0
local real Kx
local integer KX=0
local real Ky=(GetPlayerScore(p,PLAYER_SCORE_UNITS_KILLED)*Bw[id])*(1.+(ck/17))
local real KY=I2R(AQ)*(1.-(ck/19))
if F<1 or AO[id]>3 or(aN==2 and B9==false)then
return
endif
set AO[id]=AO[id]+1
set Kx=(Ky/(I2R(AJ[id])+.01))
if b5 then
set Kx=Kx*1.2
set Ky=Ky*1.1
set KY=KY*.95
endif
if GetLocalPlayer()==p then
call MultiboardMinimize(aG,false)
endif
if bJ[id]==false and aN==1 and aA>1 then
if GetStoredInteger(Ak,I2S(id),"1")!=7 and BQ[(id*'d')+1]==0 then
if(Ky>=225 and Kx>7.)or ck>3 then
set BQ[(id*'d')+1]=1
call StoreInteger(Ak,I2S(id),"1",GetStoredInteger(Ak,I2S(id),"1")+1)
elseif GetRandomInt(1,7-KX)==1 then
call StoreInteger(Ak,I2S(id),"1",GetStoredInteger(Ak,I2S(id),"1")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"2")!=7 and BQ[(id*'d')+2]==0 then
if(Ky>=300 and Kx>10.)or ck>3 then
set BQ[(id*'d')+2]=1
call StoreInteger(Ak,I2S(id),"2",GetStoredInteger(Ak,I2S(id),"2")+1)
elseif GetRandomInt(1,6-KX)==1 then
call StoreInteger(Ak,I2S(id),"2",GetStoredInteger(Ak,I2S(id),"2")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"3")!=7 and BQ[(id*'d')+3]==0 then
if Ky>=350 and Kx>14. and ck>0 then
set BQ[(id*'d')+3]=1
call StoreInteger(Ak,I2S(id),"3",GetStoredInteger(Ak,I2S(id),"3")+1)
elseif GetRandomInt(1,5-KX)==1 then
call StoreInteger(Ak,I2S(id),"3",GetStoredInteger(Ak,I2S(id),"3")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"4")!=7 and BQ[(id*'d')+4]==0 then
if Ky>=400 and Kx>15. and ck>1 then
set BQ[(id*'d')+4]=1
call StoreInteger(Ak,I2S(id),"4",GetStoredInteger(Ak,I2S(id),"4")+1)
elseif GetRandomInt(1,5-KX)==1 then
call StoreInteger(Ak,I2S(id),"4",GetStoredInteger(Ak,I2S(id),"4")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"5")!=7 and BQ[(id*'d')+5]==0 then
if Ky>=425 and Kx>16. and ck>2 then
set BQ[(id*'d')+5]=1
call StoreInteger(Ak,I2S(id),"5",GetStoredInteger(Ak,I2S(id),"5")+1)
elseif GetRandomInt(1,5-KX)==1 then
call StoreInteger(Ak,I2S(id),"5",GetStoredInteger(Ak,I2S(id),"5")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"10")<6 and BQ[(id*'d')+10]==0 then
if Ky>=450 and Kx>16. and AP[4]and ck>2 then
set BQ[(id*'d')+10]=1
call StoreInteger(Ak,I2S(id),"10",GetStoredInteger(Ak,I2S(id),"10")+1)
elseif GetRandomInt(1,5-KX)==1 then
call StoreInteger(Ak,I2S(id),"10",GetStoredInteger(Ak,I2S(id),"10")-1)
endif
elseif GetStoredInteger(Ak,I2S(id),"10")==7 then
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"6")!=7 and BQ[(id*'d')+6]==0 then
if(AP[1]and KY<20)or ck>3 then
set BQ[(id*'d')+6]=1
call StoreInteger(Ak,I2S(id),"6",GetStoredInteger(Ak,I2S(id),"6")+1)
elseif GetRandomInt(1,9-KX)==1 then
call StoreInteger(Ak,I2S(id),"6",GetStoredInteger(Ak,I2S(id),"6")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"7")!=7 and BQ[(id*'d')+7]==0 then
if(AP[2]and KY<15)or ck>3 then
set BQ[(id*'d')+7]=1
call StoreInteger(Ak,I2S(id),"7",GetStoredInteger(Ak,I2S(id),"7")+1)
elseif GetRandomInt(1,7-KX)==1 then
call StoreInteger(Ak,I2S(id),"7",GetStoredInteger(Ak,I2S(id),"7")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"8")!=7 and BQ[(id*'d')+8]==0 then
if AP[3]and KY<15 and ck>1 then
set BQ[(id*'d')+8]=1
call StoreInteger(Ak,I2S(id),"8",GetStoredInteger(Ak,I2S(id),"8")+1)
elseif GetRandomInt(1,7-KX)==1 then
call StoreInteger(Ak,I2S(id),"8",GetStoredInteger(Ak,I2S(id),"8")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"9")!=7 and BQ[(id*'d')+9]==0 then
if AP[4]and KY<15 and ck>2 then
set BQ[(id*'d')+9]=1
call StoreInteger(Ak,I2S(id),"9",GetStoredInteger(Ak,I2S(id),"9")+1)
elseif GetRandomInt(1,7-KX)==1 then
call StoreInteger(Ak,I2S(id),"9",GetStoredInteger(Ak,I2S(id),"9")-1)



If its too long then just help me translate this part enough (i tried reading it but .... stucked :( :evil: )

Spoiler:
Code:
local player p=GetTriggerPlayer()
local integer id=(1+GetPlayerId(p))
local integer i=1
local integer hk=0
local real Kx
local integer KX=0
local real Ky=(GetPlayerScore(p,PLAYER_SCORE_UNITS_KILLED)*Bw[id])*(1.+(ck/17))
local real KY=I2R(AQ)*(1.-(ck/19))
if F<1 or AO[id]>3 or(aN==2 and B9==false)then
return
endif
set AO[id]=AO[id]+1
set Kx=(Ky/(I2R(AJ[id])+.01))
if b5 then
set Kx=Kx*1.2
set Ky=Ky*1.1
set KY=KY*.95
endif
if GetLocalPlayer()==p then
call MultiboardMinimize(aG,false)
endif
if bJ[id]==false and aN==1 and aA>1 then
if GetStoredInteger(Ak,I2S(id),"1")!=7 and BQ[(id*'d')+1]==0 then
if(Ky>=225 and Kx>7.)or ck>3 then
set BQ[(id*'d')+1]=1
call StoreInteger(Ak,I2S(id),"1",GetStoredInteger(Ak,I2S(id),"1")+1)
elseif GetRandomInt(1,7-KX)==1 then
call StoreInteger(Ak,I2S(id),"1",GetStoredInteger(Ak,I2S(id),"1")-1)


Spoiler:
Code:
if GetStoredInteger(Ak,I2S(id),"6")!=7 and BQ[(id*'d')+6]==0 then
if(AP[1]and KY<20)or ck>3 then
set BQ[(id*'d')+6]=1
call StoreInteger(Ak,I2S(id),"6",GetStoredInteger(Ak,I2S(id),"6")+1)
elseif GetRandomInt(1,9-KX)==1 then
call StoreInteger(Ak,I2S(id),"6",GetStoredInteger(Ak,I2S(id),"6")-1)
endif


Top
 Profile  
 
 Post subject: Re: [JASS] Help in Interpreting JASS
PostPosted: October 20th, 2008, 8:14 pm 
Offline
The Flying Cow!
User avatar

Joined: November 2nd, 2007, 10:34 pm
Posts: 1523
Location: Melbourne
Title: Uberfast Hacker
What's the code even for?

_________________
Experience is not what happens to you; it's what you do with what happens to you. - Aldous Huxley


Top
 Profile  
 
 Post subject: Re: [JASS] Help in Interpreting JASS
PostPosted: October 21st, 2008, 3:24 am 
Offline
Newcomer

Joined: September 1st, 2008, 8:53 am
Posts: 2
The code is how to obtain medal points for notd

Err... I have figure out most of the codes, the only thing is, i can't understand this code

Code:
KY=I2R(AQ)*(1.-(ck/19))


I just need to know what is I2R and AQ and I'm all done

Please tell me what is I2R and AQ


Top
 Profile  
 
 Post subject: Re: [JASS] Help in Interpreting JASS
PostPosted: October 23rd, 2008, 3:49 am 
Offline
Newcomer

Joined: February 9th, 2008, 9:26 am
Posts: 4
gn1248655 wrote:
The code is how to obtain medal points for notd

Err... I have figure out most of the codes, the only thing is, i can't understand this code

Code:
KY=I2R(AQ)*(1.-(ck/19))


I just need to know what is I2R and AQ and I'm all done

Please tell me what is I2R and AQ


You do not have the required permissions to view the files attached to this post.


Last edited by Idunno on October 23rd, 2008, 7:48 pm, edited 1 time in total.

Top
 Profile  
 
 Post subject: Re: [JASS] Help in Interpreting JASS
PostPosted: October 23rd, 2008, 6:02 am 
Offline
Super Moderator
User avatar

Joined: June 8th, 2007, 5:08 am
Posts: 996
Location: Malaysia
Title: Not a Hacker
I2R isn't the number of player. The player's id should be integer. I2R is real.

this is a multiboard system. The JASS saves up the scores of each player by counting on their hero kills counts and such.

Why do you want to interprete this codes?

_________________
ImageImageImage


Top
 Profile  
 
 Post subject: Re: [JASS] Help in Interpreting JASS
PostPosted: October 23rd, 2008, 6:12 am 
Offline
Newcomer

Joined: February 9th, 2008, 9:26 am
Posts: 4
ck is obtain when an objective is completed

Spoiler:
Code:
call H5(10.,"All Caves have been successfully sealed. |cff1e90ff100 XP|r awarded to all Marines.")
set ck=ck+1
loop
exitwhen k6>aA
if aN==1 then
call H5(10.,"All Parasite Spores Neutralized. |cff1e90ff50 XP|r awarded to all Marines.")
set ck=ck+1
set i=1
if mf==1 then
call H4(10.,"1 Civilian alive. |cff1e90ff10 XP|r awarded to all Marines.")
else
call H4(10.,I2S(mf)+" Civilians alive. |cff1e90ff"+I2S(mf*10)+" XP|r awarded to all Marines.")
endif
if mf>8 then
set ck=ck+1
endif


Can you give an example on 12R? i think that AQ is the number of ailments received.

This is the code to obtain the points
Code:
KY=I2R(AQ)*(1.-(ck/19))


Below is the requirements.
Code:
if GetStoredInteger(Ak,I2S(id),"6")!=7 and BQ[(id*'d')+6]==0 then
if(AP[1]and KY<20)or ck>3 then
set BQ[(id*'d')+6]=1
call StoreInteger(Ak,I2S(id),"6",GetStoredInteger(Ak,I2S(id),"6")+1)
elseif GetRandomInt(1,9-KX)==1 then
call StoreInteger(Ak,I2S(id),"6",GetStoredInteger(Ak,I2S(id),"6")-1)
endif


Top
 Profile  
 
 Post subject: Re: [JASS] Help in Interpreting JASS
PostPosted: October 23rd, 2008, 8:30 pm 
Offline
Honorary wc3edit.net Traitor
User avatar

Joined: February 1st, 2007, 4:11 pm
Posts: 2530
Location: Nevada (North)
Idunno wrote:
Can you give an example on 12R? i think that AQ is the number of ailments received.

This is the code to obtain the points
Code:
KY=I2R(AQ)*(1.-(ck/19))


KY = Integer To Real (AQ)Times (1.-(ckdividedby19))
KY = the real [converted score]
AQ = the integer {calculated score over time}
ck=random integer or real function... (sets itself to 1 once you complete objections...)

Just need to modify these values for cheats...
(set ck=1, set AQ=999999999)

I believe thats what you want, but idk

_________________
Image

Perma-retired until my blue/green status is returned or more.


Top
 Profile  
 
 Post subject: Re: [JASS] Help in Interpreting JASS
PostPosted: October 23rd, 2008, 8:49 pm 
Offline
Newcomer

Joined: February 9th, 2008, 9:26 am
Posts: 4
thanks so much, i now understand how it works


Top
 Profile  
 
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 8 posts ] 

All times are UTC


Who is online

Users browsing this forum: No registered users and 1 guest


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group

Privacy Policy Statement
Impressum (German)