• Unfortunately, we have experienced significant hard drive damage that requires urgent maintenance and rebuilding. The forum will be a state of read only until we install our new drives and rebuild all the configurations needed. Please follow our Facebook page for updates, we will be back up shortly! (The forum could go offline at any given time due to the nature of the failed drives whilst awaiting the upgrades.) When you see an Incapsula error, you know we are in the process of migration.

Character Creator Source Code 9 Classes

Joined
May 28, 2014
Messages
75
Reaction score
145
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 !!!

INSTALL NEEDLE TOOLS (VISUAL STUDIO 2022)

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

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

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
 
Last edited:
Initiate Mage
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 => Download Link,
Maybe needle files => Download Link,
];

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
9
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 => Download Link,
Maybe needle files => Download Link,
];

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