/* An implementation of the Big Five Inventory-10 (BFI-10) developed by Rammstedt & John (2007). Shows the 10 item version of the Big Five Inventory developed by Rammstedt & John (2007). The trial data contain the item ratings and the block data contain the scale values for the 5 scales. Reference: Rammstedt, Beatrice & John, Oliver P. (2007). Measuring personality in one minute or less: A 10-item short version of the Big Five Inventory in English and German. Journal of Research in Personality, 41, 203-212. */
Experiment(){
Context(){
AssignmentGroup(){
SubjectCode = "pxlab";
RandomizeTrials = 0;
new ID = 0;
new Extraversion = 0;
new Agreeableness = 0;
new Conscientiousness = 0;
new Neuroticism = 0;
new Openness = 0;
DataFileTrialFormat = "%SubjectCode% %ID% %Trial:BFI10.RatingScale.ScaleValue%";
DataFileBlockFormat = "%SubjectCode% E:%Extraversion% A:%Agreeableness% C:%Conscientiousness% N:%Neuroticism% O:%Openness%";
}
Session:BFI10(){
Instruction(){
Text = lang2(["Some questions to you personally.", " ", "We will show you some statements of which you should decide how far they describe you yourself.", "Please use the mouse to select an answer and then press the SPACE bar to procede.", " ", "Press any key now to start!"], ["Einige Fragen zu Ihnen selbst.", " ", "Sie bekommen jetzt einige Aussagen vorgelegt, die Sie danach beurteilen sollen, in wie weit diese Aussagen auf Sie zutreffen.", "Bitte wählen Sie mit der Maus eine Antwort und drücken dann die Leertaste um weiterzugehen.", " ", "Drücken Sie jetzt eine beliebige Taste um zu beginnen!"]);
}
}
SessionEnd:BFI10(){
Instruction(){
Text = lang2(["Your result:", " ", "Extraversion = %Extraversion%", "Agreeableness = %Agreeableness%", "Conscientiousness = %Conscientiousness%", "Neuroticism = %Neuroticism%", "Openness = %Openness%", " ", "The range of raw scores for each scale is from 2 to 10.", " ", "Thank you for your participation."], ["Ihr Ergebnis:", " ", "Extraversion = %Extraversion%", "Verträglichkeit = %Agreeableness%", "Gewissenhaftigkeit = %Conscientiousness%", "Emotionale Stabilität = %Neuroticism%", "Offenheit = %Openness%", " ", "Der Skalenbereich der Rohwerte geht jeweils von 2 bis 10.", " ", "Vielen Dank für Ihre Mitarbeit."]);
Timer = RESPONSE_TIMER;
}
}
Block:BFI10();
BlockEnd:BFI10();
Trial:BFI10( ID, RatingScale.Text, RatingScale.ScaleValue){
RatingScale(){
NumberOfTicks = 5;
LowestTick = 1;
TickStep = 1;
BarColor = gray();
TickColor = lightGray();
PointerColor = yellow();
LocationY = -140;
Alignment = CENTER;
ReferencePoint = TOP_CENTER;
ScaleLocationX = 0;
ScaleLocationY = 40;
ScaleWidth = 640;
ScaleHeight = 50;
TickType = BAR_TICKS;
LineWidth = 12;
LabelType = TEXT_LABELS;
LabelDistance = 8;
Labels = lang2(["disagree\nstrongly", "disagree\na little", "neither agree\nnor disagree", "agree\na little", "agree\nstrongly"], ["trifft\nüberhaupt\nnicht zu", "trifft eher\nnicht zu", "weder noch", "eher\nzutreffend", "trifft\nvoll und\nganz zu"]);
PointerType = CROSS_POINTER;
PointerSize = 40;
AnchorLabels = 0;
AnchorDistance = 20;
ScaleValue = -1;
RoundingFactor = 1;
Timer = MOUSE_TRACKING_KEY_TIMER;
ResponseSet = SPACE_KEY;
}
SetParameter:Extraversion(){
Execute = (ID==1)||(ID==6);
Parameter = "Extraversion";
Value = Extraversion+((ID==1)? (6-Trial:BFI10.RatingScale.ScaleValue): Trial:BFI10.RatingScale.ScaleValue);
}
SetParameter:Agreeableness(){
Execute = (ID==2)||(ID==7)||(ID==11);
Parameter = "Agreeableness";
Value = Agreeableness+((ID==7)? (6-Trial:BFI10.RatingScale.ScaleValue): Trial:BFI10.RatingScale.ScaleValue);
}
SetParameter:Conscientiousness(){
Execute = (ID==3)||(ID==8);
Parameter = "Conscientiousness";
Value = Conscientiousness+((ID==3)? (6-Trial:BFI10.RatingScale.ScaleValue): Trial:BFI10.RatingScale.ScaleValue);
}
SetParameter:Neuroticism(){
Execute = (ID==4)||(ID==9);
Parameter = "Neuroticism";
Value = Neuroticism+((ID==4)? (6-Trial:BFI10.RatingScale.ScaleValue): Trial:BFI10.RatingScale.ScaleValue);
}
SetParameter:Openness(){
Execute = (ID==5)||(ID==10);
Parameter = "Openness";
Value = Openness+((ID==5)? (6-Trial:BFI10.RatingScale.ScaleValue): Trial:BFI10.RatingScale.ScaleValue);
}
}
// Command line assignments
AssignmentGroup();
}
Procedure(){
Session:BFI10(){
Block:BFI10(){
Trial:BFI10( 1, lang2("I see myself as someone who\nis reserved.", "Ich bin eher zurückhaltend, reserviert.\n "), ?);
Trial:BFI10( 2, lang2("I see myself as someone who\nis generally trusting.", "Ich schenke anderen leicht Vertrauen,\nglaube an das Gute im Menschen."), ?);
Trial:BFI10( 3, lang2("I see myself as someone who\ntends to be lazy.", "Ich bin bequem, neige zur Faulheit.\n "), ?);
Trial:BFI10( 4, lang2("I see myself as someone who\nis relaxed, handles stress well.", "Ich bin entspannt,\nlasse mich durch Stress nicht aus der Ruhe bringen."), ?);
Trial:BFI10( 5, lang2("I see myself as someone who\nhas few artistic interests.", "Ich habe nur wenig künstlerisches Interesse.\n "), ?);
Trial:BFI10( 6, lang2("I see myself as someone who\nis outgoing, sociable.", "Ich gehe aus mir heraus, bin gesellig.\n "), ?);
Trial:BFI10( 7, lang2("I see myself as someone who\ntends to find fault with others.", "Ich neige dazu, andere zu kritisieren.\n "), ?);
Trial:BFI10( 8, lang2("I see myself as someone who\ndoes a thorough job.", "Ich erledige Aufgaben gründlich.\n "), ?);
Trial:BFI10( 9, lang2("I see myself as someone who\ngets nervous easily.", "Ich werde leicht nervös und unsicher.\n "), ?);
Trial:BFI10( 10, lang2("I see myself as someone who\nhas an active imagination.", "Ich habe eine aktive Vorstellungskraft,\nbin phantasievoll."), ?);
}
}
}
}