COFFEE / Xpresso / COF - Scripts Sammlung

[Hardkorn]

AW: COFFEE / Xpresso / COF - Scripts Sammlung

Sandi Dol?ak hat ein praktisches Script (und andere) für R11.5 und R12 Veröffentlicht. Was das Script und die anderen macht sieht man .



Für R10.x und höher hat Harry Bee das Script anpassen müssen.

C4D-Network :: Die Cinema 4D Community - Forum - Einzelnen Beitrag anzeigen - News DPIT PFX v1.5 Demo Released

DoTheMagic(sel, doc) {
    if(sel->GetType() == OBJECT_EXTRUDE || sel->GetType() == OBJECT_LOFT || sel->GetType() == OBJECT_SWEEP || sel->GetType() == OBJECT_LATHE) { // NURBs
        CallCommand(12236); // Make Editable
        [COLOR=Blue]var old = doc->GetActiveObject();[/COLOR]
        CallCommand(100004768); // Select Children
        CallCommand(12144); // Connect
        [COLOR=Blue]sel = doc->GetActiveObject();
        old->ToggleBit(BIT_AOBJ);
        sel->ToggleBit(BIT_AOBJ);
        CallCommand(100004787); // Delete
        sel->ToggleBit(BIT_AOBJ);[/COLOR]
[COLOR=Red]//        CallCommand(16768); // Connect+Delete[/COLOR]
    } else if(sel->GetType() == OBJECT_SYMMETRY) { // Symmetry
        CallCommand(12236); // Make Editable
        [COLOR=Blue]var old = doc->GetActiveObject();[/COLOR]
        sel = doc->GetActiveObject();
        var name = sel->GetDown()->GetName();
        CallCommand(100004768); // Select Children
        CallCommand(12144); // Connect
        [COLOR=Blue]sel = doc->GetActiveObject();
        old->ToggleBit(BIT_AOBJ);
        sel->ToggleBit(BIT_AOBJ);
        CallCommand(100004787); // Delete
        sel->ToggleBit(BIT_AOBJ);[/COLOR]
[COLOR=Red]//        CallCommand(16768); // Connect+Delete[/COLOR]
        sel = doc->GetActiveObject();
        sel->SetName(name); // Sets the name. Remove if you like to keep the name of Symetry object
    } else CallCommand(12236); // Make Editable

    sel = doc->GetActiveObject();

    var bc = new(BaseContainer);
    if(!bc) return;

    bc->SetData(MDATA_OPTIMIZE_TOLERANCE, 0.1);
    bc->SetData(MDATA_OPTIMIZE_POINTS, TRUE);
    bc->SetData(MDATA_OPTIMIZE_POLYGONS, TRUE);
    bc->SetData(MDATA_OPTIMIZE_UNUSEDPOINTS, TRUE);
    SendModelingCommand(MCOMMAND_OPTIMIZE, doc, sel, bc, MODIFY_ALL); // Optimize call

}

DeselectAll() {
    var obj = object();
    while(obj->SearchNext(BIT_AOBJ)) {
        obj->ToggleBit(BIT_AOBJ);
        obj = obj->SearchNext(BIT_AOBJ);
    }
    obj->ToggleBit(BIT_AOBJ);
}

main(doc, op) {
    var i = 0;
    var k = 0;
    var selected = new(array, 333); // Increase this number if you will ever select more then 333 objects at once
    var selSave  = new(array, 333); // -||-
    var obj = object();
    if(!obj) return;
    while(obj->SearchNext(BIT_AOBJ)) {
        selected[i] = obj;
        i++;
        obj = obj->SearchNext(BIT_AOBJ);
    }
    selected[i++] = obj;

    DeselectAll();
    
    var j;
    for(j = 0; j < i; j++) {
        selected[j]->ToggleBit(BIT_AOBJ);
        DoTheMagic(selected[j], doc);
        selSave[k] = doc->GetActiveObject();
        k++;
        doc->GetActiveObject()->ToggleBit(BIT_AOBJ);
    }

    for(j = 0; j <k; j++){
        selSave[j]->ToggleBit(BIT_AOBJ);
    }
}

 

[Hardkorn]

AW: COFFEE / Xpresso / COF - Scripts Sammlung

Ein Script um alle Objekte mit gleicher Punkte Anzahl zu selektieren.

]C4D-Network :: Die Cinema 4D Community - Forum

// -----------------------------------------------------------------------
// Skript: 'Select Equal Pointcount'
// -----------------------------------------------------------------------
// Das Skript erwartet ein selektiertes Objekt.
// Ist ein Polygon- oder Spline-Objekt selektiert, so werden alle Objekte
// der Szene mit der gleichen Anzahl Punkte selektiert.
//
// 'nophoto', 31. Mai 2010


var type;
var count;


Test(op)
{
    while(op)
    {
        if(op->GetType() == type && op->GetPointCount() == count) op->SetBit(BIT_AOBJ);

        Test(op->GetDown());
        op = op->GetNext();
    }
}


main(doc,op)
{
    if(!op) return; // Keine Selektion oder Mehrfachselektion --> Abbruch

    if(op->GetType() == OPolygon) type = Opolygon;
    else if(op->GetType() == OSpline) type = Ospline;
    else return; // Es ist kein Polygon- oder Spline-Objekt selektiert --> Abbruch

    count = op->GetPointCount();

    Test(doc->GetFirstObject());
}

 

[nux95]

AW: COFFEE / Xpresso / COF - Scripts Sammlung

Hab meinen ersten Script geschrieben, hoffe den finden auch andere nützlich
Ich hab den jetzt zB auf Ctrl+Shift+A weil ich das recht oft brauche.

Ausnullen

naia, wie es schon heisst, das Objekt wird ausgenullt.
Position (0,0,0) Rotation (0,0,0) und Größe (1,1,1)



Script:

var obj = doc->GetActiveObject();
var nothing = vector(0,0,0);
var scale = vector(1,1,1);

if (!obj)
{
println("Kein Objekt gewählt");
return false;
}
else
{
println("Objekt zurückgesetzt.");
op->SetRotation(nothing);
op->SetPosition(nothing);
op->SetScale(scale);
}

 

[nux95]

Node - eModulo

Es wird nicht der Rest ausgegeben, sondern der größtmögliche ganzzahlige Teiler.

main()
{

Ausgang = (Eingang1-(Modulo(Eingang1,Eingang2)))/Eingang2;

}

PS: wie kann ich Nodes exportieren ? :/

 

[nux95]

Offset Randomizer

 

[nux95]

AW: COFFEE / Xpresso / COF - Scripts Sammlung

OpenSDK ist nun in der COFFEE Tools Collection enthalten.

COFFEE Tools:



Anregungen, Bugreports und Feedback wie immer per PN an mich, im Thread oder an info@nux95.com

 

[barri]

AW: COFFEE / Xpresso / COF - Scripts Sammlung

Ich versuch auch mal was kleines zu diesem Thread beizutragen.

Eine kleine Funktion, die die Fakultät einer Zahl berrechnet.

fakultaet(max) 
{
  var zahl,i;
  zahl=1;
  for(i=1;i<=max;i++)  {zahl=zahl*i;}

  return zahl;
}

 

[legulas]

AW: COFFEE / Xpresso / COF - Scripts Sammlung

Hallo!

kannst du mir bitte einen tip geben wie ich TP Position Emitter (TP Trail [Partikel]) zum laufen bekomme.
vielen vielen daank

 

[nux95]

AW: COFFEE / Xpresso / COF - Scripts Sammlung

Ich hoffe diese Beispielszene hilft dir weiter.



Grüße,
Niklas