Kayıt Ol
f8 filter
Sun World
Raymond

Vsro G Events Bot Programı


view_headline Konu
21.11.2015, Saat: 22:42
#1
PurePower
PurePower
Konuları:
150
Yorumları:
1,576
Kayıt Tarihi:
23.07.2015
Rep Puanı:
55
verified_user Site Kurucusu
Vsro G Events Bot Programı
Detaylı şekilde anlatım yapacağım. Çalışan ve çok başarılı bir bot. Kullanan arkadaşlara serverinde başarılar dilerim. Kodlar düzensiz görünebilir kopyalayıp metin belgesine yapıştırdığınızda düzgün görünecektir.

G Events Bot Aşağıdaki Eventleri İçerir:
- Soru cevap
- GM killer
- Alchemy Plus
- Saklambaç
- Ödüllü Unique
- Joblu Unique
- Şanslı parti numarası
- Ara ve yok et
- PvP eventi
- Unique Spawn
- Lottery Event
- Son ayakta kalan adam
- Otomatik Notice
- Otomatik PM

Kurulum Videoda Anlatılmıştır.





Unutmayın:

- Add The _AddLogChar Code Which Attached With bot Folder /SqlThings/_AddlogChar.txt
- Add The _AddLogItems Code Which Attached With bot Folder /SqlThings/_AddlogItems.txt

PM için Query:
Alıntı:INSERT INTO [G_Events].[dbo].[_AutoPm] (Service,PlayerName,Message,Date) VALUES (0,'PlayerName','Hello',GETDATE())

INSERT New Hide And Seek Place :
Kod:
/* Query To Insert A New H&S Place  

By Eslam Galal  
*/

    
    Declare @CharName VarChar(64)
    Declare @SRegion int  
    Declare @sX int  
    Declare @sY int  
    Declare @sZ int
    Declare @PlaceName VarChar(300)  

Set @CharName = 'AXA'  -- Character Name Which you wanna record it place
set @PlaceName = 'Jangan - Grassland'  -- New Place Name



Set @SRegion = (Select LatestRegion From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)
Set @sX = (Select PosX From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)
Set @sY = (Select PosY From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)
Set @sZ = (Select PosZ From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)

insert _HideANDSeek_Map(RegionID, x, Y ,Z , Place_Name)  
values(@SRegion,@sX, @sY,@sZ,@PlaceName)

- insert New Search And Destroy Place & MoB :
Kod:
/* Query To Insert A New Search And Destroy Place  

By Eslam Galal  
*/

    
    Declare @CharName VarChar(64)
    Declare @SRegion int  
    Declare @sX int  
    Declare @sY int  
    Declare @sZ int
    Declare @PlaceName VarChar(300)  
    Declare @MobID int
Set @CharName = 'AXA'  -- Character Name Which you wanna record it place
set @PlaceName = 'Jangan - Grassland'  -- New Place Name
Set @MobID = ( Select ID From SRO_VT_SHARD.dbo._RefobjCommon Where Codename128 like 'MOB_CH_TIGERWOMAN_L3')


Set @SRegion = (Select LatestRegion From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)
Set @sX = (Select PosX From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)
Set @sY = (Select PosY From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)
Set @sZ = (Select PosZ From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)

insert _SnD_Map(RegionID, x, Y ,Z , Place_Name,UNIQUE_ID)  
values(@SRegion,@sX, @sY,@sZ,@PlaceName,@MobID)

Ödülü nasıl değiştirebilirim?

gyE7gN.jpg

YJmnMZ.jpg

Web Silk:
Alıntı:USE [SRO_VT_ACCOUNT]
GO
/****** Object: StoredProcedure [CGI].[CGI_WebPurchaseSilk] Script Date: 10/4/2015 10:48:45 AM ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER OFF
GO

ALTER PROCEDURE [CGI].[CGI_WebPurchaseSilk]
@OrderID VARCHAR(25),
@UserID VARCHAR(25),
@PkgID INT,
@NumSilk INT,
@Price INT
as
DECLARE @UserJID INT
DECLARE @SilkRemain INT
--DECLARE @PointRemain INT
SET @UserJID = CGI.getUserJID(@UserID)
IF( @UserJID >= 0)
BEGIN
IF( not exists( SELECT OrderNumber from SK_SilkBuyList where OrderNumber = @OrderID))
BEGIN
BEGIN TRANSACTION
IF( not exists( SELECT * from SK_Silk where JID = @UserJID))
BEGIN
INSERT SK_Silk(JID,silk_own,silk_gift,silk_Point)VALUES(@UserJID,@NumSilk,0,0)
--INSERT Silk Own
INSERT SK_SilkChange_BY_Web(JID,silk_remain,silk_offset,silk_type,reason) VALUES(@UserJID,@NumSilk,@NumSilk,0,0)
END
ELSE
BEGIN
SET @SilkRemain = CGI.getSilkOwn(@UserJID)
UPDATE SK_Silk SET silk_own = silk_own + @NumSilk WHERE JID = @UserJID
--INSERT Silk Own
INSERT SK_SilkChange_BY_Web(JID,silk_remain,silk_offset,silk_type,reason) VALUES(@UserJID,@SilkRemain + @NumSilk,@NumSilk,0,0)
END
IF (@@error <> 0 or @@rowcount = 0)
BEGIN
SELECT Result = "FAIL"
ROLLBACK TRANSACTION
RETURN
END
SELECT Result = "SUCCESS"
COMMIT TRANSACTION
RETURN
END
ELSE --else if order
BEGIN
SELECT Result = "ORDEREXIST"
END
END
ELSE
BEGIN
SELECT Result = "NOUSER"
RETURN
END




SET QUOTED_IDENTIFIER OFF

Cevapla
reklam ver
09.03.2016, Saat: 02:18
#2
Edithr
Edithr
Konuları:
11
Yorumları:
40
Kayıt Tarihi:
04.03.2016
Rep Puanı:
0
verified_user Üye
RE: Vsro G Events Bot Programı
Bazı eventleri çalıştıramadım soru soruyor saklanıyor ama pvp ve hayatta kal eventinde ve lucky party eventinde sıkıntı var. Siz kullanabildiniz mi
Cevapla
09.03.2016, Saat: 16:40
#3
kenxharly
kenxharly
Konuları:
5
Yorumları:
44
Kayıt Tarihi:
29.11.2015
Rep Puanı:
0
verified_user Üye
RE: Vsro G Events Bot Programı
Only work trivia event for free Sad
Cevapla
20.05.2016, Saat: 07:51
#4
f3rre
f3rre
Konuları:
0
Yorumları:
5
Kayıt Tarihi:
27.03.2016
Rep Puanı:
0
verified_user Acemi Üye
RE: Vsro G Events Bot Programı
(09.03.2016, Saat: 02:18)Edithr Adlı Kullanıcıdan Alıntı: Bazı eventleri çalıştıramadım soru soruyor saklanıyor ama pvp ve hayatta kal eventinde ve lucky party eventinde sıkıntı var. Siz kullanabildiniz mi


Şuanda program Trial(deneme) sürümü ile paylaşılmış aslında gerekli istek olursa crackleyip Free olarak dağıta bilirim.
Cevapla
21.05.2016, Saat: 18:07
#5
BURAKSERIT
BURAKSERIT
Konuları:
77
Yorumları:
961
Kayıt Tarihi:
22.03.2016
Rep Puanı:
50
verified_user Emektar
RE: Vsro G Events Bot Programı
Bunu bir türlü kuramadım, beceremedim. Sorunsuz kurulumunda yardımcı olacak birileri var ise benimle buradan iletişime geçebilir mi?
Diğer iletişim kanalları;
Skype: burakkserit
Tel: 530 157 0878
Cevapla
03.07.2017, Saat: 23:28
#6
bboran
bboran
Konuları:
4
Yorumları:
12
Kayıt Tarihi:
08.06.2017
Rep Puanı:
0
verified_user Acemi Üye
RE: Vsro G Events Bot Programı
bu konu ile ilgili yardim edebilecek birisi varmi ?
Cevapla
reklam ver
28.07.2017, Saat: 18:24
#7
xpliiso
xpliiso
Konuları:
0
Yorumları:
10
Kayıt Tarihi:
13.02.2016
Rep Puanı:
0
verified_user Acemi Üye
RE: Vsro G Events Bot Programı
Kuruluma geçtim yapabilirsem türkce anlatım yaparım
Cevapla
01.08.2017, Saat: 12:31
#8
hX0-
hX0-
Konuları:
21
Yorumları:
158
Kayıt Tarihi:
04.04.2017
Rep Puanı:
2
verified_user Uzman Üye
RE: Vsro G Events Bot Programı
(21.11.2015, Saat: 22:42)PurePower Adlı Kullanıcıdan Alıntı: Detaylı şekilde anlatım yapacağım. Çalışan ve çok başarılı bir bot. Kullanan arkadaşlara serverinde başarılar dilerim. Kodlar düzensiz görünebilir kopyalayıp metin belgesine yapıştırdığınızda düzgün görünecektir.

G Events Bot Aşağıdaki Eventleri İçerir:
- Soru cevap
- GM killer
- Alchemy Plus
- Saklambaç
- Ödüllü Unique
- Joblu Unique
- Şanslı parti numarası
- Ara ve yok et
- PvP eventi
- Unique Spawn
- Lottery Event
- Son ayakta kalan adam
- Otomatik Notice
- Otomatik PM

Kurulum Videoda Anlatılmıştır.





Unutmayın:

- Add The _AddLogChar Code Which Attached With bot Folder /SqlThings/_AddlogChar.txt
- Add The _AddLogItems Code Which Attached With bot Folder /SqlThings/_AddlogItems.txt

PM için Query:
Alıntı:INSERT INTO [G_Events].[dbo].[_AutoPm] (Service,PlayerName,Message,Date) VALUES (0,'PlayerName','Hello',GETDATE())

INSERT New Hide And Seek Place :
Kod:
/* Query To Insert A New H&S Place  

By Eslam Galal  
*/

    
    Declare @CharName VarChar(64)
    Declare @SRegion int  
    Declare @sX int  
    Declare @sY int  
    Declare @sZ int
    Declare @PlaceName VarChar(300)  

Set @CharName = 'AXA'  -- Character Name Which you wanna record it place
set @PlaceName = 'Jangan - Grassland'  -- New Place Name



Set @SRegion = (Select LatestRegion From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)
Set @sX = (Select PosX From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)
Set @sY = (Select PosY From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)
Set @sZ = (Select PosZ From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)

insert _HideANDSeek_Map(RegionID, x, Y ,Z , Place_Name)  
values(@SRegion,@sX, @sY,@sZ,@PlaceName)

- insert New Search And Destroy Place & MoB :
Kod:
/* Query To Insert A New Search And Destroy Place  

By Eslam Galal  
*/

    
    Declare @CharName VarChar(64)
    Declare @SRegion int  
    Declare @sX int  
    Declare @sY int  
    Declare @sZ int
    Declare @PlaceName VarChar(300)  
    Declare @MobID int
Set @CharName = 'AXA'  -- Character Name Which you wanna record it place
set @PlaceName = 'Jangan - Grassland'  -- New Place Name
Set @MobID = ( Select ID From SRO_VT_SHARD.dbo._RefobjCommon Where Codename128 like 'MOB_CH_TIGERWOMAN_L3')


Set @SRegion = (Select LatestRegion From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)
Set @sX = (Select PosX From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)
Set @sY = (Select PosY From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)
Set @sZ = (Select PosZ From SRO_VT_SHARD.dbo._Char Where CharName16 like @CharName)

insert _SnD_Map(RegionID, x, Y ,Z , Place_Name,UNIQUE_ID)  
values(@SRegion,@sX, @sY,@sZ,@PlaceName,@MobID)

Ödülü nasıl değiştirebilirim?

gyE7gN.jpg

YJmnMZ.jpg

Web Silk:
Alıntı:USE [SRO_VT_ACCOUNT]
GO
/****** Object: StoredProcedure [CGI].[CGI_WebPurchaseSilk] Script Date: 10/4/2015 10:48:45 AM ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER OFF
GO

ALTER PROCEDURE [CGI].[CGI_WebPurchaseSilk]
@OrderID VARCHAR(25),
@UserID VARCHAR(25),
@PkgID INT,
@NumSilk INT,
@Price INT
as
DECLARE @UserJID INT
DECLARE @SilkRemain INT
--DECLARE @PointRemain INT
SET @UserJID = CGI.getUserJID(@UserID)
IF( @UserJID >= 0)
BEGIN
IF( not exists( SELECT OrderNumber from SK_SilkBuyList where OrderNumber = @OrderID))
BEGIN
BEGIN TRANSACTION
IF( not exists( SELECT * from SK_Silk where JID = @UserJID))
BEGIN
INSERT SK_Silk(JID,silk_own,silk_gift,silk_Point)VALUES(@UserJID,@NumSilk,0,0)
--INSERT Silk Own
INSERT SK_SilkChange_BY_Web(JID,silk_remain,silk_offset,silk_type,reason) VALUES(@UserJID,@NumSilk,@NumSilk,0,0)
END
ELSE
BEGIN
SET @SilkRemain = CGI.getSilkOwn(@UserJID)
UPDATE SK_Silk SET silk_own = silk_own + @NumSilk WHERE JID = @UserJID
--INSERT Silk Own
INSERT SK_SilkChange_BY_Web(JID,silk_remain,silk_offset,silk_type,reason) VALUES(@UserJID,@SilkRemain + @NumSilk,@NumSilk,0,0)
END
IF (@@error <> 0 or @@rowcount = 0)
BEGIN
SELECT Result = "FAIL"
ROLLBACK TRANSACTION
RETURN
END
SELECT Result = "SUCCESS"
COMMIT TRANSACTION
RETURN
END
ELSE --else if order
BEGIN
SELECT Result = "ORDEREXIST"
END
END
ELSE
BEGIN
SELECT Result = "NOUSER"
RETURN
END




SET QUOTED_IDENTIFIER OFF


Selam Musa Bildiğim Kadarı ile Ücretli Olması Gerekiyor Bu Yazılım Doğrumu Free Sürümünde 3 Fonksiyon Açık Diye Biliyorum
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  vSro Teleport Taşı Ekleme Programı Server Edit 0 17 9 saat önce
Son Yorum: Server Edit
  vSro Server Status Server Edit 7 112 11.10.2017, Saat: 09:35
Son Yorum: Server Edit
  Vsro Npc Ekledikten sonra Dc sorunu adem2836 4 57 09.10.2017, Saat: 02:15
Son Yorum: adem2836
  NPC Kopyalama Programı doncarlone 2 136 20.09.2017, Saat: 17:56
Son Yorum: by_hero

Hızlı Menü:



[-]
monetization_on Reklam (728x90)
Reklam vermek istiyorum?