The Forum is up for sale: XeNTaX Forum looking for new owner

Search found 252 matches

by TSelman61X
Fri Nov 03, 2017 8:37 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

VEndPos00=ftell f LongCheck00=readlong f if LongCheck00!=0 then fseek f VEndPos00 #seek_set if LongCheck00==0 then ( VEndPos01=ftell f LongCheck01=readlong f if LongCheck01!=0 then fseek f VEndPos01 #seek_set if LongCheck01==0 then ( fseek f 0x8 #seek_cur VEndPos02=ftell f LongCheck02=readlong f if...
by TSelman61X
Fri Nov 03, 2017 8:37 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

Ynalış mı var burda if(maxweight != 0) then ( if(weight1 != 0) then ( w1 = weight1 as float append w.boneids (bone1 + 1) append w.weights (w1/255.0) ) if(weight2 != 0) then ( w2 = weight2 as float append w.boneids (bone2 + 1) append w.weights (w2/255.0) ) if(weight3 != 0) then ( w3 = weight3 as floa...
by TSelman61X
Fri Nov 03, 2017 8:36 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

Code: Select all

weight3 = readbyte f #unsigned	
weight2 = readbyte f #unsigned	
weight1 = readbyte f #unsigned	
weight4 = readbyte f #unsigned			
	
bone1 = readbyte f #unsigned	
bone2 = readbyte f #unsigned	
bone3 = readbyte f #unsigned	
bone4 = readbyte f #unsigned
by TSelman61X
Fri Nov 03, 2017 8:35 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

if(maxweight != 0) then ( if(weight1 != 0) then ( w1 = weight1 as float append w.boneids (bone1 + 1) append w.weights (w1/255.0) ) if(weight2 != 0) then ( w2 = weight2 as float append w.boneids (bone2 + 1) append w.weights (w2/255.0) ) if(weight3 != 0) then ( w3 = weight3 as float append w.boneids ...
by TSelman61X
Fri Nov 03, 2017 8:34 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

Code: Select all

getPos = ftell f + 40	
Null= readlong f
VertexCount = readlong f
UnkOff01 = readlong f
UnkOff02 = readlong f	
FaceCount = readlong f	
MShdId= readlong f
UsedBones=readlong f	
UsedBonesStart=readlong f	
VertexId = readlong f	
VertexEnd = readlong f	
by TSelman61X
Fri Nov 03, 2017 8:33 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

Print ("Start @ 0x"+((bit.intAsHex(ftell f))as string)) PosBoneMap=ftell f fseek f (SizeBoneId) #seek_cur MeshCount00=readlong f fseek f (0x8) #seek_cur for a = 1 to Count00 do ( getPos = ftell f + 4 fseek f getPos #seek_set ) for a = 1 to Count01 do ( getPos = ftell f + 4 fseek f getPos ...
by TSelman61X
Fri Nov 03, 2017 8:32 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

Code: Select all

Print ("End @ 0x"+((bit.intAsHex(ftell f))as string))	
	
MeshStartPos=ftell f

fseek f (MeshOff) #seek_cur
by TSelman61X
Fri Nov 03, 2017 8:32 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

Code: Select all

Print ("Start @ 0x"+((bit.intAsHex(ftell f))as string))

PosBoneMap=ftell f		
fseek f (SizeBoneId) #seek_cur
MeshCount00=readlong f
fseek f (0x8) #seek_cur
by TSelman61X
Fri Nov 03, 2017 8:32 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

Code: Select all

for a = 1 to Count00 do (
getPos = ftell f + 4
fseek f getPos #seek_set			
by TSelman61X
Fri Nov 03, 2017 8:30 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

PosBEnd=ftell g fseek g (BoneStart+BoneNameOff) #seek_set BoneName=readstring g fseek g (PosBEnd) #seek_set append BoneNameArray BoneName tfm = (quat c11 c12 c13 c14) as matrix3 tfm.row4 = [c21,c22,c23] ) fclose g fseek f 0xC #seek_set MshCount=readlong f SData=readlong f Unk00=readlong f MeshOff=r...
by TSelman61X
Fri Nov 03, 2017 8:29 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

Code: Select all

for i=1 to BoneCountName do (
BName=readstring g
Position=ftell g
NameEnd_00=readbyte g
if NameEnd_00!=0 then fseek g (Position) #seek_set
if NameEnd_00==0 then (
fseek g (0x0) #seek_cur
by TSelman61X
Fri Nov 03, 2017 8:29 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

AAAA Moder Kelimesi geçti fn ReadHalfFloat fstream = ( hf=readshort fstream sign = bit.get hf 16 exponent = (bit.shift (bit.and hf (bit.hexasint "7C00")) -10) as integer - 16 fraction = bit.and hf (bit.hexasint "03FF") if sign==true then sign = 1 else sign = 0 exponentF = exponen...
by TSelman61X
Fri Nov 03, 2017 8:28 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

New Oyun neasıl parçalan mas Bunu göstereceğim şimdi sziize gname = getOpenFileName \ caption:"Open .bones from Bones folder" \ types:"Shadow of Mordor Bones (*.Kemil AMK)|*.skel" \ historyCategory:"LOTR_SOMObjectPresets" g = fopen gname "rb" fname = getOpenFi...
by TSelman61X
Fri Nov 03, 2017 8:27 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

Code: Select all

if (heapSize < 200000) then
        heapSize = 2000000 -- allow ~ 40 MB instead of just 7.5 MB. Prevents "Runtime Error: Out of scripter memory"
by TSelman61X
Fri Nov 03, 2017 8:26 am
Forum: Game Archive
Topic: Neden böyle oldu, anlaşılmayan işler [Pc]
Replies: 38
Views: 6183

Re: Neden böyle oldu, anlaşılmayan işler [Pc]

ÇOK bok muhabbet ker ler bunlar neden 2e 5f 76 65 72 73 69 6f 6e 5f 76 61 6c 75 65 5f 2e 5f 76 61 6c 75 65 29 29 2c 30 29 29 2e 7a 66 69 6c 6c 28 32 29 0a 20 20 20 20 20 20 20 20 6e 69 66 5f 76 65 72 5f 68 65 78 5f 32 20 3d 20 73 74 72 28 69 6e 74 28 27 30 78 7b 30 3a 2e 32 7d 27 2e 66 6f 72 6d 61 7...