Using the MessageBox function

Post » Mon Aug 23, 2010 1:31 am

I am updating the original Streamline to use combat FPS smoothing. I don't like the new Streamline released a few days ago because it is not as robust as the original. I finished every other thing except updating the main menu. Problem is the CS doesn't like the way Jaga formatted the MessageBox text. It won't let me save, keeps giving errors. So how did the author get the CS to save when he originally made the mod? I don't understand. Did he use a workaround somehow? Here's the script:

scn SLMainMenuScriptfloat fQuestDelayTimeshort Mshort Bshort Dshort mBshort Xfloat fTempshort sTempBegin GameMode  if D == 1    set D to 0    if M == -1      set X to 0      set M to 0      set D to 1      StopQuest SLMainMenu      return    elseif M == 0      MessageBox "Main Menu               Streamline v3.1==================================" "Turn Features On/Off" "Edit Settings" "Special Actions" "* Fast-Quit *" "[ About ]" "Exit Menu"    elseif M == 1      MessageBox "Main > Toggle Features On/Off=====================================    Streampurge [%0.f]    Streamsmooth [%0.f]      Streamsave [%0.f]    Streamsight [%0.f]" SLv.Purging SLv.FPSsmoothing SLv.Streamsaving SLv.Streamsight "Streampurge" "Sreamsmooth" "Streamsave" "Streamsight" "[ Help ]" "< Back"    elseif M == 2      MessageBox "Main > Edit Feature Settings=====================================" "Streampurge" "Streamsmooth" "Streamsave" "Streamsight" "Streamview" "Other Settings" "[ Help ]" "< Back"    elseif M == 3      MessageBox "Main > Benchmark Oblivion==================================" "Streambench" "[ Help ]" "< Back"    elseif M == 4      MessageBox "Initialized!" "Okay"    elseif M == 5      set D to 2      SLTomeOfKnowledgea.activate player    elseif M == 6      set D to 2      SLhelp6a.activate player    elseif M == 7      MessageBox "Main > Special Actions=====================================" "Initialize with INI Values" "Open Tome of Knowledge" "[ Help ]" "< Back"    elseif M == 8      MessageBox "Main > Settings > Purging=====================================Travel/Zone [%.0f]       Wait [%.0f]       Sleep [%.0f]" SLv.PurgeOnTravel SLv.PurgeOnWait SLv.PurgeOnSleep "Change Mode" "Purge on travel/zone" "Purge on wait" "Purge on sleep" "[ Help ]" "< Back"    elseif M == 9      MessageBox "Main > Settings > FPS Smoothing=====================================" "FPS Settings" "vLOD Settings" "Detail Settings" "[ Help ]" "< Back"    elseif M == 10      MessageBox "Main > Settings > Streamsaves=====================================" "Save Timer" "Save Slots" "Save Protection" "Save Options" "Other Settings" "[ Help ]" "< Back"    elseif M == 11      MessageBox "Main > Settings > Miscellaneous===================================== Kill Corpses [%.0f]         Debug Messages [%.0f]" SLKillCorpses SLdebug "Kill Corpses" "Debug Messages" "[ Help ]" "< Back"    elseif M == 12      MessageBox "Main > Settings > Purging > Mode===================================== Current Mode [%.0f]" SLh.SLmode "(1) Maximum" "(2) High" "(3) Performance" "(4) Normal" "(5) Lite" "(6) Ultra Lite" "[ Help ]" "< Back"    elseif M == 13      MessageBox "Main > Settings > FPS Smoothing > FPS===================================== Min FPS [%.0f]                    Max FPS [%.0f]" SLfpsmon.Low SLfpsmon.High "Min FPS +1" "Min FPS -1" "Max FPS +1" "Max FPS -1" "[ Help ]" "< Back"    elseif M == 14      MessageBox "Main > Settings > FPS Smoothing > vLOD===================================== Min vLOD [%.0f]                 Max vLOD [%.0f]" SLv.minVLOD SLv.maxVLOD "Min vLOD +1" "Min vLOD -1" "Max vLOD +1" "Max vLOD -1" "[ Help ]" "< Back"    elseif M == 15      MessageBox "Main > Settings > Smoothing > Auto===================================== Details [%.0f]          Grass [%.0f]          Trees [%.0f]    Lights/Shadows [%.0f]         Objects [%.0f]                   Water [%.0f]" SLv.setDetail SLv.setGrass SLv.setTrees SLv.setLightShadow SLv.setObjects SLv.setWater "Detail" "Grass" "Trees" "Lights/Shadows" "Objects" "Water" "[ Help ]" "< Back"    elseif M == 16      MessageBox "Main > Settings > Streamsaves > Timer===================================== Save Interval [%.0f]" SLv.SaveTimer "Save Interval +30" "Save Interval +10" "Save Interval +1" "Save Interval -1" "Save Interval -10" "Save Interval -30" "[ Help ]" "< Back"    elseif M == 17      MessageBox "Main > Settings > Streamsaves > Slots===================================== Save Slots [%.0f]" SLv.NumSaveSlots "Save Slots +1" "Save Slots -1" "[ Help ]" "< Back"    elseif M == 18      MessageBox "Main > Settings > Streamsaves > Protect=====================================Combat [%.0f]   Yield [%.0f]   Harmful Areas [%.0f]    Low Health [%.0f]         Trespassing [%.0f]                     Swimming [%.0f]" SLv.DuringCombat SLv.WhileYielding SLv.DangerousArea SLv.LowHealth SLv.AllowTrespass SLv.AllowSwimming "During Combat" "While Yielding" "In Harmful Areas" "When Health Low" "While Trespassing" "While Swimming" "[ Help ]" "< Back"    elseif M == 19      MessageBox "Main > Settings > Streamsaves > Options=====================================Interiors [%.0f]  Idle Only [%.0f]  Travel/Zone [%.0f] Wait/Sleep [%.0f]  Sneaking [%.0f]  Weapon [%.0f]                After Combat [%.0f]" SLv.InteriorOnly SLv.WhenIdleOnly SLv.AfterZone SLv.AfterWaitSleep SLv.AllowSneaking SLv.AllowWeapon SLv.AfterCombat "In interiors only" "When idle only" "After travel/zone" "After wait/sleep" "While sneaking" "With weapon out" "After Combat" "[ Help ]" "< Back"    elseif M == 20      MessageBox "Main > Settings > Streamsaves > Other===================================== Save Reminders [%.0f]   Lite Reminders [%.0f]  Play Sound [%.0f]    Gag Save Message [%.0f]Secure Autosaves [%.0f]  Purge Before Save [%.0f]" SLv.SaveReminders SLv.UseLiteReminders SLv.PlaySoundOnSave SLv.GagAutoSaves SLv.SecureAutoSaves SLv.PurgeBeforeSave "Sound on Save" "Gag Autosave Message" "Save Reminder Use" "Lite Version of Reminders" "Secure Autosave Use" "Purge Before Save" "[ Help ]" "< Back"    elseif M == 21      set D to 2      SLhelp21a.activate player    elseif M == 22      set D to 2      SLhelp22a.activate player    elseif M == 23      set D to 2      SLhelp23a.activate player    elseif M == 24      set D to 2      SLhelp24a.activate player    elseif M == 25      set D to 2      SLhelp25a.activate player    elseif M == 26      set D to 2      SLhelp26a.activate player    elseif M == 27      set D to 2      SLhelp27a.activate player    elseif M == 28      set D to 2      SLhelp28a.activate player    elseif M == 29      set D to 2      SLhelp29a.activate player    elseif M == 30      set D to 2      SLhelp30a.activate player    elseif M == 31      set D to 2      SLhelp31a.activate player    elseif M == 32      set D to 2      SLhelp32a.activate player    elseif M == 33      set D to 2      SLhelp33a.activate player    elseif M == 34      set D to 2      SLhelp34a.activate player    elseif M == 35      set D to 2      SLhelp35a.activate player    elseif M == 36      set D to 2      SLhelp36a.activate player    elseif M == 37      set D to 2      SLhelp37a.activate player    elseif M == 38      MessageBox "Main > Settings > Change FOV=====================================         Auto FOV [%.0f]          FOV [%0.f]               FOV in Dialogs [%.0f]" SLv.slFOVauto SLfov SLv.FOVInDialogs "Toggle Automatic" "Increase +5" "Decrease -5" "Toggle in Dialogs" "[ Help ]" "< Back"    elseif M == 39      set D to 2      SLhelp39a.activate player    elseif M == 40      MessageBox "============ Streamsight ============   Min Land [%.0f]   Max Land [%.0f]   Min Water [%.0f]   Max Water [%.0f] Extreme Clipping [%.0f]  Fog Update Spd [%.0f]" SLv.MinDistanceFog SLv.MaxDistanceFog SLv.MinWaterFog SLv.MaxWaterFog SLv.ExtremeClipping SLv.FogUpdateFrequency "Edit Land Fog" "Set Recommended Land Fog" "Edit Water Fog" "Set Recommended Water Fog" "Toggle Extreme Clipping" "Fog Update Speed +1" "Fog Update Speed -1" "[ Help ]" "< Back"    elseif M == 41      MessageBox "Min Land Fog [%.0f]  Max Land Fog [%.0f]" SLv.MinDistanceFog SLv.MaxDistanceFog "Min +2000" "Min -2000" "Max +2000" "Max -2000" "< Back"    elseif M == 42      MessageBox "Min Water Fog [%.0f]  Max Water Fog [%.0f]" SLv.MinWaterFog SLv.MaxWaterFog "Min +250" "Min -250" "Max +250" "Max -250" "< Back"    elseif M == 43    	set D to 2    	SLhelp43a.activate player    endif  endif  if D == 0    set B to GetButtonPressed    if B == -1      return    else      set D to 1      if M == 0        if B == 0          set M to 1        elseif B == 1          set M to 2        elseif B == 2          set M to 7        elseif B == 3          if SLv.SaveBeforeFastQuit == 0            con_QuitGame          else            StopQuest SLMainMenu            set SLsaveh.FastQuit to 1            set SLsaveh.HotkeySave to 1            message "Streamsaving..."            set SLsaveh.ForceSave to 1          endif        elseif B == 4          set M to 6        elseif B == 5          set M to -1        endif      elseif M == 1        if B == 0          set SLv.Purging to (SLv.Purging == 0)        elseif B == 1          set SLv.FPSsmoothing to (SLv.FPSsmoothing == 0)        elseif B == 2          set SLv.Streamsaving to (SLv.Streamsaving == 0)        elseif B == 3          set SLv.Streamsight to (SLv.Streamsight == 0)        elseif B == 4          set M to 21        elseif B == 5          set M to 0        endif      elseif M == 2        if B == 0          set M to 8        elseif B == 1          set M to 9        elseif B == 2          set M to 10        elseif B == 3          set M to 40        elseif B == 4          set M to 38        elseif B == 5          set M to 11        elseif B == 6          set M to 22        elseif B == 7          set M to 0        endif      elseif M == 4        if B == 0          set M to 7        endif      elseif M == 7        if B == 0          Message "Streamline initializing, please wait..."          StartQuest SLini          StopQuest SLMainMenu        elseif B == 1          set M to 5        elseif B == 2          set M to 37        elseif B == 3          set M to 0        endif      elseif M == 8        if B == 0          set M to 12        elseif B == 1          set SLv.PurgeOnTravel to (SLv.PurgeOnTravel == 0)        elseif B == 2          set SLv.PurgeOnWait to (SLv.PurgeOnWait == 0)        elseif B == 3          set SLv.PurgeOnSleep to (SLv.PurgeOnSleep == 0)        elseif B == 4          set M to 23        elseif B == 5          set M to 2        endif      elseif M == 9        if B == 0          set M to 13        elseif B == 1          set M to 14        elseif B == 2          set M to 15        elseif B == 3          set M to 25        elseif B == 4          set M to 2        endif      elseif M == 10        if B == 0          set M to 16        elseif B == 1          set M to 17        elseif B == 2          set M to 18        elseif B == 3          set M to 19        elseif B == 4          set M to 20        elseif B == 5          set M to 29        elseif B == 6          set M to 2        endif      elseif M == 11        if B == 0          set SLKillCorpses to (SLKillCorpses == 0)        elseif B == 1          set SLdebug to (SLdebug == 0)        elseif B == 2          set M to 35        elseif B == 3          set M to 2        endif      elseif M == 12        if B == 0          set SLh.SLmode to 1          set SLh.SLmin to 4          set SLh.SLmax to 8          set SLh.SLcache to 1          set SLh.SLforceat to 6          set SLh.SLthresh to 90        elseif B == 1          set SLh.SLmode to 2          set SLh.SLmin to 5          set SLh.SLmax to 10          set SLh.SLcache to 2          set SLh.SLforceat to 8          set SLh.SLthresh to 180        elseif B == 2          set SLh.SLmode to 3          set SLh.SLmin to 6          set SLh.SLmax to 12          set SLh.SLcache to 3          set SLh.SLforceat to 10          set SLh.SLthresh to 270        elseif B == 3          set SLh.SLmode to 4          set SLh.SLmin to 7          set SLh.SLmax to 14          set SLh.SLcache to 4          set SLh.SLforceat to 12          set SLh.SLthresh to 360        elseif B == 4          set SLh.SLmode to 5          set SLh.SLmin to 8          set SLh.SLmax to 16          set SLh.SLcache to 5          set SLh.SLforceat to 14          set SLh.SLthresh to 450        elseif B == 5          set SLh.SLmode to 6          set SLh.SLmin to 10          set SLh.SLmax to 20          set SLh.SLcache to 6          set SLh.SLforceat to 16          set SLh.SLthresh to 540        elseif B == 6          set M to 24        elseif B == 7          set M to 8        endif      elseif M == 13        if B == 0          set SLfpsmon.Low to SLfpsmon.Low + 1          if SLfpsmon.Low >= SLfpsmon.High            set SLfpsmon.Low to SLfpsmon.High - 1          endif        elseif B == 1          set SLfpsmon.Low to SLfpsmon.Low - 1          if SLfpsmon.Low < 1            set SLfpsmon.Low to 1          endif        elseif B == 2          set SLfpsmon.High to SLfpsmon.High + 1          if SLfpsmon.High > 100            set SLfpsmon.High to 100          endif        elseif B == 3          set SLfpsmon.High to SLfpsmon.High - 1          if SLfpsmon.High <= SLfpsmon.Low            set SLfpsmon.High to SLfpsmon.Low + 1          endif        elseif B == 4          set M to 26        elseif B == 5          set M to 9        endif        set SLfpsmon.CombatLow to SLfpsmon.Low + SLv.CombatFPS        set SLfpsmon.CombatHigh to SLfpsmon.High + SLv.CombatFPS      elseif M == 14        if B == 0          set SLv.minVLOD to SLv.minVLOD + 1          if SLv.minVLOD >= SLv.maxVLOD            set SLv.minVLOD to SLv.maxVLOD - 1          endif        elseif B == 1          set SLv.minVLOD to SLv.minVLOD - 1          if SLv.minVLOD < 0            set SLv.minVLOD to 0          endif        elseif B == 2          set SLv.maxVLOD to SLv.maxVLOD + 1          if SLv.maxVLOD > 100            set SLv.maxVLOD to 100          endif        elseif B == 3          set SLv.maxVLOD to SLv.maxVLOD - 1          if SLv.maxVLOD <= SLv.minVLOD            set SLv.maxVLOD to SLv.minVLOD + 1          endif        elseif B == 4          set M to 27        elseif B == 5          set M to 9        endif      elseif M == 15        if B == 0          set SLv.setDetail to (SLv.setDetail == 0)        elseif B == 1          set SLv.setGrass to (SLv.setGrass == 0)        elseif B == 2          set SLv.setTrees to (SLv.setTrees == 0)        elseif B == 3          set SLv.setLightShadow to (SLv.setLightShadow == 0)        elseif B == 4          set SLv.setObjects to (SLv.setObjects == 0)        elseif B == 5          set SLv.setWater to (SLv.setWater == 0)        elseif B == 6          set M to 28        elseif B == 7          set M to 9        endif      elseif M == 16        set sTemp to SLv.SaveTimer        set fTemp to (sTemp * 60) - SLsaveh.SaveCountdown        if B == 0          set SLv.SaveTimer to SLv.SaveTimer + 30          if SLv.SaveTimer > 360            set SLv.SaveTimer to 360          endif        elseif B == 1          set SLv.SaveTimer to SLv.SaveTimer + 10          if SLv.SaveTimer > 360            set SLv.SaveTimer to 360          endif        elseif B == 2          set SLv.SaveTimer to SLv.SaveTimer + 1          if SLv.SaveTimer > 360            set SLv.SaveTimer to 360          endif        elseif B == 3          set SLv.SaveTimer to SLv.SaveTimer - 1          if SLv.SaveTimer < 1            set SLv.SaveTimer to 1          endif        elseif B == 4          set SLv.SaveTimer to SLv.SaveTimer - 10          if SLv.SaveTimer < 1            set SLv.SaveTimer to 1          endif        elseif B == 5          set SLv.SaveTimer to SLv.SaveTimer - 30          if SLv.SaveTimer < 1            set SLv.SaveTimer to 1          endif        elseif B == 6          set M to 30        elseif B == 7          set M to 10        endif        if sTemp != SLv.SaveTimer          if SLsaveh.SaveCountdown - ((SLv.SaveTimer * 60) - fTemp) < 5            set SLsaveh.SaveCountdown to 10.0          else            set SLsaveh.SaveCountdown to (SLv.SaveTimer * 60) - fTemp          endif        endif      elseif M == 17        if B == 0          set SLv.NumSaveSlots to SLv.NumSaveSlots + 1          if SLv.NumSaveSlots > 60            set SLv.NumSaveSlots to 60          endif        elseif B == 1          set SLv.NumSaveSlots to SLv.NumSaveSlots - 1          if SLv.NumSaveSlots < 1            set SLv.NumSaveSlots to 1          endif        elseif B == 2          set M to 31        elseif B == 3          set M to 10        endif      elseif M == 18        if B == 0          set SLv.DuringCombat to (SLv.DuringCombat == 0)        elseif B == 1          set SLv.WhileYielding to (SLv.WhileYielding == 0)        elseif B == 2          set SLv.DangerousArea to (SLv.DangerousArea == 0)        elseif B == 3          set SLv.LowHealth to (SLv.LowHealth == 0)        elseif B == 4          set SLv.AllowTrespass to (SLv.AllowTrespass == 0)        elseif B == 5          set SLv.AllowSwimming to (SLv.AllowSwimming == 0)        elseif B == 6          set M to 32        elseif B == 7          set M to 10        endif      elseif M == 19        if B == 0          set SLv.InteriorOnly to (SLv.InteriorOnly == 0)        elseif B == 1          set SLv.WhenIdleOnly to (SLv.WhenIdleOnly == 0)        elseif B == 2          set SLv.AfterZone to (SLv.AfterZone == 0)        elseif B == 3          set SLv.AfterWaitSleep to (SLv.AfterWaitSleep == 0)        elseif B == 4          set SLv.AllowSneaking to (SLv.AllowSneaking == 0)        elseif B == 5          set SLv.AllowWeapon to (SLv.AllowWeapon == 0)        elseif B == 6          set SLv.AfterCombat to (SLv.AfterCombat == 0)        elseif B == 7          set M to 33        elseif B == 8          set M to 10        endif      elseif M == 20        if B == 0          set SLv.PlaySoundOnSave to (SLv.PlaySoundOnSave == 0)        elseif B == 1          set SLv.GagAutoSaves to (SLv.GagAutoSaves == 0)        elseif B == 2          set SLv.SaveReminders to (SLv.SaveReminders == 0)        elseif B == 3          set SLv.UseLiteReminders to (SLv.UseLiteReminders == 0)        elseif B == 4          set SLv.SecureAutoSaves to (SLv.SecureAutoSaves == 0)        elseif B == 5          set SLv.PurgeBeforeSave to (SLv.PurgeBeforeSave == 0)        elseif B == 6          set M to 34        elseif B == 7          set M to 10        endif      elseif M == 38      	if B == 0          set SLv.slFOVauto to (SLv.slFOVauto == 0)          set SLfog.sStatus to 0        elseif B == 1          set SLfov to SLfov + 5          if SLfov > 200            set SLfov to 200          endif          con_setcamerafov SLfov          set SLfog.sStatus to 0        elseif B == 2          set SLfov to SLfov - 5          if SLfov < 30            set SLfov to 30          endif          con_setcamerafov SLfov          set SLfog.sStatus to 0        elseif B == 3          set SLv.FOVInDialogs to (SLv.FOVInDialogs == 0)        elseif B == 4          set M to 39        elseif B == 5          set M to 2        endif      elseif M == 40        if B == 0          set M to 41        elseif B == 1          set sTemp to GetNumericIniSetting "uGridDistantCount:General"          set SLv.MinDistanceFog to sTemp*1000 + 5000          set SLv.MaxDistanceFog to sTemp*5000 + 11000       		set SLfog.sStatus to 0        elseif B == 2          set M to 42        elseif B == 3          set SLv.MinWaterFog to 0          set SLv.MaxWaterFog to 2500       		set SLfog.sStatus to 0        elseif B == 4          set SLv.ExtremeClipping to (SLv.ExtremeClipping == 0)        	if SLv.ExtremeClipping == 0        		con_SetFog 0 0        	endif       		set SLfog.sStatus to 0       	elseif B == 5       		if SLv.FogUpdateFrequency < 10       			set SLv.FogUpdateFrequency to SLv.FogUpdateFrequency + 1       		endif       	elseif B == 6       		if SLv.FogUpdateFrequency > 1       			set SLv.FogUpdateFrequency to SLv.FogUpdateFrequency - 1       		endif        elseif B == 7        	set M to 43        elseif B == 8          set M to 2        endif      elseif M == 41        if B == 0          set SLv.MinDistanceFog to SLv.MinDistanceFog + 2000.0          if SLv.MinDistanceFog >= SLv.MaxDistanceFog            set SLv.MinDistanceFog to SLv.MaxDistanceFog - 2000.0          endif        elseif B == 1          set SLv.MinDistanceFog to SLv.MinDistanceFog - 2000.0          if SLv.MinDistanceFog < 4000.0            set SLv.MinDistanceFog to 4000.0          endif        elseif B == 2          set SLv.MaxDistanceFog to SLv.MaxDistanceFog + 2000.0          if SLv.MaxDistanceFog > 200000.0            set SLv.MaxDistanceFog to 200000.0          endif        elseif B == 3          set SLv.MaxDistanceFog to SLv.MaxDistanceFog - 2000.0          if SLv.MaxDistanceFog <= SLv.MinDistanceFog            set SLv.MaxDistanceFog to SLv.MinDistanceFog + 2000.0          endif        elseif B == 4          set M to 40        endif        if B < 4 && SLv.Streamsight          con_SetFog SLv.MinDistanceFog SLv.MaxDistanceFog        endif      elseif M == 42        if B == 0          set SLv.MinWaterFog to SLv.MinWaterFog + 250.0          if SLv.MinWaterFog >= SLv.MaxWaterFog            set SLv.MinWaterFog to SLv.MaxWaterFog - 250.0          endif        elseif B == 1          set SLv.MinWaterFog to SLv.MinWaterFog - 250.0          if SLv.MinWaterFog < 0.0            set SLv.MinWaterFog to 0.0          endif        elseif B == 2          set SLv.MaxWaterFog to SLv.MaxWaterFog + 250.0          if SLv.MaxWaterFog > 10000.0            set SLv.MaxWaterFog to 10000.0          endif        elseif B == 3          set SLv.MaxWaterFog to SLv.MaxWaterFog - 250.0          if SLv.MaxWaterFog <= SLv.MinWaterFog            set SLv.MaxWaterFog to SLv.MinWaterFog + 250.0          endif        elseif B == 4          set M to 40        endif        if B < 4 && SLv.Streamsight          con_SetFog SLv.MinWaterFog SLv.MaxWaterFog        endif      endif    endif  elseif D == 2    set D to 1    if M == 5      set M to 0    elseif M == 6      set M to 0    elseif M == 21      set M to 1    elseif M == 22      set M to 2    elseif M == 23      set M to 8    elseif M == 24      set M to 12    elseif M == 25      set M to 9    elseif M == 26      set M to 13    elseif M == 27      set M to 14    elseif M == 28      set M to 15    elseif M == 29      set M to 10    elseif M == 30      set M to 16    elseif M == 31      set M to 17    elseif M == 32      set M to 18    elseif M == 33      set M to 19    elseif M == 34      set M to 20    elseif M == 35      set M to 11    elseif M == 36      set M to 3    elseif M == 37      set M to 7    elseif M == 39      set M to 38    elseif M == 43    	set M to 40    endif  endifEndBegin Menumode  set fQuestDelayTime to 0.001  if X == 0    if IsKeypressed2 257  ; rm      MenuTapKey 208      ; 200=Up, 208=down      set X to 1    endif  else    StopQuest SLMainMenu    MenuTapKey 28    set X to 0    set M to 0    set D to 1  endifEnd


Note how the text within the quotes on the MessageBox functions are spread out over multiple lines. That causes errors for me whenever I try to save. As of now, I haven't modified the main menu script. So how did the original author (Jaga) get the CS to save for him? Any help would be greatly appreciated.
User avatar
Katey Meyer
 
Posts: 3464
Joined: Sat Dec 30, 2006 10:14 pm

Post » Sun Aug 22, 2010 6:34 pm

Bump. I'm anxious to figure this one out. Sorry for the break in bumping policy.
User avatar
[Bounty][Ben]
 
Posts: 3352
Joined: Mon Jul 30, 2007 2:11 pm

Post » Mon Aug 23, 2010 2:04 am

Well, I made some modifications and I have a menu that is half-way working. I'm still having problems though. Here's the script:

scn SLMainMenuScriptfloat fQuestDelayTimeshort Mshort Bshort Dshort mBshort Xfloat fTempshort sTempBegin GameMode  if D == 1    set D to 0    if M == -1      set X to 0      set M to 0      set D to 1      StopQuest SLMainMenu      return    elseif M == 0      MessageBox "Main Menu ========================= Streamline v3.2" "Turn Features On/Off" "Edit Settings" "Special Actions" "* Fast-Quit *" "[ About ]" "Exit Menu"    elseif M == 1      MessageBox "Main > Toggle Features On/Off" "Streampurge [%.0f]" "Streamsmooth [%.0f]" "Streamsave [%.0f]" "Streamsight [%.0f]" "Streamfight [%.0f]" SLv.Purging SLv.FPSsmoothing SLv.Streamsaving SLv.Streamsight SLv.FightSmoothing "Streampurge" "Sreamsmooth" "Streamsave" "Streamsight" "Streamfight" "[ Help ]" "< Back"    elseif M == 2      MessageBox "Main > Edit Feature Settings" "Streampurge" "Streamsmooth" "Streamsave" "Streamsight" "Streamview" "Other Settings" "[ Help ]" "< Back"    elseif M == 3      MessageBox "Main > Benchmark Oblivion" "Streambench" "[ Help ]" "< Back"    elseif M == 4      MessageBox "Initialized!" "Okay"    elseif M == 5      set D to 2      SLTomeOfKnowledgea.activate player    elseif M == 6      set D to 2      SLhelp6a.activate player    elseif M == 7      MessageBox "Main > Special Actions" "Initialize with INI Values" "Open Tome of Knowledge" "[ Help ]" "< Back"    elseif M == 8      MessageBox "Main > Settings > Purging" "Travel/Zone [%.0f]" "Wait [%.0f]" "Sleep [%.0f]" SLv.PurgeOnTravel SLv.PurgeOnWait SLv.PurgeOnSleep "Change Mode" "Purge on travel/zone" "Purge on wait" "Purge on sleep" "[ Help ]" "< Back"    elseif M == 9      MessageBox "Main > Settings > FPS Smoothing" "FPS Settings" "vLOD Settings" "Detail Settings" "[ Help ]" "< Back"    elseif M == 10      MessageBox "Main > Settings > Streamsaves" "Save Timer" "Save Slots" "Save Protection" "Save Options" "Other Settings" "[ Help ]" "< Back"    elseif M == 11      MessageBox "Main > Settings > Miscellaneous" "Kill Corpses [%.0f]" "Debug Messages [%.0f]" SLKillCorpses SLdebug "Kill Corpses" "Debug Messages" "[ Help ]" "< Back"    elseif M == 12      MessageBox "Main > Settings > Purging > Mode" "Current Mode [%.0f]" SLh.SLmode "(1) Maximum" "(2) High" "(3) Performance" "(4) Normal" "(5) Lite" "(6) Ultra Lite" "[ Help ]" "< Back"    elseif M == 13      MessageBox "Main > Settings > FPS Smoothing > FPS" "Min FPS [%.0f]" "Max FPS [%.0f]" SLfpsmon.Low SLfpsmon.High "Min FPS +1" "Min FPS -1" "Max FPS +1" "Max FPS -1" "[ Help ]" "< Back"    elseif M == 14      MessageBox "Main > Settings > FPS Smoothing > vLOD" "Min vLOD [%.0f]" "Max vLOD [%.0f]" SLv.minVLOD SLv.maxVLOD "Min vLOD +1" "Min vLOD -1" "Max vLOD +1" "Max vLOD -1" "[ Help ]" "< Back"    elseif M == 15      MessageBox "Main > Settings > Smoothing > Auto" "Details [%.0f]" "Grass [%.0f]" "Trees [%.0f]" "Lights/Shadows [%.0f]" "Objects [%.0f]" "Water [%.0f]" SLv.setDetail SLv.setGrass SLv.setTrees SLv.setLightShadow SLv.setObjects SLv.setWater "Detail" "Grass" "Trees" "Lights/Shadows" "Objects" "Water" "[ Help ]" "< Back"    elseif M == 16      MessageBox "Main > Settings > Streamsaves > Timer" "Save Interval [%.0f]" SLv.SaveTimer "Save Interval +30" "Save Interval +10" "Save Interval +1" "Save Interval -1" "Save Interval -10" "Save Interval -30" "[ Help ]" "< Back"    elseif M == 17      MessageBox "Main > Settings > Streamsaves > Slots" "Save Slots [%.0f]" SLv.NumSaveSlots "Save Slots +1" "Save Slots -1" "[ Help ]" "< Back"    elseif M == 18      MessageBox "Main > Settings > Streamsaves > Protect" "Combat [%.0f]" "Yield [%.0f]" "Harmful Areas [%.0f]" "Low Health [%.0f]" "Trespassing [%.0f]" "Swimming [%.0f]" SLv.DuringCombat SLv.WhileYielding SLv.DangerousArea SLv.LowHealth SLv.AllowTrespass SLv.AllowSwimming "During Combat" "While Yielding" "In Harmful Areas" "When Health Low" "While Trespassing" "While Swimming" "[ Help ]" "< Back"    elseif M == 19      MessageBox "Main > Settings > Streamsaves > Options" "Interiors [%.0f]" "Idle Only [%.0f]" "Travel/Zone [%.0f]" "Wait/Sleep [%.0f]" "Sneaking [%.0f]" "Weapon [%.0f]" "After Combat [%.0f]" SLv.InteriorOnly SLv.WhenIdleOnly SLv.AfterZone SLv.AfterWaitSleep SLv.AllowSneaking SLv.AllowWeapon SLv.AfterCombat "In interiors only" "When idle only" "After travel/zone" "After wait/sleep" "While sneaking" "With weapon out" "After Combat" "[ Help ]" "< Back"    elseif M == 20      MessageBox "Main > Settings > Streamsaves > Other" "Save Reminders [%.0f]" "Lite Reminders [%.0f]" "Play Sound [%.0f]" "Gag Save Message [%.0f]" "Secure Autosaves [%.0f]" "Purge Before Save [%.0f]" SLv.SaveReminders SLv.UseLiteReminders SLv.PlaySoundOnSave SLv.GagAutoSaves SLv.SecureAutoSaves SLv.PurgeBeforeSave "Sound on Save" "Gag Autosave Message" "Save Reminder Use" "Lite Version of Reminders" "Secure Autosave Use" "Purge Before Save" "[ Help ]" "< Back"    elseif M == 21      MessageBox "Main > Settings > Streamfight" "Combat Clipping [%.0f]" SLv.ActiveClip     elseif M == 22      set D to 2      SLhelp21a.activate player    elseif M == 23      set D to 2      SLhelp22a.activate player    elseif M == 24      set D to 2      SLhelp23a.activate player    elseif M == 25      set D to 2      SLhelp24a.activate player    elseif M == 26      set D to 2      SLhelp25a.activate player    elseif M == 27      set D to 2      SLhelp26a.activate player    elseif M == 28      set D to 2      SLhelp27a.activate player    elseif M == 29      set D to 2      SLhelp28a.activate player    elseif M == 30      set D to 2      SLhelp29a.activate player    elseif M == 31      set D to 2      SLhelp30a.activate player    elseif M == 32      set D to 2      SLhelp31a.activate player    elseif M == 33      set D to 2      SLhelp32a.activate player    elseif M == 34      set D to 2      SLhelp33a.activate player    elseif M == 35      set D to 2      SLhelp34a.activate player    elseif M == 36      set D to 2      SLhelp35a.activate player    elseif M == 37      set D to 2      SLhelp36a.activate player    elseif M == 38      set D to 2      SLhelp37a.activate player    elseif M == 39      MessageBox "Main > Settings > Change FOV" "Auto FOV [%.0f]" "FOV [%0.f]" "FOV in Dialogs [%.0f]" SLv.slFOVauto SLfov SLv.FOVInDialogs "Toggle Automatic" "Increase +5" "Decrease -5" "Toggle in Dialogs" "[ Help ]" "< Back"    elseif M == 40      set D to 2      SLhelp39a.activate player    elseif M == 41      MessageBox "Streamsight" "Min Land [%.0f]" "Max Land [%.0f]" "Min Water [%.0f]" "Max Water [%.0f]" "Extreme Clipping [%.0f]" "Fog Update Spd [%.0f]" SLv.MinDistanceFog SLv.MaxDistanceFog SLv.MinWaterFog SLv.MaxWaterFog SLv.ExtremeClipping SLv.FogUpdateFrequency "Edit Land Fog" "Set Recommended Land Fog" "Edit Water Fog" "Set Recommended Water Fog" "Toggle Extreme Clipping" "Fog Update Speed +1" "Fog Update Speed -1" "[ Help ]" "< Back"    elseif M == 42      MessageBox "Min Land Fog [%.0f]  Max Land Fog [%.0f]" SLv.MinDistanceFog SLv.MaxDistanceFog "Min +2000" "Min -2000" "Max +2000" "Max -2000" "< Back"    elseif M == 43      MessageBox "Min Water Fog [%.0f]  Max Water Fog [%.0f]" SLv.MinWaterFog SLv.MaxWaterFog "Min +250" "Min -250" "Max +250" "Max -250" "< Back"    elseif M == 44    	set D to 2    	SLhelp43a.activate player    endif  endif  if D == 0    set B to GetButtonPressed    if B == -1      return    else      set D to 1      if M == 0        if B == 0          set M to 1        elseif B == 1          set M to 2        elseif B == 2          set M to 7        elseif B == 3          if SLv.SaveBeforeFastQuit == 0            con_QuitGame          else            StopQuest SLMainMenu            set SLsaveh.FastQuit to 1            set SLsaveh.HotkeySave to 1            message "Streamsaving..."            set SLsaveh.ForceSave to 1          endif        elseif B == 4          set M to 6        elseif B == 5          set M to -1        endif      elseif M == 1        if B == 0          set SLv.Purging to (SLv.Purging == 0)        elseif B == 1          set SLv.FPSsmoothing to (SLv.FPSsmoothing == 0)        elseif B == 2          set SLv.Streamsaving to (SLv.Streamsaving == 0)        elseif B == 3          set SLv.Streamsight to (SLv.Streamsight == 0)	if B == 4	  set SLv.FightSmoothing to (SLv.FightSmoothing == 0)        elseif B == 5          set M to 21        elseif B == 6          set M to 0        endif      elseif M == 2        if B == 0          set M to 8        elseif B == 1          set M to 9        elseif B == 2          set M to 10        elseif B == 3          set M to 40        elseif B == 4          set M to 38        elseif B == 5          set M to 11        elseif B == 6          set M to 22        elseif B == 7          set M to 0        endif      elseif M == 4        if B == 0          set M to 7        endif      elseif M == 7        if B == 0          Message "Streamline initializing, please wait..."          StartQuest SLini          StopQuest SLMainMenu        elseif B == 1          set M to 5        elseif B == 2          set M to 37        elseif B == 3          set M to 0        endif      elseif M == 8        if B == 0          set M to 12        elseif B == 1          set SLv.PurgeOnTravel to (SLv.PurgeOnTravel == 0)        elseif B == 2          set SLv.PurgeOnWait to (SLv.PurgeOnWait == 0)        elseif B == 3          set SLv.PurgeOnSleep to (SLv.PurgeOnSleep == 0)        elseif B == 4          set M to 23        elseif B == 5          set M to 2        endif      elseif M == 9        if B == 0          set M to 13        elseif B == 1          set M to 14        elseif B == 2          set M to 15        elseif B == 3          set M to 25        elseif B == 4          set M to 2        endif      elseif M == 10        if B == 0          set M to 16        elseif B == 1          set M to 17        elseif B == 2          set M to 18        elseif B == 3          set M to 19        elseif B == 4          set M to 20        elseif B == 5          set M to 29        elseif B == 6          set M to 2        endif      elseif M == 11        if B == 0          set SLKillCorpses to (SLKillCorpses == 0)        elseif B == 1          set SLdebug to (SLdebug == 0)        elseif B == 2          set M to 35        elseif B == 3          set M to 2        endif      elseif M == 12        if B == 0          set SLh.SLmode to 1          set SLh.SLmin to 4          set SLh.SLmax to 8          set SLh.SLcache to 1          set SLh.SLforceat to 6          set SLh.SLthresh to 90        elseif B == 1          set SLh.SLmode to 2          set SLh.SLmin to 5          set SLh.SLmax to 10          set SLh.SLcache to 2          set SLh.SLforceat to 8          set SLh.SLthresh to 180        elseif B == 2          set SLh.SLmode to 3          set SLh.SLmin to 6          set SLh.SLmax to 12          set SLh.SLcache to 3          set SLh.SLforceat to 10          set SLh.SLthresh to 270        elseif B == 3          set SLh.SLmode to 4          set SLh.SLmin to 7          set SLh.SLmax to 14          set SLh.SLcache to 4          set SLh.SLforceat to 12          set SLh.SLthresh to 360        elseif B == 4          set SLh.SLmode to 5          set SLh.SLmin to 8          set SLh.SLmax to 16          set SLh.SLcache to 5          set SLh.SLforceat to 14          set SLh.SLthresh to 450        elseif B == 5          set SLh.SLmode to 6          set SLh.SLmin to 10          set SLh.SLmax to 20          set SLh.SLcache to 6          set SLh.SLforceat to 16          set SLh.SLthresh to 540        elseif B == 6          set M to 24        elseif B == 7          set M to 8        endif      elseif M == 13        if B == 0          set SLfpsmon.Low to SLfpsmon.Low + 1          if SLfpsmon.Low >= SLfpsmon.High            set SLfpsmon.Low to SLfpsmon.High - 1          endif        elseif B == 1          set SLfpsmon.Low to SLfpsmon.Low - 1          if SLfpsmon.Low < 1            set SLfpsmon.Low to 1          endif        elseif B == 2          set SLfpsmon.High to SLfpsmon.High + 1          if SLfpsmon.High > 100            set SLfpsmon.High to 100          endif        elseif B == 3          set SLfpsmon.High to SLfpsmon.High - 1          if SLfpsmon.High <= SLfpsmon.Low            set SLfpsmon.High to SLfpsmon.Low + 1          endif        elseif B == 4          set M to 26        elseif B == 5          set M to 9        endif        set SLfpsmon.CombatLow to SLfpsmon.Low + SLv.CombatFPS        set SLfpsmon.CombatHigh to SLfpsmon.High + SLv.CombatFPS      elseif M == 14        if B == 0          set SLv.minVLOD to SLv.minVLOD + 1          if SLv.minVLOD >= SLv.maxVLOD            set SLv.minVLOD to SLv.maxVLOD - 1          endif        elseif B == 1          set SLv.minVLOD to SLv.minVLOD - 1          if SLv.minVLOD < 0            set SLv.minVLOD to 0          endif        elseif B == 2          set SLv.maxVLOD to SLv.maxVLOD + 1          if SLv.maxVLOD > 100            set SLv.maxVLOD to 100          endif        elseif B == 3          set SLv.maxVLOD to SLv.maxVLOD - 1          if SLv.maxVLOD <= SLv.minVLOD            set SLv.maxVLOD to SLv.minVLOD + 1          endif        elseif B == 4          set M to 27        elseif B == 5          set M to 9        endif      elseif M == 15        if B == 0          set SLv.setDetail to (SLv.setDetail == 0)        elseif B == 1          set SLv.setGrass to (SLv.setGrass == 0)        elseif B == 2          set SLv.setTrees to (SLv.setTrees == 0)        elseif B == 3          set SLv.setLightShadow to (SLv.setLightShadow == 0)        elseif B == 4          set SLv.setObjects to (SLv.setObjects == 0)        elseif B == 5          set SLv.setWater to (SLv.setWater == 0)        elseif B == 6          set M to 28        elseif B == 7          set M to 9        endif      elseif M == 16        set sTemp to SLv.SaveTimer        set fTemp to (sTemp * 60) - SLsaveh.SaveCountdown        if B == 0          set SLv.SaveTimer to SLv.SaveTimer + 30          if SLv.SaveTimer > 360            set SLv.SaveTimer to 360          endif        elseif B == 1          set SLv.SaveTimer to SLv.SaveTimer + 10          if SLv.SaveTimer > 360            set SLv.SaveTimer to 360          endif        elseif B == 2          set SLv.SaveTimer to SLv.SaveTimer + 1          if SLv.SaveTimer > 360            set SLv.SaveTimer to 360          endif        elseif B == 3          set SLv.SaveTimer to SLv.SaveTimer - 1          if SLv.SaveTimer < 1            set SLv.SaveTimer to 1          endif        elseif B == 4          set SLv.SaveTimer to SLv.SaveTimer - 10          if SLv.SaveTimer < 1            set SLv.SaveTimer to 1          endif        elseif B == 5          set SLv.SaveTimer to SLv.SaveTimer - 30          if SLv.SaveTimer < 1            set SLv.SaveTimer to 1          endif        elseif B == 6          set M to 30        elseif B == 7          set M to 10        endif        if sTemp != SLv.SaveTimer          if SLsaveh.SaveCountdown - ((SLv.SaveTimer * 60) - fTemp) < 5            set SLsaveh.SaveCountdown to 10.0          else            set SLsaveh.SaveCountdown to (SLv.SaveTimer * 60) - fTemp          endif        endif      elseif M == 17        if B == 0          set SLv.NumSaveSlots to SLv.NumSaveSlots + 1          if SLv.NumSaveSlots > 60            set SLv.NumSaveSlots to 60          endif        elseif B == 1          set SLv.NumSaveSlots to SLv.NumSaveSlots - 1          if SLv.NumSaveSlots < 1            set SLv.NumSaveSlots to 1          endif        elseif B == 2          set M to 31        elseif B == 3          set M to 10        endif      elseif M == 18        if B == 0          set SLv.DuringCombat to (SLv.DuringCombat == 0)        elseif B == 1          set SLv.WhileYielding to (SLv.WhileYielding == 0)        elseif B == 2          set SLv.DangerousArea to (SLv.DangerousArea == 0)        elseif B == 3          set SLv.LowHealth to (SLv.LowHealth == 0)        elseif B == 4          set SLv.AllowTrespass to (SLv.AllowTrespass == 0)        elseif B == 5          set SLv.AllowSwimming to (SLv.AllowSwimming == 0)        elseif B == 6          set M to 32        elseif B == 7          set M to 10        endif      elseif M == 19        if B == 0          set SLv.InteriorOnly to (SLv.InteriorOnly == 0)        elseif B == 1          set SLv.WhenIdleOnly to (SLv.WhenIdleOnly == 0)        elseif B == 2          set SLv.AfterZone to (SLv.AfterZone == 0)        elseif B == 3          set SLv.AfterWaitSleep to (SLv.AfterWaitSleep == 0)        elseif B == 4          set SLv.AllowSneaking to (SLv.AllowSneaking == 0)        elseif B == 5          set SLv.AllowWeapon to (SLv.AllowWeapon == 0)        elseif B == 6          set SLv.AfterCombat to (SLv.AfterCombat == 0)        elseif B == 7          set M to 33        elseif B == 8          set M to 10        endif      elseif M == 20        if B == 0          set SLv.PlaySoundOnSave to (SLv.PlaySoundOnSave == 0)        elseif B == 1          set SLv.GagAutoSaves to (SLv.GagAutoSaves == 0)        elseif B == 2          set SLv.SaveReminders to (SLv.SaveReminders == 0)        elseif B == 3          set SLv.UseLiteReminders to (SLv.UseLiteReminders == 0)        elseif B == 4          set SLv.SecureAutoSaves to (SLv.SecureAutoSaves == 0)        elseif B == 5          set SLv.PurgeBeforeSave to (SLv.PurgeBeforeSave == 0)        elseif B == 6          set M to 34        elseif B == 7          set M to 10        endif      elseif M == 38      	if B == 0          set SLv.slFOVauto to (SLv.slFOVauto == 0)          set SLfog.sStatus to 0        elseif B == 1          set SLfov to SLfov + 5          if SLfov > 200            set SLfov to 200          endif          con_setcamerafov SLfov          set SLfog.sStatus to 0        elseif B == 2          set SLfov to SLfov - 5          if SLfov < 30            set SLfov to 30          endif          con_setcamerafov SLfov          set SLfog.sStatus to 0        elseif B == 3          set SLv.FOVInDialogs to (SLv.FOVInDialogs == 0)        elseif B == 4          set M to 39        elseif B == 5          set M to 2        endif      elseif M == 40        if B == 0          set M to 41        elseif B == 1          set sTemp to GetNumericIniSetting "uGridDistantCount:General"          set SLv.MinDistanceFog to sTemp*1000 + 5000          set SLv.MaxDistanceFog to sTemp*5000 + 11000       		set SLfog.sStatus to 0        elseif B == 2          set M to 42        elseif B == 3          set SLv.MinWaterFog to 0          set SLv.MaxWaterFog to 2500       		set SLfog.sStatus to 0        elseif B == 4          set SLv.ExtremeClipping to (SLv.ExtremeClipping == 0)        	if SLv.ExtremeClipping == 0        		con_SetFog 0 0        	endif       		set SLfog.sStatus to 0       	elseif B == 5       		if SLv.FogUpdateFrequency < 10       			set SLv.FogUpdateFrequency to SLv.FogUpdateFrequency + 1       		endif       	elseif B == 6       		if SLv.FogUpdateFrequency > 1       			set SLv.FogUpdateFrequency to SLv.FogUpdateFrequency - 1       		endif        elseif B == 7        	set M to 43        elseif B == 8          set M to 2        endif      elseif M == 41        if B == 0          set SLv.MinDistanceFog to SLv.MinDistanceFog + 2000.0          if SLv.MinDistanceFog >= SLv.MaxDistanceFog            set SLv.MinDistanceFog to SLv.MaxDistanceFog - 2000.0          endif        elseif B == 1          set SLv.MinDistanceFog to SLv.MinDistanceFog - 2000.0          if SLv.MinDistanceFog < 4000.0            set SLv.MinDistanceFog to 4000.0          endif        elseif B == 2          set SLv.MaxDistanceFog to SLv.MaxDistanceFog + 2000.0          if SLv.MaxDistanceFog > 200000.0            set SLv.MaxDistanceFog to 200000.0          endif        elseif B == 3          set SLv.MaxDistanceFog to SLv.MaxDistanceFog - 2000.0          if SLv.MaxDistanceFog <= SLv.MinDistanceFog            set SLv.MaxDistanceFog to SLv.MinDistanceFog + 2000.0          endif        elseif B == 4          set M to 40        endif        if B < 4 && SLv.Streamsight          con_SetFog SLv.MinDistanceFog SLv.MaxDistanceFog        endif      elseif M == 42        if B == 0          set SLv.MinWaterFog to SLv.MinWaterFog + 250.0          if SLv.MinWaterFog >= SLv.MaxWaterFog            set SLv.MinWaterFog to SLv.MaxWaterFog - 250.0          endif        elseif B == 1          set SLv.MinWaterFog to SLv.MinWaterFog - 250.0          if SLv.MinWaterFog < 0.0            set SLv.MinWaterFog to 0.0          endif        elseif B == 2          set SLv.MaxWaterFog to SLv.MaxWaterFog + 250.0          if SLv.MaxWaterFog > 10000.0            set SLv.MaxWaterFog to 10000.0          endif        elseif B == 3          set SLv.MaxWaterFog to SLv.MaxWaterFog - 250.0          if SLv.MaxWaterFog <= SLv.MinWaterFog            set SLv.MaxWaterFog to SLv.MinWaterFog + 250.0          endif        elseif B == 4          set M to 40        endif        if B < 4 && SLv.Streamsight          con_SetFog SLv.MinWaterFog SLv.MaxWaterFog        endif      endif    endif  elseif D == 2    set D to 1    if M == 5      set M to 0    elseif M == 6      set M to 0    elseif M == 21      set M to 1    elseif M == 22      set M to 2    elseif M == 23      set M to 8    elseif M == 24      set M to 12    elseif M == 25      set M to 9    elseif M == 26      set M to 13    elseif M == 27      set M to 14    elseif M == 28      set M to 15    elseif M == 29      set M to 10    elseif M == 30      set M to 16    elseif M == 31      set M to 17    elseif M == 32      set M to 18    elseif M == 33      set M to 19    elseif M == 34      set M to 20    elseif M == 35      set M to 11    elseif M == 36      set M to 3    elseif M == 37      set M to 7    elseif M == 39      set M to 38    elseif M == 43    	set M to 40    endif  endifendifEndBegin Menumode  set fQuestDelayTime to 0.001  if X == 0    if IsKeypressed2 257  ; rm      MenuTapKey 208      ; 200=Up, 208=down      set X to 1    endif  else    StopQuest SLMainMenu    MenuTapKey 28    set X to 0    set M to 0    set D to 1  endifEnd


One thing that is wrong is the CS gives me errors when saving. The errors are about an invalid reference on lines 23,39,47, 49, 51, 53, 55, 57, 59, 61, 63, 65, 118, and 123. This isn't a big deal because it still saves the script. I would like to know why it says that there is an invalid reference, though, on those lines.

Another problem I'm having is with the variable display formatting. I have, as an example, "Streampurge [%.0f]". It should show up as "Streampurge [1]" or "Streampurge [0]" depending on the current setting. Thing is, it's showing up as "Streampurge [%.0f]". It does this for all messages that use the variable display notation.

And that's about it. Othe rthan those problems it seems to be working correctly.
User avatar
Amelia Pritchard
 
Posts: 3445
Joined: Mon Jul 24, 2006 2:40 am

Post » Sun Aug 22, 2010 8:19 pm

spoiler tags

IIRC you cannot format messagebox options - that's why the mistakes

OBSE ?
create a string and use messageboxEX
User avatar
Rhysa Hughes
 
Posts: 3438
Joined: Thu Nov 23, 2006 3:00 pm

Post » Sun Aug 22, 2010 3:26 pm

messageboxEX perhaps?
User avatar
rebecca moody
 
Posts: 3430
Joined: Mon Mar 05, 2007 3:01 pm

Post » Sun Aug 22, 2010 5:10 pm

MessageBoxEX, eh. I'll read up about it.
User avatar
Vickytoria Vasquez
 
Posts: 3456
Joined: Thu Aug 31, 2006 7:06 pm


Return to IV - Oblivion