Making A Menu

[AlexxEG]

So I making a personal overhaul with random but realistic features, one of them is a cigarette packer/unpacker. I making a Aid item to open the menu, but after clicking the Aid item, the menu dosen't appear before I close my pipboy.

How can I make it so I don't have to close it? I seen mods before which does this, so I know it's possible ;)

 

For now I have a item in "Aid" section with following script:

Begin ScriptEffectStart
Player.Additem 00POCigarettePacker 1 1
StartQuest 00POCigarettePackerQ
End

 

And the quest have the following script:

Short Start
Short iMenu
Short Button

Begin GameMode

if ( Start == 0 )
	ShowMessage 00POCigarettePackerMESG
	Set Start to 1
endif

Set Button to GetButtonPressed

if ( Button == 0 )
	Player.Removeitem Cigarette01 20 1
	Player.Additem CigarettePack 1
	Set Start to 0
elseif ( Button == 1 )
	Player.Removeitem CigarettePack 10 1
	Player.Additem CigaretteCarton 1
	Set Start to 0
elseif ( Button == 2 )
	Player.Removeitem CigarettePack 1 1
	Player.Additem Cigarette01 20
	Set Start to 0
elseif ( Button == 3 )
	Player.Removeitem CigaretteCarton 1 1
	Player.Additem CigarettePack 10
	Set Start to 0
elseif ( Button == 4 )
	Set Start to 0
	StopQuest 00POCigarettePackerQ
endif

End

 

And the message is:

0: Pack Cigarettes
1: Pack A Pack With Cigarettes
2: Unpack A Pack With Cigarettes
3: Unpack A Carton With Cigarettes
4: Done

 

Thanks in advance!^^

[phoneyLogic]

Run your code in a "Begin MenuMode" block as well

[AlexxEG]

Run your code in a "Begin MenuMode" block as well

Thanks, that worked^^

 

Another question, as my script adds items, the pip-boy dosen't "update" the item count. Is there a workaround?

[phoneyLogic]

Try

Short Start
Short iMenu
Short Button

Begin MenuMode

       if ( Start == 0 )
               ShowMessage 00POCigarettePackerMESG
               Set Start to 1
       endif

       Set Button to GetButtonPressed

       if ( Button == 0 )
               Player.Removeitem Cigarette01 20 1
               Player.Additem CigarettePack 1
               Set Start to 0
       elseif ( Button == 1 )
               Player.Removeitem CigarettePack 10 1
               Player.Additem CigaretteCarton 1
               Set Start to 0
       elseif ( Button == 2 )
               Player.Removeitem CigarettePack 1 1
               Player.Additem Cigarette01 20
               Set Start to 0
       elseif ( Button == 3 )
               Player.Removeitem CigaretteCarton 1 1
               Player.Additem CigarettePack 10
               Set Start to 0
       elseif ( Button == 4 )
               ;nothing, close
       endif
               Set Start to 0
               StopQuest 00POCigarettePackerQ
End

Dunno if it helps with the updating, just give a try.

[AlexxEG]

It didn't work with updating, but I just changed "GameMode" to "MenuMode" and it works perfect now.

But I don't need to make it update, I can live without it. Thanks alot, and have a kudos^^

[phoneyLogic]

Thanks mate :D

Maybe it is because of the delay which each quest have.