dt = New Table( "Sales Model" );
dt << New Column( "Unit Sales", Values( {1000, 2000} ) );
dt << New Column( "Unit Price", Values( {2, 4} ) );
dt << New Column( "Unit Cost", Values( {2, 2.5} ) );
dt << New Column( "Revenue",
	Formula( :Unit Sales * :Unit Price )
);
dt << New Column( "Total Cost",
	Formula( :Unit Sales * :Unit Cost + 1200 )
);
dt << New Column( "Profit",
	Formula( :Revenue - :Total Cost ),
	Set Property( "Spec Limits", {LSL( 0 )} )
);
Profiler(
	Y( :Revenue, :Total Cost, :Profit ),
	Objective Formula( Profit )
);
Data Table Created from Script
Once they are created, select the Simulator from the Prediction Profiler. Use the specifications from Specifications for Profiler to fill in the Simulator.
Specifications for Profiler
Simulator
It looks like we are not very likely to be profitable. By putting a lower specification limit of zero on Profit, the defect report would say that the probability of being unprofitable is 62%.
So we raise the Unit Price to $3.25 and rerun the simulation. Now the probability of being unprofitable is down to about 20%.
Results

Help created on 9/19/2017