next »

[Teknoman]

1. Open items.bb

2. Search for this code function:

Code: [Select]

;FIND ITEM CLIMBING
Function FindItemClimbing(cyc,v)
 If DirPressed(cyc) And pAnim(cyc)=>0 And pAnim(cyc)=<3 And pPlatform(cyc)=0 And pDazed(cyc)=0
  If cRun(cyc)=1 Then pFriction(cyc)=pFriction(cyc)+4 Else pFriction(cyc)=pFriction(cyc)+2
  If pFriction(cyc)=>20 And iClimb#(iType(v))>0 And iCarrier(v)=0 And ItemClear(v) And iType(v)<>14
   PointEntity p(cyc),i(v)
   pA#(cyc)=CleanAngle#(EntityYaw(p(cyc)))
   pPlatform(cyc)=v+10 : pPlatY#(cyc)=iClimb#(iType(v))
   pPlatX#(cyc)=iX#(v) : pPlatZ#(cyc)=iZ#(v)
   ChangeAnim(cyc,28) : pFriction(cyc)=0
  EndIf
 EndIf
End Function
3. Now to make an item unclimbable you have to add the Items's ID as an exception. pay attention to this code line

Code: [Select]

If pFriction(cyc)=>20 And iClimb#(iType(v))>0 And iCarrier(v)=0 And ItemClear(v) And iType(v)<>14
4. Now add another And iType(v)<>#

Where # is the ID of the Item you want to be unclimbable.

You shoul see something like this:

Code: [Select]

If pFriction(cyc)=>20 And iClimb#(iType(v))>0 And iCarrier(v)=0 And ItemClear(v) And iType(v)<>14 And iType(v)<>8
NOTE: i only tested this on WEncore but maybe the code is the same on WM08.