code\:

int GetExistItemInInventory(object oTarget, string sItemTag)
{
   object oItem;
   oItem = GetFirstItemInInventory(oTarget);
   for( ; ; )
   {
     if (oItem == OBJECT_INVALID)
     {
       break;
     }
     else
     {
        if (GetTag(oItem)==sItemTag) return TRUE;
     }
     oItem = GetNextItemInInventory(oTarget);
   }
   return FALSE;
}
void ApplyVisualEffectsToMagicDoor(int MagicDoorType)
{
   // apply visual effect to door (depends on MAGIC_DOOR_TYPE)
    effect e1,e2;
    if ((MagicDoorType<0)||(MagicDoorType>2)) MagicDoorType=0;
    switch(MagicDoorType)
    {
      case 0:
            e1 =  EffectVisualEffect(VFX_DUR_AURA_SILENCE);
            e2 =  EffectVisualEffect(VFX_DUR_LIGHT_WHITE_5);
            break;
      case 1:
            e1 =  EffectVisualEffect(VFX_DUR_AURA_COLD);
            e2 =  EffectVisualEffect(VFX_DUR_LIGHT_BLUE_5);
            break;
      case 2:
            e1 =  EffectVisualEffect(VFX_DUR_AURA_FIRE);
            e2 =  EffectVisualEffect(VFX_DUR_LIGHT_RED_5);
           break;
    }
    ApplyEffectToObject(DURATION_TYPE_PERMANENT,e1,OBJECT_SELF,1.0);
    ApplyEffectToObject(DURATION_TYPE_PERMANENT,e2,OBJECT_SELF,1.0);
}

void ActionMagicDoor(float MaxDistance,int MagicDoorType,string ItemTag)
{

    // get distance to player
    object oPC = GetNearestCreature(CREATURE_TYPE_PLAYER_CHAR,PLAYER_CHAR_IS_PC);
    float distance = GetDistanceToObject(oPC);
    if (distance < MaxDistance )
    {
        // -> player is in near enaugh
        if ((GetExistItemInInventory(oPC,ItemTag)==TRUE)||(MagicDoorType==0))
        {
          // -> player can pass
          if (GetIsOpen(OBJECT_SELF)==FALSE)
          {
            ActionPlayAnimation(ANIMATION_PLACEABLE_OPEN);
            ActionOpenDoor(OBJECT_SELF);
          }
        }
        else
        {
          // -> player can not pass
          if (MagicDoorType==2)
          {
            //-> do bad things to player (one time)
            int iDidDamage = GetLocalInt(OBJECT_SELF,"DidDamage");
            if (iDidDamage == 0)
            {
              AssignCommand(oPC,ActionCastSpellAtObject(SPELL_SOUND_BURST,  oPC,METAMAGIC_MAXIMIZE,TRUE,FEAT_FIRE_DOMAIN_POWER,PROJECTILE_PATH_TYPE_
DEFAULT,TRUE));
              // 25% damage
              int dm = GetMaxHitPoints(oPC) / 4;
              effect md = EffectDamage(dm,DAMAGE_TYPE_MAGICAL,DAMAGE_POWER_NORMAL);
              ApplyEffectToObject(DURATION_TYPE_INSTANT,md,oPC,1.0);
              iDidDamage = 1;
              SetLocalInt(OBJECT_SELF,"DidDamage",iDidDamage);
            }

          }
        }
    }
    else
    {
        // -> player is to far away
        if (GetIsOpen(OBJECT_SELF)==TRUE)
        {
          ActionPlayAnimation(ANIMATION_PLACEABLE_CLOSE);
          ActionCloseDoor(OBJECT_SELF);
        }
        SetLocalInt(OBJECT_SELF,"DidDamage",0);
    }
}
void main()
{
    // Settings:
    float MAX_DISTANCE = 4.0;                 // max. distance to doo
    int MAGIC_DOOR_TYPE = 2 ;                  // 0 ... simple magic door (no item required)
                                              // 1 ... normal magic door (item required)
                                              // 2 ... evil magic door (item required, if no item found -> spell cast on player)
    string ITEM_TAG = "DazursWegbereiter";    // ItemTag of Item to open the door

    ApplyVisualEffectsToMagicDoor(MAGIC_DOOR_TYPE);

    ActionMagicDoor(MAX_DISTANCE,MAGIC_DOOR_TYPE,ITEM_TAG);

    DelayCommand(2.0,ActionMagicDoor(MAX_DISTANCE,MAGIC_DOOR_TYPE,ITEM_TAG));
    DelayCommand(4.0,ActionMagicDoor(MAX_DISTANCE,MAGIC_DOOR_TYPE,ITEM_TAG));
}

code\:

void SwitchOff(object o)
{
    AssignCommand(o,PlayAnimation(ANIMATION_PLACEABLE_DEACTIVATE));
    DelayCommand(0.4,SetPlaceableIllumination(o, FALSE));
    DelayCommand(0.9,RecomputeStaticLighting(GetArea(o)));
}
void SwitchOn(object o)
{
    AssignCommand(o,PlayAnimation(ANIMATION_PLACEABLE_ACTIVATE));
    DelayCommand(0.4,SetPlaceableIllumination(o, TRUE));
    DelayCommand(0.9,RecomputeStaticLighting(GetArea(o)));
}
void main()
{
   object o1 = GetObjectByTag("kb_0");
   object o2 = GetObjectByTag("kb_1");

   SwitchOff(o1);
   SwitchOff(o2);



}

code\:

var++; oder ++var oder lang geschrieben var = var + 1;

code\:

f = f + 1.0; 

code\:

int iPCWurf;
int iNPCWurf;

iPCWurf = d6(1);
iNPCWurf = d6(1);

if (iPCWurf > iNPCWurf)
{ 
  // Spieler gewinnt
 ...
}
else if (iPCWurf == iNPCWurf)
{
  // Gleichstand
  ...
}
else
{
  // NPC gewinnt
  ...
}

// Ausagbe

string sWurfErgebnis = IntToString(iPCWurf) + ":" + IntToString(iNPCWurf);

quote:

---

Zitat von LightHawk
Meintest du jetzt Orschel oder mich ?

---

code\:

if (d6(1) > d6(1))
{
  ...
}
else
{
  ...
}

code\:

// Scriptname:  Black Powder Barrel
// Author:      criz (chris@mgco3.com)
// Date:        15. July 2002
// Version:     1.0
// Usage:       Apply this script to the OnDamaged Event of an Barrel
// Description: If Barrel is damaged then it will explode and do
//              do some damage to surrounding objects.
// CodeHistory: 15. July 2002 -> creation, testing

void main()
{
  float fDamageRange    = 6.0;          // Range of FireDamage
  int iMinDamage        = 15;           // Minimal Firedamage
  int iAddDamage        = d6();         // Additional (random) Damage
                                        // TotalDamage to an object is
                                        // iMinDamage + iAddDamage

  if (GetLocalInt(OBJECT_SELF,"ExplodeOnce")==0)
  {
    // Do the nice Fire Explosion
    SetLocalInt(OBJECT_SELF,"ExplodeOnce",1);
    effect eExpl = EffectVisualEffect(VFX_FNF_FIREBALL);
    effect eSmoke = EffectVisualEffect(VFX_FNF_SMOKE_PUFF);
    effect eBUMP = EffectVisualEffect(VFX_FNF_SCREEN_BUMP);
    effect eDamage = EffectDamage(GetCurrentHitPoints(),DAMAGE_TYPE_FIRE);
    DelayCommand(0.2,ApplyEffectToObject(DURATION_TYPE_INSTANT,eExpl,OBJECT_SELF));
    DelayCommand(0.3,ApplyEffectToObject(DURATION_TYPE_INSTANT,eBUMP,OBJECT_SELF));
    DelayCommand(0.5,ApplyEffectToObject(DURATION_TYPE_INSTANT,eSmoke,OBJECT_SELF));
    ApplyEffectToObject(DURATION_TYPE_INSTANT,eDamage,OBJECT_SELF);
  }
  else
  {
    // Do Damage to all Objects in a range defined by fDamageRange
    object o;
    effect  eFireDamage;
    o =  GetFirstObjectInShape(SHAPE_SPHERE,fDamageRange,GetLocation(OBJECT_SELF)
,TRUE,OBJECT_TYPE_ALL);
    while(GetIsObjectValid(o))
    {
      eFireDamage = EffectDamage(iMinDamage + iAddDamage,DAMAGE_TYPE_FIRE, DAMAGE_POWER_PLUS_TWO);
      DelayCommand(0.5,ApplyEffectToObject(DURATION_TYPE_INSTANT,eFireDamage,o));
      o =  GetNextObjectInShape(SHAPE_SPHERE,fDamageRange,GetLocation(OBJECT_SELF),
TRUE,OBJECT_TYPE_ALL);
    }

  }
}