الموقع العربي الاول للعبة Silkroad Online

الموقع العربي الاول للعبة Silkroad Online (https://silkroad4arab.com/vb/index.php)
-   قسم الاسئلة و الاستفسارات لعمل السيرفرات الخاصة (https://silkroad4arab.com/vb/forumdisplay.php?f=226)
-   -   طلب شرح (https://silkroad4arab.com/vb/showthread.php?t=617968)

mohamed habib 03-08-2017 03:49 AM

طلب شرح
 
ممكن شرح للكيورى ده بس بالله عليكم انا لسه مبتدا مش عارف اكتب ايه وفين فاى معلومه ولو صغيره ياريت تتوضح
كود PHP:

USE SRO_VT_SHARD 


DECLARE @Teleport VARCHAR (64
DECLARE @
CHARNAME1 VARCHAR (30
DECLARE @
CHARNAME2 VARCHAR (30
DECLARE @
OwnTeleport INT 
DECLARE @Fee INT 
DECLARE @RequiredLVL INT 

/* Put your settings here */ 
SET @Teleport 'swagger_area1' -- any name you want exPK_ZONE or PVP_ZONE 
SET 
@CHARNAME1 '[GM]Swagger1337' -- Teleport position 
SET 
@CHARNAME2 'Swagger2' -- Spawn position after teleport 
SET 
@OwnTeleport 1  -- Target teleport ID exfor Jangan for Hotan 20 for Constantinople 
SET 
@Fee 50000  -- Gold amount to Pass the teleport 
SET 
@RequiredLVL 0  -- minimum level required to teleport 0 for no restriction ex:90 lvl 90 and higher can teleport 
/* settings area end here */ 

IF EXISTS (SELECT CodeName128 FROM _RefObjCommon WHERE CodeName128 'STORE_'+@Teleport
 
BEGIN 
  raiserror
('The stated teleportname of %s is already exist!',11,1,@Teleport); 
  RETURN; 
 
END 
     
    
DECLARE @MAXOBJ INT = (SELECT MAX (IDFROM _RefObjCommon)+
    
DECLARE @REGION1 INT SET @REGION1 = (SELECT (LatestRegionFROM _Char WHERE CharName16 = @CHARNAME1
    DECLARE @
POSX1 INT SET @POSX1 = (SELECT (POSXFROM _Char WHERE CharName16 = @CHARNAME1
    DECLARE @
POSY1 INT SET @POSY1 = (SELECT (POSYFROM _Char WHERE CharName16 = @CHARNAME1
    DECLARE @
POSZ1 INT SET @POSZ1 = (SELECT (POSZFROM _Char WHERE CharName16 = @CHARNAME1
    DECLARE @
LINK INT = (SELECT MAX (IDFROM _RefObjStruct)+
      
    SET IDENTITY_INSERT _RefObjCommon ON 
    INSERT INTO _RefObjCommon 
(Service,ID,CodeName128,ObjName128,OrgObjCodeName128,NameStrID128,DescStrID128,CashItem,Bionic,TypeID1,TypeID2,TypeID3,TypeID4,DecayTime,Country,Rarity,CanTrade,CanSell,CanBuy,CanBorrow,CanDrop,CanPick,CanRepair,CanRevive,CanUse,CanThrow,Price,CostRepair,CostRevive,CostBorrow,KeepingFee,SellPrice,ReqLevelType1,ReqLevel1,ReqLevelType2,ReqLevel2,ReqLevelType3,ReqLevel3,ReqLevelType4,ReqLevel4,MaxContain,RegionID,Dir,OffsetX,OffsetY,OffsetZ,Speed1,Speed2,Scale,BCHeight,BCRadius,EventID,AssocFileObj128,AssocFileDrop128,AssocFileIcon128,AssocFile1_128,AssocFile2_128,LinkVALUES 
    
(1,@MAXOBJ,'STORE_'+@Teleport,@Teleport,'xxx','SN_STORE_'+@Teleport,'xxx',0,0,4,1,1,0,0,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,-1,0,-1,0,-1,0,-1,0,-1,@REGION1,0,@POSX1,@POSY1,@POSZ1,0,0,50,50,30,0,'quest\ins_quest_teleport.bsr','xxx','xxx','xxx','xxx',@link
    
SET IDENTITY_INSERT _RefObjCommon OFF 
     
    
print '' 
    
print 'Add the following line to teleportbuilding.txt @server_dep\silkroad\textdata folder' 
    
print '1    '+CONVERT(varchar(max),@MAXOBJ)+'    '+'STORE_'+@Teleport+'    '+@Teleport+'    xxx    '+'SN_STORE_'+@Teleport+'    xxx    0    0    4    1    1    0    0    3    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    -1    0    -1    0    -1    0    -1    0    -1    '+CONVERT(varchar(max),@REGION1)+'    0    '+CONVERT(varchar(max),@POSX1)+'    '+CONVERT(varchar(max),@POSY1)+'    '+CONVERT(varchar(max),@POSZ1)+'    0    0    50    50    30    0    quest\teleport01.bsr    xxx    xxx    xxx    xxx    '+CONVERT(varchar(max),@link
    print 
'' 
    
print 'Add the following line to textdata_object.txt @server_dep\silkroad\textdata folder' 
    
print '' 
    
print '1    '+'SN_STORE_'+@Teleport+'                                '+@Teleport 
    
print '' 
      
print '' 

  
SET IDENTITY_INSERT _RefObjStruct ON 
  INSERT INTO _RefObjStruct 
(ID,Dummy_DataVALUES 
  
(@LINK,0
  
SET IDENTITY_INSERT _RefObjStruct OFF 
   
  
DECLARE @MAXTELID INT = (SELECT MAX (IDFROM _RefTeleport)+
  
DECLARE @WORLDID INT = (SELECT (WorldIDFROM _Char where CharName16 = @CHARNAME2
  DECLARE @
REGION2 INT SET @REGION2 = (SELECT (LatestRegionFROM _Char WHERE CharName16 = @CHARNAME2
  DECLARE @
POSX2 INT SET @POSX2 = (SELECT (POSXFROM _Char WHERE CharName16 = @CHARNAME2
  DECLARE @
POSY2 INT SET @POSY2 = (SELECT (POSYFROM _Char WHERE CharName16 = @CHARNAME2
  DECLARE @
POSZ2 INT SET @POSZ2 = (SELECT (POSZFROM _Char WHERE CharName16 = @CHARNAME2

  
INSERT INTO _RefTeleport (Service,ID,CodeName128,AssocRefObjCodeName128,AssocRefObjID,ZoneName128,GenRegionID,GenPos_X,GenPos_Y,GenPos_Z,GenAreaRadius,CanBeResurrectPos,CanGotoResurrectPos,GenWorldID,BindInteractionMask,FixedServiceVALUES 
  
(1,@MAXTELID,'GATE_'+@Teleport,'STORE_'+@Teleport,@MAXOBJ,'SN_STORE_'+@Teleport,@REGION2,@POSX2,@POSY2,@POSZ2,30,0,0,@WORLDID,1,0
   
  print 
'' 
  
print 'Add the following line to teleportdata.txt @server_dep\silkroad\textdata folder' 
  
print '1    '+CONVERT(varchar(max),@MAXTELID)+'    '+'GATE_'+@Teleport+'    '+CONVERT(varchar(max),@MAXOBJ)+'    '+'SN_STORE_'+@Teleport+'    '+CONVERT(varchar(max),@REGION2)+'    '+CONVERT(varchar(max),@POSX2)+'    '+CONVERT(varchar(max),@POSY2)+'    '+CONVERT(varchar(max),@POSZ2)+'    30    0    0    '+CONVERT(varchar(max),@WORLDID)+'    1    0' 
  
print '' 
  
print '' 

  
IF @RequiredLVL 
  BEGIN 
    INSERT INTO _RefTeleLink 
(Service,OwnerTeleport,TargetTeleport,Fee,RestrictBindMethod,RunTimeTeleportMethod,CheckResult,Restrict1,Data1_1,Data1_2,Restrict2,Data2_1,Data2_2,Restrict3,Data3_1,Data3_2,Restrict4,Data4_1,Data4_2,Restrict5,Data5_1,Data5_2VALUES 
    
(1,@OwnTeleport,@MAXTELID,@Fee,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    
INSERT INTO _RefTeleLink (Service,OwnerTeleport,TargetTeleport,Fee,RestrictBindMethod,RunTimeTeleportMethod,CheckResult,Restrict1,Data1_1,Data1_2,Restrict2,Data2_1,Data2_2,Restrict3,Data3_1,Data3_2,Restrict4,Data4_1,Data4_2,Restrict5,Data5_1,Data5_2VALUES 
    
(1,@MAXTELID,@OwnTeleport,@Fee,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
     
print 
'' 
    
print 'Add the following lines to teleportlink.txt @server_dep\silkroad\textdata folder' 
    
print '1    '+CONVERT(varchar(max),@OwnTeleport)+'    '+CONVERT(varchar(max),@MAXTELID)+'    '+CONVERT(varchar(max),@Fee)+'    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0' 
    
print '1    '+CONVERT(varchar(max),@MAXTELID)+'    '+CONVERT(varchar(max),@OwnTeleport)+'    '+CONVERT(varchar(max),@Fee)+'    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0' 
    
print '' 
  
END 
  
ELSE BEGIN 
    INSERT INTO _RefTeleLink 
(Service,OwnerTeleport,TargetTeleport,Fee,RestrictBindMethod,RunTimeTeleportMethod,CheckResult,Restrict1,Data1_1,Data1_2,Restrict2,Data2_1,Data2_2,Restrict3,Data3_1,Data3_2,Restrict4,Data4_1,Data4_2,Restrict5,Data5_1,Data5_2VALUES 
    
(1,@OwnTeleport,@MAXTELID,@Fee,0,0,0,1,@RequiredLVL,999,0,0,0,0,0,0,0,0,0,0,0,0
     
    print 
'' 
    
print '' 
    
print 'Add the following line to teleportlink.txt @server_dep\silkroad\textdata folder' 
    
print '1    '+CONVERT(varchar(max),@OwnTeleport)+'    '+CONVERT(varchar(max),@MAXTELID)+'    '+CONVERT(varchar(max),@Fee)+'    0    0    0    1    '+CONVERT(varchar(max),@RequiredLVL)+'    999    0    0    0    0    0    0    0    0    0    0    0    0' 
    
print '' 

  
END 

print '' 
print 'Done! By Swagger1337' 


mohamed habib 03-08-2017 11:08 AM

رد: طلب شرح
 
حاجه للتوضيح لو انا عايز اربطه بالتليليبورت بتاع جانجان اعمل ايه

HB# 03-08-2017 07:47 PM

رد: طلب شرح
 
يتم رفع الشرح على قسم الشروحات والبرامج (مخصوص عشانك) :59:

mohamed habib 03-08-2017 11:35 PM

رد: طلب شرح
 
تسلم يا راجل يا محترم
عشانى وعشان الناس اللى محتاجه تستفيد

mohamed habib 04-08-2017 12:16 AM

رد: طلب شرح
 
انا عملت التليبورت وبسافر جوه وبره الروم عادى
بس الحركه جوه الروم غريبه مش ببعد عن التليبورت وبعدى الجدار بتاع الروم مش عارف ليه
قبل ماعمل التليبورت كنت بتحرك عادى
ممكن اعرف ايه السبب

mohamed habib 04-08-2017 12:39 AM

رد: طلب شرح
 
تم حل المشكله شكرااااااا


الساعة الآن 06:46 PM.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.