PLEASE HELP ME WITH THIS… CURRENT STATE: -when I type /ssj I turn in to a super saiyan (< good thing) -when I type /ssj and then again /ssj (I have the same txt and when I type /ssj for the third time its again the same txt ... etc ( Select Case LCase(Trim(TextSay)) > Case "/ssj" > Call player_transform(index, 2) > Exit Sub V - THIS IS A MAIN CODE > Sub player_transform(index, creature) > '******************************** > On Error Resume next > Dim x > Dim transformed > Dim first > transformed=0 > > transformed=GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "Is_creature") > > If transformed= 0 Then > > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "player_level", GetPlayerLevel(index)) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "player_exp", GetPlayerExp(index)) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "player_strength", GetPlayerSTR(index)) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "player_defence", GetPlayerDEF(index)) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "player_magic", GetPlayerMAGI(index)) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "player_points", GetPlayerPoints(index)) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "player_sprite", GetPlayersprite(index)) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "is_creature", Int(creature)) > > first=GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_first") > > If first 0 Then > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_first", 1) > End If > > Select Case creature > > Case 1 > > If first=1 Then > > Call SetPlayerSprite(index, 35) > Call SetPlayerPoints(index, 0) > Call SetPlayerMAGI(index, 100) > Call SetPlayerDEF(index, 100) > Call SetPlayerSTR(index, 100) > Call SetPlayerExp(index, 0) > Call SetPlayerLevel(index, 1) > Call sendplayerdata(index) > Call playermsg(index, "You have become a Super Saiyan for the first time", 14) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_first", 0) > > Else > > Call SetPlayerSprite(index, GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_sprite")) > Call SetPlayerPoints(index, getVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_points")) > Call SetPlayerMAGI(index, getVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_magic")) > Call SetPlayerDEF(index, getVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_defence")) > Call SetPlayerSTR(index, getVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_strength")) > Call SetPlayerExp(index, GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_exp")) > Call SetPlayerLevel(index, GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_level")) > Call sendplayerdata(index) > Call playermsg(index, "You have become a Super Saiyan once again", 14) > > End If > > Case 2 > > If first=1 Then > > Call SetPlayerSprite(index, 35 ) > Call SetPlayerPoints(index, 0) > Call SetPlayerMAGI(index, 100) > Call SetPlayerDEF(index, 100) > Call SetPlayerSTR(index, 100) > Call SetPlayerExp(index, 0) > Call SetPlayerLevel(index, 1) > Call sendplayerdata(index) > Call playermsg(index, "You Fell Anger inside of U…U fell energy flowing trough U...AGRHHHHHHHHHHHHH!!!...U are in SUPER SAIYAN STATE NOW!!!", 14) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_first", 0) > > Else > > Call SetPlayerSprite(index, GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_sprite")) > Call SetPlayerPoints(index, getVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_points")) > Call SetPlayerMAGI(index, getVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_magic")) > Call SetPlayerDEF(index, getVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_defence")) > Call SetPlayerSTR(index, getVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_strength")) > Call SetPlayerExp(index, GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_exp")) > Call SetPlayerLevel(index, GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_level")) > Call sendplayerdata(index) > Call playermsg(index, "Your thirst for blood bothers you again. Time to feed", 14) > > End If > > End Select > > Else > > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_level", GetPlayerLevel(index)) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_exp", GetPlayerExp(index)) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_strength", GetPlayerSTR(index)) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_defence", GetPlayerDEF(index)) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_magic", GetPlayerMAGI(index)) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_points", GetPlayerPoints(index)) > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", Int(creature) & "_creature_sprite", GetPlayersprite(index)) > > x=GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "player_sprite") > Call SetPlayerSprite(index, Int(x)) > > x=GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "player_points") > Call SetPlayerPoints(index, Int(x)) > > x=GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "player_magic") > Call SetPlayerMAGI(index, Int(x)) > > x=GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "player_defence") > Call SetPlayerDEF(index, Int(x)) > > x=GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "player_magic") > Call SetPlayerSTR(index, Int(x)) > > x=GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "player_exp") > Call SetPlayerExp(index, Int(x)) > > x=GetVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "player_level") > Call SetPlayerLevel(index, Int(x)) > > Call PutVar("scripts\charextras\" & trim(GetPlayerName(index)) & ".ini", "TRANSFORMS", "is_creature", 0) > > Call SendStats(index) > Call SendMP(index) > Call SendHP(index) > Call sendplayerdata(index) > Call playermsg(index, "You have reverted to your true form.", 14) > > End If > > End Sub NOW TELL ME WHAT TO DOOOOO :|