Upcoming Events

Collapse

There are no results that meet this criteria.

Announcement

Collapse
No announcement yet.

Pov's little goobered up script

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

  • Pov's little goobered up script

    //Product of Void's model spawn with item.
    Code:
     
    void main(string sItems)
    {
    object oUsedit= GetLastSpeaker();
    object oWalkforme;
    location lSh;
    int iType;
    int iSwitche=1;
    object oSM;
    object oSitem;
    object oStre;
    //string sItems;
    //iType =GetAppearanceType(oUsedit);
    lSh =GetLocation(GetWaypointByTag("WP_pov_model1_01"));
     
    oWalkforme =CreateObject(OBJECT_TYPE_CREATURE, "pov_mmale",lSh,FALSE, "pov_model1");
    //SetCreatureAppearanceType(oWalkforme,iType);
    //oSM=GetObjectByTag("pov_osm");
    iType =GetLocalInt(GetObjectByTag("pov_osm"), "iHasiem");
    SetCreatureAppearanceType(oWalkforme,(GetAppearanceType(oUsedit)));
    //putting item on critter
     
    //sItems=GetLocalString(oSM, "sStore");
    oStre=GetObjectByTag(sItems);
    //sItems=GetLocalString(oSM, "sItmz");
    oSM=GetFirstItemInInventory(oStre);
    while(GetIsObjectValid(oSM))
    {
    if (iSwitche== iType)
    {
    CopyItem(oSM,oUsedit);
    CopyItem(oSM,oWalkforme);
    oUsedit=GetFirstItemInInventory(oWalkforme);
    AssignCommand(oWalkforme, ActionEquipItem(oUsedit, INVENTORY_SLOT_CHEST));
    //AssignCommand(oWalkforme, ActionEquipMostEffectiveArmor());
    return;
    }
    oSM= GetNextItemInInventory(oStre);
     
    iSwitche++;
    }
    //oSitem= GetItemPossessedBy(oStre,sItems);
    //oUsedit =
    //CopyItem(oSitem,oUsedit);
     
    //CopyItem(oSitem,oWalkforme);
    AssignCommand(oWalkforme, ActionEquipMostEffectiveArmor());
     
    }
    ****************************DOesn't equip******************
    //Product of Void's model spawn with item.


    Code:
     
     
    void main()
    {
    object oUsedit= GetLastSpeaker();
    object oWalkforme, oSM, oStre;
    location lSh;
    int iType, iSwitche;
    string sStore;
     
    //find waypoint to spawn fashion model
    lSh =GetLocation(GetWaypointByTag("WP_pov_model1_01"));
     
    //aquire name of store to get stuff from
    sStore=GetLocalString(GetObjectByTag("pov_osm"), "sItmz");
    SendMessageToPC(oUsedit, sStore);
    //get the gender of the model
    iType = GetLocalInt(GetObjectByTag("pov_osm"), "iGender");
    //get the race
    iSwitche=GetLocalInt(GetObjectByTag("pov_osm"), "iRace");
    //if they did not change the race/gender go with theirs
    if(iType==0 && iSwitche==0) {
    iType =GetGender(oUsedit);
    iSwitche=GetAppearanceType(oUsedit);
    }
    //actual selecting of male or female models
    sStore="pov_mmale";
    if(iType >=1)sStore= "pov_fmale";
    //make the critter
    oWalkforme =CreateObject(OBJECT_TYPE_CREATURE, sStore,lSh,FALSE, "pov_model1");
    //change how it looks 
    SetCreatureAppearanceType(oWalkforme,iSwitche);
    //give it a heartbeat so it will walk the waypoints hopefully.
    SetEventHandler(oWalkforme,CREATURE_SCRIPT_ON_HEARTBEAT, "nw_c2_default1");
    SetEventHandler(oWalkforme,CREATURE_SCRIPT_ON_SPAWN_IN, "nw_c2_default9");
    //start setting up the while function
    oStre=GetObjectByTag(sStore);
    oSM=GetFirstItemInInventory(oStre);
    //number in the invenotry of armor to copy. 
    iType =GetLocalInt(GetObjectByTag("pov_osm"), "iHasiem");
    iSwitche=1;
     
    while(GetIsObjectValid(oSM))
    {
    if (iSwitche== iType)
    {
    SendMessageToPC(oUsedit, "found it");
    CopyItem(oSM,oWalkforme);
    oUsedit=GetFirstItemInInventory(oWalkforme);
    AssignCommand(oWalkforme, ActionEquipItem(oUsedit, INVENTORY_SLOT_CHEST));
    DelayCommand(120.0 ,DestroyObject(oWalkforme));
    return;
    }
    oSM= GetNextItemInInventory(oStre);
    SendMessageToPC(oUsedit, "in loop");
     
    iSwitche++;
    }
    //end of function
    }
    This is a second script of a two script task that works within a converstation.

    This one draws the variables creates a creature, creates item on creature, and makes them equip.

    It DID work...but I broke it good.

    its an older version of the script but perhaps someone will tell me WHERE I goobered it up.
    blame everything right in my life on god -Me.
    Being insane in a sane world is alot more fun then being a sane man in an insane world. -Me
    I am only what you percieve, and even that is an illusion. -Me.

    Ashinet Clavin Shiv Shadowsong

  • #2
    I don't have time for an in-depth look right now, but if this line is in the compiler exactly like this:

    SetCreatureAppearanceType(oWalkforme,(GetAppearanc eType(oUsedit)));
    That could be your problem.

    Comment


    • #3
      I would use the code tags on the forum to make that more legible.

      Code:
      blah
      The very existence of flame-throwers proves that some time, somewhere, someone said to themselves, You know, I want to set those people over there on fire, but I'm just not close enough to get the job done.

      George Carlin

      Comment


      • #4
        nope. I removed that. I believe it was beer four when I tried it without changing their apperance instead spawning a criter for each race (uber pain and "the suck").

        I think I will re-write the whole function and converstation again and try it on another NPC.

        Plus when I get home will post both functions.

        I know setting the apperance on a PC works just not sure if it allows seeing armor or not will refresh memory.
        blame everything right in my life on god -Me.
        Being insane in a sane world is alot more fun then being a sane man in an insane world. -Me
        I am only what you percieve, and even that is an illusion. -Me.

        Ashinet Clavin Shiv Shadowsong

        Comment

        Working...
        X