Archiv verlassen und diese Seite im Standarddesign anzeigen : DDK Kompatibelität und Scripte
Ihr wollt wissen wie die DDk features funktionieren, dann seit ihr hier richtig
auf den folgenden seiten findet ihr meine Scripte und allerlei infos was wie funktioniert
Ich poste sicherlich nicht alle 50 Scripts aber die interessantesten (für anfänger) und die relevantesten bezüglich kompatibelität
fangen wir an.
um mit anderen mods kompatibel sein zu können brauchte ich Globale variablen welche die mods untereinander austauschen können, da ich keinen weg fand dies über eine übliche globale variable zu lösen mache ich es anders
Vault101OverseersDeskREF
dies ist der Spind in vault 101 neben dem schreibtisch des aufsehers in dem ihr die zugangsdaten bekommt.
Da dieser schrank nicht mehr erreicht werden kann sobald der spieler die vault verlassen hat ist er prädestiniert für das was folgt.
anstatt variablen zu definieren und diese über mehrere scripts hin und her zu weisen machen ich es einfach so.
Dieser schrank wird als behälter für variablen verwendet.
zum beispiel.
Wenn der spieler den schalter betätigt das er Schlafen notwendig machen will
dann fügt das script des schalters ein Opthalmoscope diesem behälter hinzu
nun kommt im läufer script die abfrage
set Schlafaktiv to (Vault101OverseersDeskREF.getitemcount Opthalmoscope )
if Schlafaktiv >= 1
falls dies stimmt
wird in einem if "es ist eine Ingame Stunde vergangen" Block
if ( Vault101OverseersDeskREF.getitemcount BigPot >= 1)
Vault101OverseersDeskREF.removeitem BigPot 1
endif
ausgeführt
Jede ingamestunde wird also einer abgezogen, anhand der menge Töpfe im schrank wird also festgestellt welchen Schlafbedarf der spieler hat.
Wenn der spieler schläft werden im schrank 96 Töpfe abgelegt, (bzw alle vorhandenen gelöscht und dann 96 zugefügt.
Ps. Ich habs extra grade nicht dabei geschrieben weils irritiert hätte
das aktivierungsscript fügt natürlich auch direkt 40 Töpfe hinzu, sonst würde der spieler innerhalb von 5 sekunden nach bedienen des schalters sterben ;)
Hier das Script der verkaufsautomaten die ihr an allen Anlaufstellen der handelshaus Karawanen findet (muss ja irgendwer befüllen :) )
scn ABR111ScriptVerkaufsautomat
short Button
short Stopper
begin OnActivate
if ( IsActionRef Player == 1 )
ShowMessage ABR111MsgNukaAutomat
set stopper to 1
else
endif
end
begin gamemode
set Button to GetButtonPressed
if ( Button == 0 )
if (Player.GetItemCount caps001 >=25 )
player.removeitem caps001 25
player.additem MS05IceNukaCola 1
set Stopper to 0
elseif ( stopper ==1 )
set stopper to 0
ShowMessage ABR111MSGZuWenigKK
endif
elseif ( Button == 1 )
if (Player.GetItemCount caps001 >=5 )
player.removeitem caps001 5
player.additem ABR111EssenKaltesBeer 1
set Stopper to 0
elseif ( stopper ==1 )
set stopper to 0
ShowMessage ABR111MSGZuWenigKK
endif
elseif ( Button == 2 )
if (Player.GetItemCount caps001 >=15 )
player.removeitem caps001 15
player.additem CigarettePack 1
set Stopper to 0
elseif ( stopper ==1 )
set stopper to 0
ShowMessage ABR111MSGZuWenigKK
endif
elseif ( Button == 3 )
if (Player.GetItemCount caps001 >=30)
player.removeitem caps001 30
player.additem ABR111EssenUltrashake 1
set Stopper to 0
elseif ( stopper ==1 )
set stopper to 0
ShowMessage ABR111MSGZuWenigKK
endif
elseif ( Button == 4 )
if (Player.GetItemCount caps001 >=30)
player.removeitem caps001 30
player.additem ABR111EssenUltrashake2 1
set Stopper to 0
elseif ( stopper ==1 )
set stopper to 0
ShowMessage ABR111MSGZuWenigKK
endif
elseif ( Button == 5 )
if (Player.GetItemCount caps001 >=32)
player.removeitem caps001 32
player.additem ABR111EssenProteinriegel 1
set Stopper to 0
elseif ( stopper ==1 )
set stopper to 0
ShowMessage ABR111MSGZuWenigKK
endif
elseif ( Button == 6 )
if (Player.GetItemCount caps001 >=55)
player.removeitem caps001 55
player.additem ABR111EssenProteinriegel2 1
set Stopper to 0
elseif ( stopper ==1 )
set stopper to 0
ShowMessage ABR111MSGZuWenigKK
endif
elseif ( Button == 7 )
if (Player.GetItemCount caps001 >=200)
player.removeitem caps001 200
player.additem ABR111Munition10mmMagnum 50
set Stopper to 0
elseif ( stopper ==1 )
set stopper to 0
ShowMessage ABR111MSGZuWenigKK
endif
elseif ( Button == 8 )
if (Player.GetItemCount caps001 >=400)
player.removeitem caps001 400
player.additem ABR111WaffeIPistoleIBronzeIChinesePistolIMagnum 1
set Stopper to 0
elseif ( stopper ==1 )
set stopper to 0
ShowMessage ABR111MSGZuWenigKK
endif
elseif ( Button == 9 )
set stopper to 0
endif
endif
end
hier ein schmankerl
alle handelsbehälter nach der gattung sortiert
vorsicht: manche behälter sind mehrfach aufgeführt
moira zb bei waffen, Kleidung, und Zeug
aussderdem 2 Scriptbefehle die ich sehr lange suchen musste
Short Maxlevel
Short Bronze
Short Silber
Short Gold
Short Platin
short ebene
set Maxlevel to GetGameSetting iMaxCharacterLevel
set ebene to player.getlevel
set Bronze to 1
set Silber to ((Maxlevel/10)*3)
set Gold to ((Maxlevel/10)*6)
set Platin to ((Maxlevel/10)*9)
liste Nahrung
VendorChestBuriedBrassLanternREF
VendorChestBuriedGretaRef
VendorChestBuriedJoePortorRef
VendorChestBuriedMargaretPrimroseRef
VendorChestBuriedStaleyRef
VendorChestBuriedGrandmaSparkleRef
VendorChestBuriedVeraWeatherlyRef
VendorChestBuriedEclairRef
liste Alkohol
VendorChestBuriedAhzrukhalRef
VendorChestBuriedBelleBonnyRef
VendorChestBuriedGobREF
VendorChestBuriedJoePortorRef
VendorChestBuriedShakesRef
liste Kleidung
VendorChestBuriedAnthonyLing
VendorChestBuriedBannonRef
VendorChestBuriedLydiaMontenegroRef
VendorChestBuriedMoiraBrownRef
VendorChestBuriedProntoRef
VendorChestBuriedSmilingJackRef
VendorChestBuriedTulipRef
VendorChestBuriedChiefGustavoRef
VendorChestBuriedBessieLynnRef
VendorChestBuriedMichaelMastersRef
VendorChestBuriedTheFamilyKarlRef
VendorChestBuriedKnightSergeantDurgaRef
VendorChestCrowREF
liste Zeugs
VendorChestBuriedKnickKnackRef
VendorChestBuriedLydiaMontenegroRef
VendorChestBuriedMoiraBrownRef
VendorChestBuriedSeagraveHolmesRef
VendorChestBuriedMichaelMastersRef
VendorChestBuriedTheFamilyKarlRef
VendorChestWolfgangREF
liste Waffen
VendorChestBuriedKnickKnackRef
VendorChestBuriedLydiaMontenegroRef
VendorChestBuriedMoiraBrownRef
VendorChestBuriedProntoRef
VendorChestBuriedSmilingJackRef
VendorChestBuriedSydneyRef
VendorChestBuriedTulipRef
VendorChestBuriedChiefGustavoRef
VendorChestBuriedMichaelMastersRef
VendorChestBuriedTheFamilyKarlRef
VendorChestBuriedKnightSergeantDurgaRef
VendorChestHarithREF
liste Drogen
VendorChestBuriedCantelliRef
VendorChestBuriedCutterChemsRef
VendorChestBuriedLeoStahlDrugsRef
VendorChestHoffREF
liste Medizin
VendorChestBuriedCutterRef
VendorChestBuriedDocChurchRef
VendorChestBuriedDoctorBanfieldRef
VendorChestBuriedDoctorBarrowsRef
VendorChestBuriedDoctorPrestonRef
VendorChestBuriedRedRef
VendorChestHoffREF
ich post mal lieber das verteilerscript in der entwicklung
die fertige version wird ja 10 mal so lang sein
scn ABR1ScriptOOOOOSortierungEINLAGERN
short Button
short Hurencounter
;((((((((((((((((((((Gegenstand))))))))))))))))))) )))))))))))
short anzahl
ref Behaelter
ref Gegenstand
;((((((((((((((((((((Behälter )))))))))))))))))))))))))))))))))))
ref GrosseKiste
ref Sqadkiste
ref Safe
ref MunitionsBeh
ref Granatenkiste
ref Rummelkiste
ref Werkzeug
ref Medizinkasten
ref Drogenkaestchen
ref Kleiderschrank
ref Kuelschrank
;((((((((((((((((((((StyleXmarker ))))))))))))))))))))))))))
ref Kueche
ref Medizin
ref Werkzeug
ref Luxus
ref Sicherheit
;((((((((((((((((((((AKTIVEZELLE ))))))))))))))))))))))))
ref MYROOM
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |BLOCKWECHSEL||||||||||||||||||||||||||||||||||||| ||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
begin OnActivate
if ( IsActionRef Player == 1 )
ShowMessage ABR111MsgWohnungsverteiler
endif
end
begin gamemode
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |BLOCKWECHSEL||||||||||||||||||||||||||||||||||||| ||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;((((((((((((((((((((((((((((((((((((((((((((((((( (Kisten refs zuweisen)))))))))))))))))))))))))))))))))))))))))) ))))))))))))))))))))))))))))))
;1 megaton
;2 Tenpenny
;3 Drecksbunker
;4 Haus
;5 Fernwärmewartungsraum
;6 Handelshaus Suite
;7 Aee Zelle
;if player.getincell ==
;set GrosseKiste to PHQGroßeKisteRef1
;set Sqadkiste to PHQSqadkisteRef1
;set Safe to PQHSafeRef1
;set MunitionsBeh to PHQMuniRef1
;set Granatenkiste to PHQNadesRef1
;set Rummelkiste to PHQRummelRef1
;set Werkzeug to PHQToolsRef1
;set Medizinkasten to PHQMedicRef1
;set Drogenkaestchen to PHQDrogeRef1
;set Kleiderschrank to PHQKleidungRef1
;set Kuelschrank to PHQFreezeRef1
;set KuecheX to PHQKuecheXRef1
;set MedizinX to PHQMedicXREF1
;set WerkzeugX to PHQToolXREF1
;set LuxusX to PHQLuxusXREF1
;set SicherheitX to PHQSecurityXREF1
;elseif player.getincell ==
;set GrosseKiste to PHQGroßeKisteRef2
;set Sqadkiste to PHQSqadkisteRef2
;set Safe to PQHSafeRef2
;set MunitionsBeh to PHQMuniRef2
;set Granatenkiste to PHQNadesRef2
;set Rummelkiste to PHQRummelRef2
;set Werkzeug to PHQToolsRef2
;set Medizinkasten to PHQMedicRef2
;set Drogenkaestchen to PHQDrogeRef2
;set Kleiderschrank to PHQKleidungRef2
;set Kuelschrank to PHQFreezeRef2
;set KuecheX to PHQKuecheXRef2
;set MedizinX to PHQMedicXREF2
;set WerkzeugX to PHQToolXREF2
;set LuxusX to PHQLuxusXREF2
;set SicherheitX to PHQSecurityXREF2
;elseif player.getincell ==
;set GrosseKiste to PHQGroßeKisteRef3
;set Sqadkiste to PHQSqadkisteRef3
;set Safe to PQHSafeRef3
;set MunitionsBeh to PHQMuniRef3
;set Granatenkiste to PHQNadesRef3
;set Rummelkiste to PHQRummelRef3
;set Werkzeug to PHQToolsRef3
;set Medizinkasten to PHQMedicRef3
;set Drogenkaestchen to PHQDrogeRef3
;set Kleiderschrank to PHQKleidungRef3
;set Kuelschrank to PHQFreezeRef3
;set KuecheX to PHQKuecheXRef3
;set MedizinX to PHQMedicXREF3
;set WerkzeugX to PHQToolXREF3
;set LuxusX to PHQLuxusXREF3
;set SicherheitX to PHQSecurityXREF3
;elseif player.getincell ==
;set GrosseKiste to PHQGroßeKisteRef4
;set Sqadkiste to PHQSqadkisteRef4
;set Safe to PQHSafeRef4
;set MunitionsBeh to PHQMuniRef4
;set Granatenkiste to PHQNadesRef4
;set Rummelkiste to PHQRummelRef4
;set Werkzeug to PHQToolsRef4
;set Medizinkasten to PHQMedicRef4
;set Drogenkaestchen to PHQDrogeRef4
;set Kleiderschrank to PHQKleidungRef4
;set Kuelschrank to PHQFreezeRef4
;set KuecheX to PHQKuecheXRef4
;set MedizinX to PHQMedicXREF4
;set WerkzeugX to PHQToolXREF4
;set LuxusX to PHQLuxusXREF4
;set SicherheitX to PHQSecurityXREF4
;elseif player.getincell ==
;set GrosseKiste to PHQGroßeKisteRef5
;set Sqadkiste to PHQSqadkisteRef5
;set Safe to PQHSafeRef5
;set MunitionsBeh to PHQMuniRef5
;set Granatenkiste to PHQNadesRef5
;set Rummelkiste to PHQRummelRef5
;set Werkzeug to PHQToolsRef5
;set Medizinkasten to PHQMedicRe5
;set Drogenkaestchen to PHQDrogeRef5
;set Kleiderschrank to PHQKleidungRef5
;set Kuelschrank to PHQFreezeRef5
;set KuecheX to PHQKuecheXRef5
;set MedizinX to PHQMedicXREF5
;set WerkzeugX to PHQToolXREF5
;set LuxusX to PHQLuxusXREF5
;set SicherheitX to PHQSecurityXREF5
;elseif player.getincell ==
;set GrosseKiste to PHQGroßeKisteRef6
;set Sqadkiste to PHQSqadkisteRef6
;set Safe to PQHSafeRef6
;set MunitionsBeh to PHQMuniRef6
;set Granatenkiste to PHQNadesRef6
;set Rummelkiste to PHQRummelRef6
;set Werkzeug to PHQToolsRef6
;set Medizinkasten to PHQMedicRef6
;set Drogenkaestchen to PHQDrogeRef6
;set Kleiderschrank to PHQKleidungRef6
;set Kuelschrank to PHQFreezeRef6
;set KuecheX to PHQKuecheXRef6
;set MedizinX to PHQMedicXREF6
;set WerkzeugX to PHQToolXREF6
;set LuxusX to PHQLuxusXREF6
;set SicherheitX to PHQSecurityXREF6
;elseif player.getincell ==
;set GrosseKiste to PHQGroßeKisteRef7
;set Sqadkiste to PHQSqadkisteRef7
;set Safe to PQHSafeRef7
;set MunitionsBeh to PHQMuniRef7
;set Granatenkiste to PHQNadesRef7
;set Rummelkiste to PHQRummelRef7
;set Werkzeug to PHQToolsRef7
;set Medizinkasten to PHQMedicRef7
;set Drogenkaestchen to PHQDrogeRef7
;set Kleiderschrank to PHQKleidungRef7
;set Kuelschrank to PHQFreezeRef7
;set KuecheX to PHQKuecheXRef7
;set MedizinX to PHQMedicXREF7
;set WerkzeugX to PHQToolXREF7
;set LuxusX to PHQLuxusXREF7
;set SicherheitX to PHQSecurityXREF7
endif
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |BLOCKWECHSEL||||||||||||||||||||||||||||||||||||| ||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;((((((((((((((((((((((((((((((((((((((((((((((((( (MENUEAUSWAHL )))))))))))))))))))))))))))))))))))))))))))))))))) ))))))))))))))))))))))))))
set Button to GetButtonPressed
;button 0 = Nichts machen
;Button 1 = Aktivieren
;Button 2 = Einsortieren
;Button 3 = 2 tages ration
;Button 4 = 5 tages ration
;Button 5 =Styles aufbauen
if ( Button == 0 )
;((((((((((((((((((((((((((((((((((((((((((((((((( (NICHTS MACHEN)))))))))))))))))))))))))))))))))))))))))))) ))))))))))))))))))))))))))))))))))
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |BLOCKWECHSEL||||||||||||||||||||||||||||||||||||| ||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
elseif ( Button == 1 )
;((((((((((((((((((((((((((((((((((((((((((((((((( (Kiste normal Öffnen )))))))))))))))))))))))))))))))))))))))))))))))))) )))))))))))))))))))))))
activate
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |BLOCKWECHSEL||||||||||||||||||||||||||||||||||||| ||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
elseif ( Button == 2 )
;((((((((((((((((((((((((((((((((((((((((((((((((( (Einsortieren )))))))))))))))))))))))))))))))))))))))))))))))))) ))))))))))))))))))))))))))))))))))
player.RemoveAllItems GrosseKiste
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
Set Behaelter to Safe
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
Set Behaelter to MunitionsBeh
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
Set Behaelter to Granatenkiste
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
Set Behaelter to Rummelkiste
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
Set Behaelter to Werkzeug
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
Set Behaelter to Medizinkasten
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
set Gegenstand to BloodPack
set Anzahl to GrosseKiste.getitemcount Gegenstand
GrosseKiste.removeitem Gegenstand Anzahl
Behaelter.Additem Gegenstand Anzahl
set Gegenstand to Morphine
set Gegenstand to RadX
set Gegenstand to Stimpak
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
Set Behaelter to Drogenkaestchen
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
set Gegenstand to ABR111EssenStealthBoy
set Gegenstand to AntNectar
set Gegenstand to AntQueenPheromones
set Gegenstand to Buffout
set Gegenstand to Jet
set Gegenstand to Mentats
set Gegenstand to MS04FireAntNectar
set Gegenstand to MS09Ultrajet
set Gegenstand to MS15Mentat01
set Gegenstand to MS15Mentat02
set Gegenstand to MS15Mentat03
set Gegenstand to StealthBoy
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
Set Behaelter to Kleiderschrank
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
Set Behaelter to Kuelschrank
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
set Gegenstand to ABR111EssenAntMeat
set Gegenstand to ABR111EssenBloatflyGeroestet
set Gegenstand to ABR111EssenBrahminSteak
set Gegenstand to ABR111EssenCaveFungus
set Gegenstand to ABR111EssenDogMeat
set Gegenstand to ABR111EssenEpa
set Gegenstand to ABR111EssenKaltesBeer
set Gegenstand to ABR111EssenMirelurkBraten
set Gegenstand to ABR111EssenMoleRatMeat
set Gegenstand to ABR111EssenProteinriegel
set Gegenstand to ABR111EssenProteinriegel2
set Gegenstand to ABR111EssenRadKakerlake
set Gegenstand to ABR111EssenScotchKalt
set Gegenstand to ABR111EssenStrangeMeat
set Gegenstand to ABR111EssenUltrashake
set Gegenstand to ABR111EssenUltrashake2
set Gegenstand to ABR111EssenVodkaKalt
set Gegenstand to ABR111EssenWaterPurifiedKalt
set Gegenstand to ABR111EssenWhiskeyKalt
set Gegenstand to ABR111EssenYaoGuaiMeat
set Gegenstand to Apple
set Gegenstand to AntMeat
set Gegenstand to Beer
set Gegenstand to BlamcoMacandCheese
set Gegenstand to BloatflyMeat
set Gegenstand to BrahminSteak
set Gegenstand to Bubblegum
set Gegenstand to Carrot
set Gegenstand to CaveFungus
set Gegenstand to CG02Sweetroll
set Gegenstand to Cram
set Gegenstand to DandyBoyApples
set Gegenstand to DogMeat
set Gegenstand to FancyLadsSnackCakes
set Gegenstand to HumanFlesh
set Gegenstand to IguanaBits
set Gegenstand to IguanaOnAStick
set Gegenstand to InstaMash
set Gegenstand to JunkFood
set Gegenstand to MirelurkCakes
set Gegenstand to MirelurkMeat
set Gegenstand to MirelurkMeatHatchling
set Gegenstand to MirelurkMeatSoftshell
set Gegenstand to MoleRatMeat
set Gegenstand to MoleRatWonderMeat
set Gegenstand to MS05FinNukaPie
set Gegenstand to MS05IceNukaCola
set Gegenstand to MS05NukaColaQtm
set Gegenstand to MS05NukalurkMeat
set Gegenstand to Mutfruit1
set Gegenstand to Mutfruit2
set Gegenstand to Noodles
set Gegenstand to NukaCola
set Gegenstand to Pear
set Gegenstand to PorkNBeans
set Gegenstand to Potato
set Gegenstand to PotatoCrisps
set Gegenstand to Psycho
set Gegenstand to RadAway
set Gegenstand to RadioactiveGumDrops
set Gegenstand to RadroachMeat
set Gegenstand to SalisburySteak
set Gegenstand to Scotch
set Gegenstand to SquirrelBits
set Gegenstand to SquirrelOnAStick
set Gegenstand to SquirrelStew
set Gegenstand to StrangeMeat
set Gegenstand to StrangeMeatPie
set Gegenstand to SugarBombs01
set Gegenstand to Vodka
set Gegenstand to WaterPurified
set Gegenstand to WaterUnpurified
set Gegenstand to Whiskey
set Gegenstand to Wine
set Gegenstand to YaoGuaiMeat
set Gegenstand to YumYumDeviledEggs
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |BLOCKWECHSEL||||||||||||||||||||||||||||||||||||| ||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
elseif ( Button == 3 )
;((((((((((((((((((((((((((((((((((((((((((((((((( (2 tages Ration )))))))))))))))))))))))))))))))))))))))))))))))))) ))))))))))))))))))))))))))))))
; Sqadkiste.additem
; Trinken
; Essen
; Stimpacks
; Granaten
; 10mm Magnum Munition
; 10mm Magnum Pistole
; Messer
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |BLOCKWECHSEL||||||||||||||||||||||||||||||||||||| ||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
elseif ( Button == 4 )
;((((((((((((((((((((((((((((((((((((((((((((((((( (5 tages Ration )))))))))))))))))))))))))))))))))))))))))))))))))) )))))))))))))))))))))))))))))))
; Sqadkiste.additem
; Trinken
; Essen
; Stimpacks
; Granaten
; 10mm Magnum Munition
; 10mm Magnum Pistole
; Messer
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |BLOCKWECHSEL||||||||||||||||||||||||||||||||||||| ||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
elseif ( Button == 5 )
;((((((((((((((((((((((((((((((((((((((((((((((((( (ENABLEN WENN STYLES GEKAUFT )))))))))))))))))))))))))))))))))))))))))))))))
; if (safe.getitemcount RechnungKueche) && (KuecheX.getdisabled ==1)
; KuecheX.enable
; safe.removeitem RechnungKueche 1 1
;endif
; if (Player.getitemcount RechnungMedizin) && (MedizinX.getdisabled ==1)
; MedizinX.enable
; safe.removeitem RechnungMedizin 1 1
;endif
; if (safe.getitemcount RechnungWerkzeug) && (WerkzeugX.getdisabled ==1)
; WerkzeugX.enable
; safe.removeitem RechnungWerkzeug 1 1
;endif
; if (safe.getitemcount RechnungLuxus) && (LuxusX.getdisabled ==1)
; LuxusX.enable
; safe.removeitem RechnungLuxus 1 1
;endif
; if (safe.getitemcount RechnungSicherheit) && (SicherheitX.getdisabled ==1)
; SicherheitX.enable
; safe.removeitem RechnungSicherheit 1 1
;endif
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |BLOCKWECHSEL||||||||||||||||||||||||||||||||||||| ||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| |||||||
;es folgt endif des menue get button
endif
end
und endlich fertig, das läuferscript
alle 5 sekunden reguliert es munitionsgewicht
essensbedarf usw.
zb wird alle 5 sekunden geprüft ob 24 stunden um sin seit dem letzten mal als es waren für die händler gab, wenn ja gibt es neue waren (also alle 24 ingamestunden könnte es mal 2-3 Sekunden laggen)
scn ABR111ScriptDDKLaeufer
short Initiator
short Hurencounter
short Essenaktiv
short Essennorm
short Essenreserve
short EssenStAlt
short EssenStNeu
long munCounter
long munSumme
short munGewichtalt
short munGewichtfinal
short Stunde
short AlleTage
short AlleTageAlt
short Tagesdifferenz
Short AktuellerTag
Short AktuellerTagAlt
Short Stunde
Short StundeAlt
Short StundeAkt
float Realtimer3
short Trinkennorm
short TrinkenReserve
short Trinkenaktiv
short TrinkenStNeu
short TrinkenStAlt
short Schlafaktiv
short Schlafnorm
short SchlafStAlt
short SchlafStNeu
short Handelstag
Short Maxlevel
Short Bronze
Short Silber
Short Gold
Short Platin
short Ebene
;ABR1GlobalerTresor.getitemcount
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| ||||||
begin OnActivate
if ( IsActionRef Player == 1 )
activate
endif
end
;||||||||||||||||||||||||||||||||||||||||||||||||| |||||||||||||||||||||||||||||||||||||||||||||||||| ||||||
begin gamemode
if Realtimer3 < 3
set Realtimer3 to Realtimer3 + GetSecondsPassed
else
;---------------------------------------------------------------------------------------------------------------
;(((((((((((((((((((((((((((((((((((HH Teurer)))))))))))))))))))))))))))))))))))))))))))) )))))))))))))))))))))))))
set Hurencounter to Vault101OverseersDeskREF.getitemcount OfficeID
if ( Hurencounter == 1 ) && ( Player.GetInCell ABR1Handelshaus == 1 )
Player.addperk Abr111PerkHHTeurer
elseif ( Hurencounter != 1 ) || ( Player.GetInCell ABR1Handelshaus != 1 )
Player.Removeperk Abr111PerkHHTeurer
endif
;(((((((((((((((((((((((((((((((((((NeuePERKS))))) )))))))))))))))))))))))))))))))))))))))))))))))))) ))))))))))))))
;(((((((((((((((((((((((((((((((((((HAUSBESITZER)) )))))))))))))))))))))))))))))))))))))))))))))))))) )))))))))))))))))
set Hurencounter to Vault101OverseersDeskREF.getitemcount Camera
if ( Hurencounter >= 1 )
set Hurencounter to player.getitemcount ABR111KeyPenthouse
set Hurencounter to ( Hurencounter + player.getitemcount ABR111KeyParadiseFallsSewer )
set Hurencounter to ( Hurencounter + player.getitemcount ABR111KeyHaus )
set Hurencounter to ( Hurencounter + player.getitemcount ABR111KeyAussenposten )
set Hurencounter to ( Hurencounter + player.getitemcount TenpennySuiteKey )
set Hurencounter to ( Hurencounter + player.getitemcount MegatonHouseKey )
if ( Hurencounter >= 1 )
Player.addperk Abr111PerkHausbesitzer
else
Player.Removeperk Abr111PerkHausbesitzer
endif
endif
;(((((((((((((((((((((((((((((((((((Handelsscript) )))))))))))))))))))))))))))))))))))))))))))))))))) ))))))))))))))))))
set Handelstag to Vault101OverseersDeskREF.getitemcount Harmonica01
if Handelstag >=24
Vault101OverseersDeskREF.Removeitem Harmonica01 Handelstag
set Maxlevel to GetGameSetting iMaxCharacterLevel
set Ebene to player.getlevel
set Bronze to 1
set Silber to ((Maxlevel/10)*3)
set Gold to ((Maxlevel/10)*6)
set Platin to ((Maxlevel/10)*9)
;---------------------------------------------------------------------------------------------------------------
if ebene >= Bronze
;essen (nur bronze sonst keine stufe)
VendorChestBuriedBrassLanternREF.additem ABR111lvlHandelEssen 50
VendorChestBuriedGretaRef.additem ABR111lvlHandelEssen 50
VendorChestBuriedJoePortorRef.additem ABR111lvlHandelEssen 50
VendorChestBuriedMargaretPrimroseRef.additem ABR111lvlHandelEssen 50
VendorChestBuriedStaleyRef.additem ABR111lvlHandelEssen 50
VendorChestBuriedGrandmaSparkleRef.additem ABR111lvlHandelEssen 50
VendorChestBuriedVeraWeatherlyRef.additem ABR111lvlHandelEssen 50
VendorChestBuriedEclairRef.additem ABR111lvlHandelEssen 50
;Alkohol (nur Bronze sonst keine Stufe)
VendorChestBuriedAhzrukhalRef.additem ABR111lvlHandelAlkohol 50
VendorChestBuriedBelleBonnyRef.additem ABR111lvlHandelAlkohol 50
VendorChestBuriedGobREF.additem ABR111lvlHandelAlkohol 50
VendorChestBuriedJoePortorRef.additem ABR111lvlHandelAlkohol 50
VendorChestBuriedShakesRef.additem ABR111lvlHandelAlkohol 50
;liste Drogen(nur Bronze sonst keine Stufe)
VendorChestBuriedCantelliRef.additem ABR111lvlHandelDrogen 50
VendorChestBuriedCutterChemsRef.additem ABR111lvlHandelDrogen 50
VendorChestBuriedLeoStahlDrugsRef.additem ABR111lvlHandelDrogen 50
VendorChestHoffREF.additem ABR111lvlHandelDrogen 50
;liste Medizin
VendorChestBuriedCutterRef.additem ABR111lvlHandelMedizin 50
VendorChestBuriedDocChurchRef.additem ABR111lvlHandelMedizin 50
VendorChestBuriedDoctorBanfieldRef.additem ABR111lvlHandelMedizin 50
VendorChestBuriedDoctorBarrowsRef.additem ABR111lvlHandelMedizin 50
VendorChestBuriedDoctorPrestonRef.additem ABR111lvlHandelMedizin 50
VendorChestBuriedRedRef.additem ABR111lvlHandelMedizin 50
VendorChestHoffREF.additem ABR111lvlHandelMedizin 50
;liste Zeugs
VendorChestBuriedKnickKnackRef.additem ABR111lvlHandelZeugBronze 50
VendorChestBuriedLydiaMontenegroRef.additem ABR111lvlHandelZeugBronze 50
VendorChestBuriedMoiraBrownRef.additem ABR111lvlHandelZeugBronze 50
VendorChestBuriedSeagraveHolmesRef.additem ABR111lvlHandelZeugBronze 50
VendorChestBuriedMichaelMastersRef.additem ABR111lvlHandelZeugBronze 50
VendorChestBuriedTheFamilyKarlRef.additem ABR111lvlHandelZeugBronze 50
VendorChestWolfgangREF.additem ABR111lvlHandelZeugBronze 50
;Liste munition
VendorChestBuriedKnickKnackRef.additem ABR111lvlHandelMunition 15
VendorChestBuriedLydiaMontenegroRef.additem ABR111lvlHandelMunition 15
VendorChestBuriedMoiraBrownRef.additem ABR111lvlHandelMunition 15
VendorChestBuriedProntoRef.additem ABR111lvlHandelMunition 15
VendorChestBuriedSmilingJackRef.additem ABR111lvlHandelMunition 15
VendorChestBuriedSydneyRef.additem ABR111lvlHandelMunition 15
VendorChestBuriedTulipRef.additem ABR111lvlHandelMunition 15
VendorChestBuriedChiefGustavoRef.additem ABR111lvlHandelMunition 15
VendorChestBuriedMichaelMastersRef.additem ABR111lvlHandelMunition 15
VendorChestBuriedTheFamilyKarlRef.additem ABR111lvlHandelMunition 15
VendorChestBuriedKnightSergeantDurgaRef.additem ABR111lvlHandelMunition 15
VendorChestHarithREF.additem ABR111lvlHandelMunition 15
;liste Kleidung
VendorChestBuriedBannonRef.additem ABR111lvlHandelKleidungAProzBronze 40
VendorChestBuriedLydiaMontenegroRef.additem ABR111lvlHandelKleidungAProzBronze 40
VendorChestBuriedMoiraBrownRef.additem ABR111lvlHandelKleidungAProzBronze 40
VendorChestBuriedProntoRef.additem ABR111lvlHandelKleidungAProzBronze 40
VendorChestBuriedSmilingJackRef.additem ABR111lvlHandelKleidungAProzBronze 40
VendorChestBuriedTulipRef.additem ABR111lvlHandelKleidungAProzBronze 40
VendorChestBuriedChiefGustavoRef.additem ABR111lvlHandelKleidungAProzBronze 40
VendorChestBuriedBessieLynnRef.additem ABR111lvlHandelKleidungAProzBronze 40
VendorChestBuriedMichaelMastersRef.additem ABR111lvlHandelKleidungAProzBronze 40
VendorChestBuriedTheFamilyKarlRef.additem ABR111lvlHandelKleidungAProzBronze 40
VendorChestBuriedKnightSergeantDurgaRef.additem ABR111lvlHandelKleidungAProzBronze 40
VendorChestCrowREF.additem ABR111lvlHandelKleidungAProzBronze 40
;liste Waffen
VendorChestBuriedKnickKnackRef.additem ABR111lvlHandelWaffenAProzBronze 40
VendorChestBuriedLydiaMontenegroRef.additem ABR111lvlHandelWaffenAProzBronze 40
VendorChestBuriedMoiraBrownRef.additem ABR111lvlHandelWaffenAProzBronze 40
VendorChestBuriedProntoRef.additem ABR111lvlHandelWaffenAProzBronze 40
VendorChestBuriedSmilingJackRef.additem ABR111lvlHandelWaffenAProzBronze 40
VendorChestBuriedSydneyRef.additem ABR111lvlHandelWaffenAProzBronze 40
VendorChestBuriedTulipRef.additem ABR111lvlHandelWaffenAProzBronze 40
VendorChestBuriedChiefGustavoRef.additem ABR111lvlHandelWaffenAProzBronze 40
VendorChestBuriedMichaelMastersRef.additem ABR111lvlHandelWaffenAProzBronze 40
VendorChestBuriedTheFamilyKarlRef.additem ABR111lvlHandelWaffenAProzBronze 40
VendorChestBuriedKnightSergeantDurgaRef.additem ABR111lvlHandelWaffenAProzBronze 40
VendorChestHarithREF.additem ABR111lvlHandelWaffenAProzBronze 40
endif
;---------------------------------------------------------------------------------------------------------------
if ebene >= Silber
;liste Zeugs
VendorChestBuriedKnickKnackRef.additem ABR111lvlHandelZeugSilber 50
VendorChestBuriedLydiaMontenegroRef.additem ABR111lvlHandelZeugSilber 50
VendorChestBuriedMoiraBrownRef.additem ABR111lvlHandelZeugSilber 50
VendorChestBuriedSeagraveHolmesRef.additem ABR111lvlHandelZeugSilber 50
VendorChestBuriedMichaelMastersRef.additem ABR111lvlHandelZeugSilber 50
VendorChestBuriedTheFamilyKarlRef.additem ABR111lvlHandelZeugSilber 50
VendorChestWolfgangREF.additem ABR111lvlHandelZeugSilber 50
;Liste munition
VendorChestBuriedKnickKnackRef.additem ABR111lvlHandelMunition 20
VendorChestBuriedLydiaMontenegroRef.additem ABR111lvlHandelMunition 20
VendorChestBuriedMoiraBrownRef.additem ABR111lvlHandelMunition 20
VendorChestBuriedProntoRef.additem ABR111lvlHandelMunition 20
VendorChestBuriedSmilingJackRef.additem ABR111lvlHandelMunition 20
VendorChestBuriedSydneyRef.additem ABR111lvlHandelMunition 20
VendorChestBuriedTulipRef.additem ABR111lvlHandelMunition 20
VendorChestBuriedChiefGustavoRef.additem ABR111lvlHandelMunition 20
VendorChestBuriedMichaelMastersRef.additem ABR111lvlHandelMunition 20
VendorChestBuriedTheFamilyKarlRef.additem ABR111lvlHandelMunition 20
VendorChestBuriedKnightSergeantDurgaRef.additem ABR111lvlHandelMunition 20
VendorChestHarithREF.additem ABR111lvlHandelMunition 20
;liste Kleidung
VendorChestBuriedLydiaMontenegroRef.additem ABR111lvlHandelKleidungAProzSilber 40
VendorChestBuriedMoiraBrownRef.additem ABR111lvlHandelKleidungAProzSilber 40
VendorChestBuriedProntoRef.additem ABR111lvlHandelKleidungAProzSilber 40
VendorChestBuriedSmilingJackRef.additem ABR111lvlHandelKleidungAProzSilber 40
VendorChestBuriedTulipRef.additem ABR111lvlHandelKleidungAProzSilber 40
VendorChestBuriedChiefGustavoRef.additem ABR111lvlHandelKleidungAProzSilber 40
VendorChestBuriedBessieLynnRef.additem ABR111lvlHandelKleidungAProzSilber 40
VendorChestBuriedMichaelMastersRef.additem ABR111lvlHandelKleidungAProzSilber 40
VendorChestBuriedTheFamilyKarlRef.additem ABR111lvlHandelKleidungAProzSilber 40
VendorChestBuriedKnightSergeantDurgaRef.additem ABR111lvlHandelKleidungAProzSilber 40
VendorChestCrowREF.additem ABR111lvlHandelKleidungAProzSilber 40
;liste Waffen
VendorChestBuriedKnickKnackRef.additem ABR111lvlHandelWaffenAProzSilber 40
VendorChestBuriedLydiaMontenegroRef.additem ABR111lvlHandelWaffenAProzSilber 40
VendorChestBuriedMoiraBrownRef.additem ABR111lvlHandelWaffenAProzSilber 40
VendorChestBuriedProntoRef.additem ABR111lvlHandelWaffenAProzSilber 40
VendorChestBuriedSmilingJackRef.additem ABR111lvlHandelWaffenAProzSilber 40
VendorChestBuriedSydneyRef.additem ABR111lvlHandelWaffenAProzSilber 40
VendorChestBuriedTulipRef.additem ABR111lvlHandelWaffenAProzSilber 40
VendorChestBuriedChiefGustavoRef.additem ABR111lvlHandelWaffenAProzSilber 40
VendorChestBuriedMichaelMastersRef.additem ABR111lvlHandelWaffenAProzSilber 40
VendorChestBuriedTheFamilyKarlRef.additem ABR111lvlHandelWaffenAProzSilber 40
VendorChestBuriedKnightSergeantDurgaRef.additem ABR111lvlHandelWaffenAProzSilber 40
VendorChestHarithREF.additem ABR111lvlHandelWaffenAProzSilber 40
endif
AN DIESER STELLE HABE ICH GOLD UND PLATIN AUS DEM SCRIPT GELÖSCHT, DER TEXT WAR DEM FORUM ZU LANG :D
;---------------------------------------------------------------------------------------------------------------
Vault101OverseersDeskREF.removeitem Harmonica01 Handelstag
;endif des 24er handelsrytmuses
endif
;(((((((((((((((((((((((((((((((((((Munition)))))) )))))))))))))))))))))))))))))))))))))))))))))))))) )))))))))))))
set Hurencounter to Vault101OverseersDeskREF.getitemcount 1111ABR1111SpezialOptionMunitionsgewicht
if Hurencounter == 1
set munCounter to 0
set munCounter to ( ((Player.getItemcount ABR111Munition460WeatherbyMagnum) * 40) + ((Player.getItemcount ABR111Munition10mmMagnum ) * 15) + ((Player.getItemcount AmmoMesmetronPowerCell) * 10) + ((Player.getItemcount AmmoSmallEnergyCell ) * 10) )
set munCounter to (muncounter + ((Player.getItemcount AmmoAlienPowerCell ) * 10 ) + ((Player.getItemcount AmmoElectronChargePack ) * 10 ) + ((Player.getItemcount AmmoMicroFusionCell ) * 10 ) + ((Player.getItemcount AmmoFlamerFuel ) * 8 ) + ((Player.getItemcount Ammo44magnum ) * 30 ) )
set munCounter to (muncounter + ((Player.getItemcount AmmoShotgunShell) * 32) + ((Player.getItemcount Ammo556mm ) * 12 ) + ((Player.getItemcount Ammo10mm) * 14) + ((Player.getItemcount Ammo32Caliber) * 13) + ((Player.getItemcount AmmoDart ) * 15) + ((Player.getItemcount Ammo5mm ) * 10) )
set munCounter to (muncounter + ((Player.getItemcount AmmoBB ) * 2) + ((Player.getItemcount Ammo308Caliber ) * 24) + ((Player.getItemcount AmmoRailwaySpikes ) * 30) + ((Player.getItemcount AmmoMissile ) * 3000) + ((Player.getItemcount ammoFatMan ) * 5000) +((Player.getItemcount ABR111MunitionWerfergranate ) * 500) )
set munGewichtalt to (player.getitemcount 1111ABR1111SpezialOptionMunitionsgewicht)
set munGewichtfinal to ( munCounter * 0.002 )
if ( munGewichtfinal != munGewichtalt )
set mungewichtfinal to ( munGewichtfinal - munGewichtalt )
player.additem 1111ABR1111SpezialOptionMunitionsgewicht munGewichtfinal
endif
endif
;(((((((((((((((((((((((((((((((((((Essen))))))))) )))))))))))))))))))))))))))))))))))))))))))))))))) ))))))))))
set Essenaktiv to (Vault101OverseersDeskREF.getitemcount Lunchbox )
if Essenaktiv >= 1
set Essennorm to (Vault101OverseersDeskREF.getitemcount Apple )
set EssenReserve to (Vault101OverseersDeskREF.getitemcount Noodles )
;übermengen entfernen
if Essennorm > 48
set Hurencounter to (Essennorm - 48)
Vault101OverseersDeskREF.removeitem Apple Hurencounter
set Essennorm to 48
endif
if EssenReserve > 72
set Hurencounter to (Essenreserve - 72)
Vault101OverseersDeskREF.removeitem Noodles Hurencounter
set EssenReserve to 72
endif
;Statusberechnung
set EssenStAlt to EssenStNeu
if ( EssenReserve <= 6)
set EssenStNeu to 7
if ( EssenStNeu != EssenStAlt )
Showmessage ABR111MsgOptionEssenTrinkenSchlafTot
Player.removeperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
endif
elseif ( Essennorm == 0 ) && ( EssenReserve <= 50) && ( EssenReserve > 6)
set EssenStNeu to 6
if ( EssenStNeu != EssenStAlt )
Showmessage ABR111MsgOptionEssenTrinkenSchlafWarn
Player.removeperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
endif
elseif ( Essennorm == 0 ) && ( EssenReserve > 50 )
set EssenStNeu to 5
if ( EssenStNeu != EssenStAlt )
Showmessage ABR111MsgOptionEssenTrinkenSchlafHinweis
Player.removeperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
endif
elseif ( Essennorm <= 12 )
set EssenStNeu to 4
if ( EssenStNeu != EssenStAlt )
Player.removeperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
endif
elseif ( Essennorm > 12 ) && ( Essennorm < 36 )
set EssenStNeu to 3
if ( EssenStNeu != EssenStAlt )
Player.removeperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
endif
elseif ( Essennorm >= 36 ) && ( Essennorm < 42 )
set EssenStNeu to 2
if ( EssenStNeu != EssenStAlt )
Player.removeperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
endif
elseif ( Essennorm >= 42 )
set EssenStNeu to 1
if ( EssenStNeu != EssenStAlt )
Player.removeperk ABR111PerkEssen1
Player.addperk ABR111PerkEssen1
endif
;endif essen Status
endif
;endif essen
endif
;(((((((((((((((((((((((((((((((((((TRINKEN))))))) )))))))))))))))))))))))))))))))))))))))))))))))))) ))))))))))))
set Trinkenaktiv to (Vault101OverseersDeskREF.getitemcount NukaTruck )
if Trinkenaktiv >= 1
set Trinkennorm to (Vault101OverseersDeskREF.getitemcount NukaCola )
set TrinkenReserve to (Vault101OverseersDeskREF.getitemcount MS05NukaColaQtm )
;übermengen entfernen
if Trinkennorm > 48
set Hurencounter to (Trinkennorm - 48)
Vault101OverseersDeskREF.removeitem NukaCola Hurencounter
set Trinkennorm to 48
endif
if TrinkenReserve > 72
set Hurencounter to (Trinkenreserve - 72)
Vault101OverseersDeskREF.removeitem MS05NukaColaQtm Hurencounter
set TrinkenReserve to 72
endif
;Statusberechnung
set TrinkenStAlt to TrinkenStNeu
if ( Trinkennorm == 0 ) && ( TrinkenReserve <= 6)
set TrinkenStNeu to 7
if ( TrinkenStNeu != TrinkenStAlt )
Showmessage ABR111MsgOptionEssenTrinkenSchlafTot
Player.removeperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
endif
elseif ( Trinkennorm == 0 ) && ( TrinkenReserve <= 50) && ( TrinkenReserve > 6)
set TrinkenStNeu to 6
if ( TrinkenStNeu != TrinkenStAlt )
Showmessage ABR111MsgOptionEssenTrinkenSchlafWarn
Player.removeperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
endif
elseif ( Trinkennorm == 0 ) && ( TrinkenReserve > 50 )
set TrinkenStNeu to 5
if ( TrinkenStNeu != TrinkenStAlt )
Showmessage ABR111MsgOptionEssenTrinkenSchlafHinweis
Player.removeperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
endif
elseif ( Trinkennorm <= 12 )
set TrinkenStNeu to 4
if ( TrinkenStNeu != TrinkenStAlt )
Player.removeperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
endif
elseif ( Trinkennorm > 12 ) && ( Trinkennorm < 36 )
set TrinkenStNeu to 3
if ( TrinkenStNeu != TrinkenStAlt )
Player.removeperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
endif
elseif ( Trinkennorm >= 36 ) && ( Trinkennorm < 42 )
set TrinkenStNeu to 2
if ( TrinkenStNeu != TrinkenStAlt )
Player.removeperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
endif
elseif ( Trinkennorm >= 42 )
set TrinkenStNeu to 1
if ( TrinkenStNeu != TrinkenStAlt )
Player.removeperk ABR111PerkTrinken1
Player.addperk ABR111PerkTrinken1
endif
;endif Trinken Status
endif
;endif Trinken
endif
;(((((((((((((((((((((((((((((((((((Schlaf)))))))) )))))))))))))))))))))))))))))))))))))))))))))))))) )))))))))))
set Schlafaktiv to (Vault101OverseersDeskREF.getitemcount Opthalmoscope )
if Schlafaktiv >= 1
set Schlafnorm to (Vault101OverseersDeskREF.getitemcount BigPot )
;übermengen entfernen
if Schlafnorm > 120
set Hurencounter to (Schlafnorm - 120)
Vault101OverseersDeskREF.removeitem BigPot Hurencounter
set Schlafnorm to 120
endif
;Statusberechnung
set SchlafStAlt to SchlafStNeu
if ( Schlafnorm < 6 )
set SchlafStNeu to 7
if ( SchlafStNeu != SchlafStAlt )
Showmessage ABR111MsgOptionEssenTrinkenSchlafTot
Player.removeperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
endif
elseif ( Schlafnorm >= 6 ) && ( Schlafnorm < 36 )
set SchlafStNeu to 6
if ( SchlafStNeu != SchlafStAlt )
Showmessage ABR111MsgOptionEssenTrinkenSchlafTot
Player.removeperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
endif
elseif ( Schlafnorm >= 36 ) && ( Schlafnorm < 65 )
set SchlafStNeu to 5
if ( SchlafStNeu != SchlafStAlt )
Showmessage ABR111MsgOptionEssenTrinkenSchlafTot
Player.removeperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
endif
elseif ( Schlafnorm >= 65 ) && ( Schlafnorm < 82 )
set SchlafStNeu to 4
if ( SchlafStNeu != SchlafStAlt )
Showmessage ABR111MsgOptionEssenTrinkenSchlafTot
Player.removeperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
endif
elseif ( Schlafnorm >= 82 ) && ( Schlafnorm < 96 )
set SchlafStNeu to 3
if ( SchlafStNeu != SchlafStAlt )
; Showmessage ABR111MsgOptionEssenTrinkenSchlafTot
Player.removeperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
endif
elseif ( Schlafnorm >= 96 ) && ( Schlafnorm < 102 )
set SchlafStNeu to 2
if ( SchlafStNeu != SchlafStAlt )
; Showmessage ABR111MsgOptionEssenTrinkenSchlafTot
Player.removeperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
endif
elseif ( Schlafnorm >= 102 )
set SchlafStNeu to 1
if ( SchlafStNeu != SchlafStAlt )
; Showmessage ABR111MsgOptionEssenTrinkenSchlafTot
Player.removeperk ABR111PerkSchlafen1
Player.addperk ABR111PerkSchlafen1
endif
;endif Schlaf Status
endif
;endif Schlaf
endif
;(((((((((((((((((((((((((((((((((((Zeitnehmer)))) )))))))))))))))))))))))))))))))))))))))))))))))))) )))))))
;initialisierung
if initiator != -1
set AlleTageAlt to GameDaysPassed
set StundeAlt to GameHour
set AktuellerTagAlt to GameDay
set initiator to -1
endif
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
set AlleTage to GameDaysPassed
if ( AlleTage != AlleTageAlt )
set Tagesdifferenz to (AlleTage - AlleTageAlt)
set AlleTageAlt to AlleTage
endif
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
set Stundeakt to GameHour
if ( Stundeakt == StundeAlt ) && (Tagesdifferenz == 0)
; Do nothing
elseif ( Stundeakt > StundeAlt ) && (Tagesdifferenz == 0)
set stunde to ( Stundeakt - Stundealt )
elseif (Tagesdifferenz == 1)
set Stunde to (Stundeakt + ( 23 - Stundealt ))
elseif ( Tagesdifferenz >= 2 )
set Stunde to ((Stundeakt + ( 23 - Stundealt )) + ((Tagesdifferenz -1) * 24))
endif
set Tagesdifferenz to 0
set Stundealt to Stundeakt
;---------------------------------------------------------------------------------------------------------------
set Realtimer3 to 0
; Endif tagesblock
endif
;>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
;>>>>>>>>>>>>>>>>>1Stunde ingame Block<<<<<<<<<<<<<<<<<<<<<<
;>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
if ( Stunde != 0 )
;---------------------------------------------------------------------------------------------------------------
if ( Vault101OverseersDeskREF.getitemcount Apple >= 1 )
Vault101OverseersDeskREF.removeitem Apple 1
endif
if (Vault101OverseersDeskREF.getitemcount Noodles >= 0 ) && ( Vault101OverseersDeskREF.getitemcount Apple == 0 )
Vault101OverseersDeskREF.removeitem Noodles 1
endif
if ( Vault101OverseersDeskREF.getitemcount BigPot >= 1)
Vault101OverseersDeskREF.removeitem BigPot 1
endif
if ( Vault101OverseersDeskREF.getitemcount NukaCola >= 1 )
Vault101OverseersDeskREF.removeitem NukaCola 1
endif
if (Vault101OverseersDeskREF.getitemcount MS05NukaColaQtm > 0 ) && ( Vault101OverseersDeskREF.getitemcount NukaCola == 0 )
Vault101OverseersDeskREF.removeitem MS05NukaColaQtm 1
endif
; als steuerung für den Handelstimer
if (Vault101OverseersDeskREF.getitemcount Harmonica01 < 300 )
Vault101OverseersDeskREF.additem Harmonica01 1
endif
set Stunde to ( Stunde - 1 )
endif
end
Also erst mal Hammer was du für Skripte schreibst !!
Respekt.
Mal ne Frage, mit welchen Mods testet du denn DKK bei dir ?
Denn du hast ja doch recht Ressourcenhungrige Skripte und zB CBO bringt ja auch schon weit über 8000 Zeilen Skript mit.
Also erst mal Hammer was du für Skripte schreibst !!
Respekt.
Mal ne Frage, mit welchen Mods testet du denn DKK bei dir ?
Denn du hast ja doch recht Ressourcenhungrige Skripte und zB CBO bringt ja auch schon weit über 8000 Zeilen Skript mit.
momentan hab ich nur DDK drauf, aber ich merke direkt wenn irgendo zu viel im hintergrund läuft, mein laptopp is eh immer an der grenze zur Diashow ;)
was den recourcenhunger angeht, naja da fällt dir auf wenn du dir das script noch mal anschaust das ich die beiden heftigeren dinge nur alle 5 sekunden (munition berechnen und auch alles andere) oder 24 ingamestunden (Waren verteilen) durchlaufen lasse, das sollte also passen.
das was mir viel mehr sorgen macht sind die am ende knapp 1000 neuen Persistenten references , die könnten dem Speicher zusetzen, aber abwarten und tee trinken wenn das zu problemen führt werd ich auf einige enabler verzichten
Damit eure mods kompatibel bleiben dürft ihr folgende objekte nicht ohne
das sie genau für diese Steuerung da sind der Kiste aus dem Büre des Vault 101 Aufsehers entfernen oder Hinzufügen
Natürlich dürft ihr den Schrank auch nicht disablen oder ähnliches mit ihm machen.
Vault101OverseersDeskREF
gegenstände die DDK als Globale Variablen benutzt.
TeddyBear01, option Sammelitems an/aus
OfficeID, Option HH Teurer an/aus
Camera, Option Extra Perks
Harmonica01 , 24 Stunden Zähler um Handelskisten zu füllen
1111ABR1111SpezialOptionMunitionsgewicht (DDKeigen), Munitionsgewicht an/aus
Lunchbox, essen notwendig an/aus
Apple, 0-48 Hungertimer
Noodles, 0-72 Fettreserven
NukaTruck, Trinken Notwendig an/aus
NukaCola, 0-48 Dursttimer
MS05NukaColaQtm, 0-72 Wasserreserven
Opthalmoscope, Schlafen an/aus
BigPot, 0-120 Schlaftimer
1111ABR1111AKTDDKOEDLANDFUERER, 0-4 , Spielerlevel Bronze,Silber,Gold,Platin
PressureCooker, Option mehr Baumaterial
Crutch, Option mehr Minen
Plunger, Option mehr Sammelzeug
Milkbottle01, Option mehr NukaQuantum
MilitaryID, Option mehr in den Neuen Kisten
zusätzlich gilt das nichts dran machen auch für alle Neuen waffen die DDK einbringt.
Der Grund ist einfach, immer wenn der spieler eine der neuen Unique waffen bekommt wird ebenfalls eine im Spind abgelegt, dadurch kann die selbe unique nicht 2mal ausgegeben werden.
Powered by vBulletin® Version 4.2.5 Copyright ©2024 Adduco Digital e.K. und vBulletin Solutions, Inc. Alle Rechte vorbehalten.