beginne_mys(1, 734, "Hans Musterman", 582, "mysecret")

setze_Positionsparameter($ÜBERSETZE_NACHRICHTEN, $JA)
setze_Positionsparameter($WIEDERHOLUNGSVERSUCHE, 1)

setze_Datum("17-Eis-501")
bewege(,, "Army of the Dead", "547")
wenn_in_gleichem_Gebiet("Army of the Dead", "65/37") dann 
plündere(, 30,, Army of the Dead, $ALLE)
Zauberspruch(, 1, "Dr Doom", "zal-bel-urzx-gogth-ram")
trainiere(, 60, "Shorty Onehand", "Stehlen", 3)

setze_Datum("18-Eis-501")
Zauberspruch(, 1, "Dr Doom", "zal-bel-zal-gogth-nixfor") 
;warum hat dies letztes Mal nicht funktioniert?
Attentat(, 3, "Bloodblade", "MacMoneysac")

setze_Datum("19-Eis-501")
übergebe_Gegenstand("Skully Sally", "Horse Transport 5", 5, "Holz", 17000, "Schillinge", 325, "Eisen") 
;benutze Standardeinstellungen
stehle(,1, "Bloodblade", "Ye Merchant's Guild", $ALLE, "Schillinge") 
;benutze Standarddatum, 1 Wiederholversuch und Standardwiederholungen
übergebe_Gegenstand(,,2,"Bloodblade", "Skully Sally", $ALLE, "Schillinge") 
;benutze Standardwiederholungen und 2 Wiederholversuche

setze_Datum("20-Eis-501")
wenn Character_Status("Bloodblade", "imprisoned?", $JA) dann rette(, 5, "Shorty Onehand", "Bloodblade", 1, 5)
wenn in_possession("Horse Transport 5", 5, "Holz", 17000, "Schillinge", 325, "Eisen") dann _
bewege(,, "Horse Transport 5", "2345453",, $GEHE)
wenn in_possession("Skully Sally", 0, "Holz", 0, "Schillinge", 0, "Eisen") _
und (Wetter_ist("gut") oder Wetter_ist("mittelmäßig")) dann segele(,, "Skully Sally", "2341245")

; P.S.: hier sind einige Befehle
trainiere("21-Eis-501", 26, "Shorty Onehand", "Stehlen")
trainiere("21-Eis-501", 26, "Bloodblade", "Meucheln")
trainiere("17-Eis-501", 28, "Dr Doom", "Nekromantie")

beende_mys()