| Mirage Source http://web.miragesource.net/forums/ |
|
| Spell Issue http://web.miragesource.net/forums/viewtopic.php?f=201&t=4826 |
Page 1 of 1 |
| Author: | DarkX [ Fri Dec 05, 2008 9:23 pm ] |
| Post subject: | Spell Issue |
Ok I was poking around in MS3.0.3 and started programing some spell projects, and I noticed a issue with the spell editor. The give item fra has issues, the scrllevelreq does not set the level, the scrlitemnum actually sets the players required level. Any idea how to fix it? |
|
| Author: | Rian [ Fri Dec 05, 2008 10:16 pm ] |
| Post subject: | Re: Spell Issue |
A vanilla 3.0.3 shouldn't have so many issues regarding the spell editor. The only real problem it had was the levelReq, and there's a tutorial around here somewhere that describes how to fix it. |
|
| Author: | DarkX [ Sat Dec 06, 2008 1:21 am ] |
| Post subject: | Re: Spell Issue |
I applied that tut, this is the first time I have tried to edit spells since, and that's the issue that came up. |
|
| Author: | Tony [ Sat Dec 06, 2008 3:20 am ] |
| Post subject: | Re: Spell Issue |
Well, test a 3.03 vanilla then yeah? |
|
| Author: | DarkX [ Sat Dec 06, 2008 5:20 pm ] |
| Post subject: | Re: Spell Issue |
Hey I tried out a basic MS3.0.3 and it's the same as the version I am using. same issue with the scrolling bars. |
|
| Author: | Tony [ Sat Dec 06, 2008 5:46 pm ] |
| Post subject: | Re: Spell Issue |
Give me your SpellEditorInit and SpellEditorOk subs |
|
| Author: | DarkX [ Sat Dec 06, 2008 7:19 pm ] |
| Post subject: | Re: Spell Issue |
This is both of my subs I have done no change to either Code: Public Sub SpellEditorInit() On Error Resume Next Dim I As Long frmSpellEditor.cmbClassReq.AddItem "All Classes" For I = 0 To Max_Classes frmSpellEditor.cmbClassReq.AddItem Trim(Class(I).name) Next I frmSpellEditor.txtName.Text = Trim(Spell(EditorIndex).name) frmSpellEditor.cmbClassReq.ListIndex = Spell(EditorIndex).ClassReq frmSpellEditor.scrlLevelReq.Value = Spell(EditorIndex).LevelReq frmSpellEditor.cmbType.ListIndex = Spell(EditorIndex).Type If Spell(EditorIndex).Type <> SPELL_TYPE_GIVEITEM Then frmSpellEditor.fraVitals.Visible = True frmSpellEditor.fraGiveItem.Visible = False frmSpellEditor.scrlVitalMod.Value = Spell(EditorIndex).Data1 Else frmSpellEditor.fraVitals.Visible = False frmSpellEditor.fraGiveItem.Visible = True frmSpellEditor.scrlItemNum.Value = Spell(EditorIndex).Data1 frmSpellEditor.scrlItemValue.Value = Spell(EditorIndex).Data2 End If If Spell(EditorIndex).Type = SPELL_TYPE_WARP Then frmSpellEditor.fraVitals.Visible = False frmSpellEditor.fraGiveItem.Visible = False frmSpellEditor.fraWarp.Visible = True frmSpellEditor.scrlMapNum.Value = Spell(EditorIndex).Data1 frmSpellEditor.scrlMapX.Value = Spell(EditorIndex).Data2 frmSpellEditor.scrlMapY.Value = Spell(EditorIndex).Data3 frmSpellEditor.lblMapNum.Caption = frmSpellEditor.scrlMapNum.Value frmSpellEditor.lblMapX.Caption = frmSpellEditor.scrlMapX.Value frmSpellEditor.lblMapY.Caption = frmSpellEditor.scrlMapY.Value End If frmSpellEditor.Show vbModal End Sub Code: Public Sub SpellEditorOk()
Spell(EditorIndex).name = frmSpellEditor.txtName.Text Spell(EditorIndex).ClassReq = frmSpellEditor.cmbClassReq.ListIndex Spell(EditorIndex).LevelReq = frmSpellEditor.scrlLevelReq.Value Spell(EditorIndex).Type = frmSpellEditor.cmbType.ListIndex If Spell(EditorIndex).Type <> SPELL_TYPE_GIVEITEM Then Spell(EditorIndex).Data1 = frmSpellEditor.scrlVitalMod.Value Else Spell(EditorIndex).Data1 = frmSpellEditor.scrlItemNum.Value Spell(EditorIndex).Data2 = frmSpellEditor.scrlItemValue.Value End If Spell(EditorIndex).Data3 = 0 If Spell(EditorIndex).Type = SPELL_TYPE_WARP Then Spell(EditorIndex).Data1 = frmSpellEditor.scrlMapNum.Value Spell(EditorIndex).Data2 = frmSpellEditor.scrlMapX.Value Spell(EditorIndex).Data3 = frmSpellEditor.scrlMapY.Value End If Call SendSaveSpell(EditorIndex) InSpellEditor = False Unload frmSpellEditor End Sub |
|
| Page 1 of 1 | All times are UTC |
| Powered by phpBB® Forum Software © phpBB Group https://www.phpbb.com/ |
|