Welcome!

Join our community of MMO enthusiasts and game developers! By registering, you'll gain access to discussions on the latest developments in MMO server files and collaborate with like-minded individuals. Join us today and unlock the potential of MMO server development!

Join Today!

Character Creator Source Code 9 Classes

Joined
May 28, 2014
Messages
75
Reaction score
148
Hello everyone, lately there have been a lot of scammers who sell/trade my files
Therefore, I decided to post the source codes here to the RZ.

If someone has questions, something does not work, you can ask in this thread, build the project in the Release\x86 configuration !!!

(VISUAL STUDIO 2022)

Release\x86 configuration
1681391137576 - Character Creator Source Code 9 Classes - RaGEZONE Forums

$links = [
Source Code => ,
GitHub => ,
Maybe needle files => ,
];

SQL CODE :
SQL:
CREATE PROCEDURE [dbo].[cabal_sp_newchar] ( @Name VARCHAR(16), @CharacterIdx INT, @Style INT, @StyleMastery INT ) AS BEGIN SET NOCOUNT ON DECLARE @CR_SUCCESS INT DECLARE @CR_DATABRK INT DECLARE @CR_NAMEDUP INT DECLARE @CR_BADWORD INT DECLARE @StyleMasteryTemp INT DECLARE @StyleByte VARCHAR(2) SET @CR_SUCCESS = 0xA0 SET @CR_DATABRK = 0x02 SET @CR_NAMEDUP = 0x03 SET @CR_BADWORD = 0x04 SET @StyleMasteryTemp = @StyleMastery SET @StyleByte = SUBSTRING(master.dbo.fn_varbintohexstr(@Style), 3, 2) IF NOT @StyleMastery BETWEEN 1 AND 6 BEGIN SELECT @CR_DATABRK RETURN END IF EXISTS (SELECT * FROM cabal_badwoard WHERE badword = @Name ) BEGIN SELECT @CR_BADWORD RETURN END IF EXISTS (SELECT * FROM cabal_character_table WHERE Name = @Name) BEGIN SELECT @CR_NAMEDUP RETURN END IF EXISTS (SELECT * FROM cabal_character_table WHERE CharacterIdx = @CharacterIdx) BEGIN SELECT @CR_DATABRK RETURN END IF (@StyleByte = '40' OR @StyleByte = '44') SET @StyleMasteryTemp = 9; IF (@StyleByte = '30' OR @StyleByte = '34') SET @StyleMasteryTemp = 8; IF (@StyleByte = '20' OR @StyleByte = '24') SET @StyleMasteryTemp = 7; SET XACT_ABORT ON BEGIN TRAN INSERT INTO cabal_character_table ( CharacterIdx, Name, LEV, [EXP], [STR], DEX, [INT], PNT, Rank, Alz, WorldIdx, [Position], Style, HP, MP, SP, SwdPNT, MagPNT, RankEXP, Flags, WarpBField, MapsBField, ClassStyle ) SELECT @CharacterIdx, @Name, LEV, [EXP], [STR] , [DEX] , [INT] , [PNT] , Rank , Alz, WorldIdx, Position, @Style +152, HP, MP, SP, 999999999, 999999999, RankEXP, Flags, 2097151, 2097151, ClassType FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp update cabal_character_table set reputation = 10000000 , PNT = 300 where CharacterIdx = @CharacterIdx IF @@ROWCOUNT <> 1 BEGIN ROLLBACK TRAN SELECT @CR_DATABRK RETURN END INSERT INTO cabal_inventory_table (CharacterIdx, Data) SELECT @CharacterIdx, InventoryData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_equipment_table (CharacterIdx, Data) SELECT @CharacterIdx, EquipmentData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_skilllist_table (CharacterIdx, Data) SELECT @CharacterIdx, SkillData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_quickslot_table (CharacterIdx, Data) SELECT @CharacterIdx, QuickSlotData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_questdata_table (characterIdx, Data, Flags) SELECT @CharacterIdx, QuestData, QuestFlagsData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_soul_ability_table (characterIdx, PassiveAbilityData) SELECT @CharacterIdx, PassiveAbilityData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO AnderSystems.dbo.cabal_wing_table (CharacterIdx, Name, WingPoint, WingType) VALUES( @CharacterIdx, @Name, 0, 0) EXEC cabal_sp_linked_update_character_count @CharacterIdx, 1 SELECT @CR_SUCCESS + @StyleMastery EXEC SERVER01.dbo.cabal_sp_mail_send_GM @CHARACTERIDX, 'WELCOME', 'Welcome to CABAL Classic! Activate Wings, when you need to renew your wing buff just relog :)', 3158, 1, 0 EXEC SERVER01.dbo.cabal_sp_mail_send_GM @CHARACTERIDX, 'WELCOME', 'Welcome to CABAL Classic! Claim your free Blessing Bead Plus!', 5478, 0, 9 COMMIT TRAN SET XACT_ABORT OFF SET NOCOUNT OFF END

P.S. If you make any modifications please post them here or create a PR on github, this is now an open source project
 

Attachments

You must be registered for see attachments list
Last edited:
Newbie Spellweaver
Joined
Mar 21, 2019
Messages
17
Reaction score
2
:)

1681390255702 - Character Creator Source Code 9 Classes - RaGEZONE Forums
 

Attachments

You must be registered for see attachments list
Joined
Jan 10, 2018
Messages
4
Reaction score
0
Hello everyone, lately there have been a lot of scammers who sell/trade my files
Therefore, I decided to post the source codes here to the RZ.

If someone has questions, something does not work, you can ask in this thread, build the project in the Release\x86 configuration


$links = [
Source Code => ,
Maybe needle files => ,
];

SQL CODE :
SQL:
CREATE PROCEDURE [dbo].[cabal_sp_newchar] ( @Name VARCHAR(16), @CharacterIdx INT, @Style INT, @StyleMastery INT ) AS BEGIN SET NOCOUNT ON DECLARE @CR_SUCCESS INT DECLARE @CR_DATABRK INT DECLARE @CR_NAMEDUP INT DECLARE @CR_BADWORD INT DECLARE @StyleMasteryTemp INT DECLARE @StyleByte VARCHAR(2) SET @CR_SUCCESS = 0xA0 SET @CR_DATABRK = 0x02 SET @CR_NAMEDUP = 0x03 SET @CR_BADWORD = 0x04 SET @StyleMasteryTemp = @StyleMastery SET @StyleByte = SUBSTRING(master.dbo.fn_varbintohexstr(@Style), 3, 2) IF NOT @StyleMastery BETWEEN 1 AND 6 BEGIN SELECT @CR_DATABRK RETURN END IF EXISTS (SELECT * FROM cabal_badwoard WHERE badword = @Name ) BEGIN SELECT @CR_BADWORD RETURN END IF EXISTS (SELECT * FROM cabal_character_table WHERE Name = @Name) BEGIN SELECT @CR_NAMEDUP RETURN END IF EXISTS (SELECT * FROM cabal_character_table WHERE CharacterIdx = @CharacterIdx) BEGIN SELECT @CR_DATABRK RETURN END IF (@StyleByte = '40' OR @StyleByte = '44') SET @StyleMasteryTemp = 9; IF (@StyleByte = '30' OR @StyleByte = '34') SET @StyleMasteryTemp = 8; IF (@StyleByte = '20' OR @StyleByte = '24') SET @StyleMasteryTemp = 7; SET XACT_ABORT ON BEGIN TRAN INSERT INTO cabal_character_table ( CharacterIdx, Name, LEV, [EXP], [STR], DEX, [INT], PNT, Rank, Alz, WorldIdx, [Position], Style, HP, MP, SP, SwdPNT, MagPNT, RankEXP, Flags, WarpBField, MapsBField, ClassStyle ) SELECT @CharacterIdx, @Name, LEV, [EXP], [STR] , [DEX] , [INT] , [PNT] , Rank , Alz, WorldIdx, Position, @Style +152, HP, MP, SP, 999999999, 999999999, RankEXP, Flags, 2097151, 2097151, ClassType FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp update cabal_character_table set reputation = 10000000 , PNT = 300 where CharacterIdx = @CharacterIdx IF @@ROWCOUNT <> 1 BEGIN ROLLBACK TRAN SELECT @CR_DATABRK RETURN END INSERT INTO cabal_inventory_table (CharacterIdx, Data) SELECT @CharacterIdx, InventoryData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_equipment_table (CharacterIdx, Data) SELECT @CharacterIdx, EquipmentData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_skilllist_table (CharacterIdx, Data) SELECT @CharacterIdx, SkillData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_quickslot_table (CharacterIdx, Data) SELECT @CharacterIdx, QuickSlotData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_questdata_table (characterIdx, Data, Flags) SELECT @CharacterIdx, QuestData, QuestFlagsData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_soul_ability_table (characterIdx, PassiveAbilityData) SELECT @CharacterIdx, PassiveAbilityData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO AnderSystems.dbo.cabal_wing_table (CharacterIdx, Name, WingPoint, WingType) VALUES( @CharacterIdx, @Name, 0, 0) EXEC cabal_sp_linked_update_character_count @CharacterIdx, 1 SELECT @CR_SUCCESS + @StyleMastery EXEC SERVER01.dbo.cabal_sp_mail_send_GM @CHARACTERIDX, 'WELCOME', 'Welcome to CABAL Classic! Activate Wings, when you need to renew your wing buff just relog :)', 3158, 1, 0 EXEC SERVER01.dbo.cabal_sp_mail_send_GM @CHARACTERIDX, 'WELCOME', 'Welcome to CABAL Classic! Claim your free Blessing Bead Plus!', 5478, 0, 9 COMMIT TRAN SET XACT_ABORT OFF SET NOCOUNT OFF END
[/QUOTE]
Is there a complete tutorial for beginners on how to compile?

Is there a complete tutorial for beginners on how to compile?
 
Newbie Spellweaver
Joined
Dec 6, 2014
Messages
8
Reaction score
6
Hello everyone, lately there have been a lot of scammers who sell/trade my files
Therefore, I decided to post the source codes here to the RZ.

If someone has questions, something does not work, you can ask in this thread, build the project in the Release\x86 configuration


$links = [
Source Code => ,
Maybe needle files => ,
];

SQL CODE :
SQL:
CREATE PROCEDURE [dbo].[cabal_sp_newchar] ( @Name VARCHAR(16), @CharacterIdx INT, @Style INT, @StyleMastery INT ) AS BEGIN SET NOCOUNT ON DECLARE @CR_SUCCESS INT DECLARE @CR_DATABRK INT DECLARE @CR_NAMEDUP INT DECLARE @CR_BADWORD INT DECLARE @StyleMasteryTemp INT DECLARE @StyleByte VARCHAR(2) SET @CR_SUCCESS = 0xA0 SET @CR_DATABRK = 0x02 SET @CR_NAMEDUP = 0x03 SET @CR_BADWORD = 0x04 SET @StyleMasteryTemp = @StyleMastery SET @StyleByte = SUBSTRING(master.dbo.fn_varbintohexstr(@Style), 3, 2) IF NOT @StyleMastery BETWEEN 1 AND 6 BEGIN SELECT @CR_DATABRK RETURN END IF EXISTS (SELECT * FROM cabal_badwoard WHERE badword = @Name ) BEGIN SELECT @CR_BADWORD RETURN END IF EXISTS (SELECT * FROM cabal_character_table WHERE Name = @Name) BEGIN SELECT @CR_NAMEDUP RETURN END IF EXISTS (SELECT * FROM cabal_character_table WHERE CharacterIdx = @CharacterIdx) BEGIN SELECT @CR_DATABRK RETURN END IF (@StyleByte = '40' OR @StyleByte = '44') SET @StyleMasteryTemp = 9; IF (@StyleByte = '30' OR @StyleByte = '34') SET @StyleMasteryTemp = 8; IF (@StyleByte = '20' OR @StyleByte = '24') SET @StyleMasteryTemp = 7; SET XACT_ABORT ON BEGIN TRAN INSERT INTO cabal_character_table ( CharacterIdx, Name, LEV, [EXP], [STR], DEX, [INT], PNT, Rank, Alz, WorldIdx, [Position], Style, HP, MP, SP, SwdPNT, MagPNT, RankEXP, Flags, WarpBField, MapsBField, ClassStyle ) SELECT @CharacterIdx, @Name, LEV, [EXP], [STR] , [DEX] , [INT] , [PNT] , Rank , Alz, WorldIdx, Position, @Style +152, HP, MP, SP, 999999999, 999999999, RankEXP, Flags, 2097151, 2097151, ClassType FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp update cabal_character_table set reputation = 10000000 , PNT = 300 where CharacterIdx = @CharacterIdx IF @@ROWCOUNT <> 1 BEGIN ROLLBACK TRAN SELECT @CR_DATABRK RETURN END INSERT INTO cabal_inventory_table (CharacterIdx, Data) SELECT @CharacterIdx, InventoryData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_equipment_table (CharacterIdx, Data) SELECT @CharacterIdx, EquipmentData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_skilllist_table (CharacterIdx, Data) SELECT @CharacterIdx, SkillData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_quickslot_table (CharacterIdx, Data) SELECT @CharacterIdx, QuickSlotData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_questdata_table (characterIdx, Data, Flags) SELECT @CharacterIdx, QuestData, QuestFlagsData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO cabal_soul_ability_table (characterIdx, PassiveAbilityData) SELECT @CharacterIdx, PassiveAbilityData FROM cabal_new_character_data WHERE ClassType = @StyleMasteryTemp INSERT INTO AnderSystems.dbo.cabal_wing_table (CharacterIdx, Name, WingPoint, WingType) VALUES( @CharacterIdx, @Name, 0, 0) EXEC cabal_sp_linked_update_character_count @CharacterIdx, 1 SELECT @CR_SUCCESS + @StyleMastery EXEC SERVER01.dbo.cabal_sp_mail_send_GM @CHARACTERIDX, 'WELCOME', 'Welcome to CABAL Classic! Activate Wings, when you need to renew your wing buff just relog :)', 3158, 1, 0 EXEC SERVER01.dbo.cabal_sp_mail_send_GM @CHARACTERIDX, 'WELCOME', 'Welcome to CABAL Classic! Claim your free Blessing Bead Plus!', 5478, 0, 9 COMMIT TRAN SET XACT_ABORT OFF SET NOCOUNT OFF END
Thank you ☺
 
Back
Top