[WARNING] WARNING: DO NOT EDIT THIS FILE DIRECTLY! Use only E-Studio to edit this file. Editing of this file from any other means is not supported and may corrupt the experiment design specification. Technical support will not be able to address any issue in regards to this file format. [Experiment] VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=94 _VersionPersist=6 Root="SessionProc" Author="Psychology Software Tools" Abstract="This experiment illustrates the use of a global variable and InLine \r\nscript to award winnings (in dollar form) based on the responses \r\nmade by the subject. \r\n\r\nAttributes are set to allow presentation of the running total of \r\nwinnings on each trial as well as the total winnings achieved.\r\n\r\nFollowing the Stimulus presentation, InLine object CalculateReward\r\nadjusts a variable according to whether or not the subject \r\nresponded correctly. If the subject responds correctly, the variable \r\nWinnings is increased by 10. If the subject responds incorrectly, \r\nthe variable is decreased by a third. In addition, the attribute \r\nTempWinnings is used to maintain a running score for the subject. \r\nThe variable Winnings is defined globally in the User Script.\r\n\r\nA FeedbackDisplay object is used to inform the subject as to \r\nwhether or not they responded correctly, and also references the\r\nattribute TempWinnings to display the subject's running total.\r\n\r\nThis example runs 4 trials. At the end of the trials, the final total\r\nis displayed." Notes="" Creation=1213365853 [Device0] _VersionPersist=1 OpenDevice=1 CollectionMode=1 EmulateDeviceName="" CapsLock=0 NumLock=0 Name="Keyboard" Class="Keyboard" [Device1] _VersionPersist=1 OpenDevice=1 CollectionMode=1 EmulateDeviceName="" OpenMode=0 ShowCursor=0 Name="Mouse" Class="Mouse" [Device2] _VersionPersist=1 OpenDevice=1 Width=800 Height=600 Bpp=16 Name="Display" Class="Display" [Device3] _VersionPersist=1 OpenDevice=0 Channels=2 Samples=22050 Bps=16 Name="Sound" Class="Sound" [DataFile] WarnBeforeOverwrite=1 WarnIfConvertFailed=1 RemoveERecoveryFile=0 ReceiveFeedbackDuringDataFileConversion=1 LogLevel(2).Name="Block" LogLevel(3).Name="Trial" LogLevel(4).Name="SubTrial" LogLevel(5).Name="LogLevel5" LogLevel(6).Name="LogLevel6" LogLevel(7).Name="LogLevel7" LogLevel(8).Name="LogLevel8" LogLevel(9).Name="LogLevel9" LogLevel(10).Name="LogLevel10" [StartupInfo] DisplaySummary=1 UseDefaults=0 [StartupInfo1] Name="Subject" Prompt="Please enter the Subject Number (0-32767):" DataType=0 Enabled=1 PromptEnabled=1 Default="1" Min=0 Max=32767 PrivateFlags=268435477 PrivateInfo=1 [StartupInfo2] Name="Session" Prompt="Please enter the Session Number (0-32767):" DataType=0 Enabled=1 PromptEnabled=1 Default="1" Min=0 Max=32767 PrivateFlags=268435477 PrivateInfo=1 [StartupInfo3] Name="Group" Prompt="Please enter Subject's Group (0-32767):" DataType=0 Enabled=0 PromptEnabled=0 Default="1" Min=0 Max=32767 [StartupInfo4] Name="Name" Prompt="Please enter Subject's Name:" DataType=1 Enabled=0 PromptEnabled=0 Default="" MaxLength=255 [StartupInfo5] Name="Age" Prompt="Please enter Subject's Age (0-150):" DataType=0 Enabled=0 PromptEnabled=0 Default="0" Min=0 Max=150 [StartupInfo6] Name="Sex" Prompt="Please enter Subject's Sex:" DataType=2 Enabled=0 PromptEnabled=0 Default="male" Choice(1).Value="male" Choice(2).Value="female" [StartupInfo7] Name="Handedness" Prompt="Enter Subject's Handedness:" DataType=2 Enabled=0 PromptEnabled=0 Default="left" Choice(1).Value="left" Choice(2).Value="right" [StartupInfo8] Name="ResearcherID" Prompt="Please enter Researcher's ID:" DataType=0 Enabled=0 PromptEnabled=0 Default="1" Min=0 Max=32767 [Object0] _Version=65536 _ExtentX=2646 _ExtentY=1323 _StockProps=0 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 _ItemList="InitializeVariables;Instructions;BlockList;SetTotalPointsAttrib;DisplayTotalWinnings;Goodbye" _VersionPersist=1 FlowLines(0).Count=6 FlowLines(0).FlowItem(0).Name="InitializeVariables" FlowLines(0).FlowItem(1).Name="Instructions" FlowLines(0).FlowItem(2).Name="BlockList" FlowLines(0).FlowItem(3).Name="SetTotalPointsAttrib" FlowLines(0).FlowItem(4).Name="DisplayTotalWinnings" FlowLines(0).FlowItem(5).Name="Goodbye" LogData=1 Name="SessionProc" TypeName="Procedure" Tag="" Notes="" [Object1] _Version=65536 _ExtentX=2646 _ExtentY=1323 _StockProps=0 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 Logging("OnsetDelay").Log=0 Logging("OnsetTime").Log=0 Logging("DurationError").Log=0 Logging("PreRelease").Log=0 Logging("Duration").Log=0 Logging("StartTime").Log=0 Logging("OffsetTime").Log=0 Logging("FinishTime").Log=0 Logging("TimingMode").Log=0 Logging("CustomOnsetTime").Log=0 Logging("CustomOffsetTime").Log=0 Logging("ActionDelay").Log=0 Logging("ActionTime").Log=0 Logging("TargetOffsetTime").Log=0 Logging("TargetOnsetTime").Log=0 Logging("OffsetDelay").Log=0 Logging("RTTime").Log=0 Logging("ACC").Log=0 Logging("RT").Log=0 Logging("RESP").Log=0 Logging("CRESP").Log=0 Logging("Tag").Log=0 Input(0)=!Data0 _VersionPersist=1 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 Text="Welcome to the experiment.\n\nYou will see a fixation followed by either an 'X' or a 'Y'.\n\n\nPress '1' for an 'X' or '2' for a 'Y'.\n\n\nYou will win 10 dollars for each correct response, and lose a third of your winnings for each incorrect response.\n\nPress any key to continue." ForeColor="black" BackColor="white" BackStyle="opaque" BorderColor="black" BorderWidth="0" X="center" Y="center" Width="100%" Height="100%" XAlign="center" YAlign="center" AlignHorizontal="center" AlignVertical="center" FontName="Courier New" FontSize="18" FontBold="Yes" FontItalic="No" FontUnderline="No" FontStrikeout="No" WordWrap=1 ClearAfter="No" Duration="10000" JumpLabel="" TimingMode=0 PreRelease="0" OnsetSync=1 OffsetSync=0 Name="Instructions" TypeName="TextDisplay" Tag="" Notes="This object presents the instructions to the user." [Data0] DeviceName="Keyboard" DeviceClass="Keyboard" AllowableInput="{ANY}" CorrectInput="" TimeLimit="" MaxCount="1" InputAction=1 SyncOwnerDuration=1 Enabled=1 FlushInputBuffer="Yes" TerminationInput="" UserTag="" ResponseMode="All" ProcessBackspace="Yes" [Object2] _Version=65536 _ExtentX=2646 _ExtentY=1323 _StockProps=0 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 Logging("PracticeMode").Log=-1 _ItemList="BlockProc" _VersionPersist=1 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 Order=0 OrderBy=0 ResetEveryRun=0 HideLevelsWithZeroWeight=0 CycleDef=0 CycleValueSamples=0 CycleValueCondition="" ExitDef=0 ExitValueCycles=1 ExitValueSamples=1 ExitValueSeconds=0 ExitValueCondition="" LoadMethod=0 Filename="" UserAttributes=1 Attributes("Weight").DefaultValue="1" Attributes("Weight").Visible=1 Attributes("Weight").Width=75 Attributes("Weight").OrderIndex=0 Attributes("Procedure").DefaultValue="" Attributes("Procedure").Visible=1 Attributes("Procedure").Width=75 Attributes("Procedure").OrderIndex=1 Attributes("Nested").DefaultValue="" Attributes("Nested").Visible=1 Attributes("Nested").Width=75 Attributes("Nested").OrderIndex=2 Attributes(1).Name="PracticeMode" Attributes(1).DefaultValue="?" Attributes(1).VarType=8 Attributes(1).VarTypeInternal=8 Attributes(1).Visible=1 Attributes(1).Width=86 Levels=1 Levels(1).ValueString="1\tBlockProc\t\tNo\t" Name="BlockList" TypeName="List" Tag="" Notes="This List object runs the BlockProc once." [Object3] _Version=65536 _ExtentX=2646 _ExtentY=1323 _StockProps=0 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 Logging("OnsetDelay").Log=0 Logging("OnsetTime").Log=0 Logging("DurationError").Log=0 Logging("PreRelease").Log=0 Logging("Duration").Log=0 Logging("StartTime").Log=0 Logging("OffsetTime").Log=0 Logging("FinishTime").Log=0 Logging("TimingMode").Log=0 Logging("CustomOnsetTime").Log=0 Logging("CustomOffsetTime").Log=0 Logging("ActionDelay").Log=0 Logging("ActionTime").Log=0 Logging("TargetOffsetTime").Log=0 Logging("TargetOnsetTime").Log=0 Logging("OffsetDelay").Log=0 Logging("RTTime").Log=0 Logging("ACC").Log=0 Logging("RT").Log=0 Logging("RESP").Log=0 Logging("CRESP").Log=0 Logging("Tag").Log=0 _VersionPersist=1 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 Text="Thank you for participating.\n\nPlease view the Output window (Alt+3) for examples of how the Format function works.\n\n\nGoodbye!" ForeColor="black" BackColor="white" BackStyle="opaque" BorderColor="black" BorderWidth="0" X="center" Y="center" Width="100%" Height="100%" XAlign="center" YAlign="center" AlignHorizontal="center" AlignVertical="center" FontName="Courier New" FontSize="18" FontBold="Yes" FontItalic="No" FontUnderline="No" FontStrikeout="No" WordWrap=1 ClearAfter="No" Duration="5000" JumpLabel="" TimingMode=0 PreRelease="0" OnsetSync=1 OffsetSync=0 Name="Goodbye" TypeName="TextDisplay" Tag="" Notes="Lets the user know the experiment is over." [Object4] _Version=65536 _ExtentX=2646 _ExtentY=1323 _StockProps=0 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 _ItemList="TrialList" _VersionPersist=1 FlowLines(0).Count=1 FlowLines(0).FlowItem(0).Name="TrialList" LogData=1 Name="BlockProc" TypeName="Procedure" Tag="" Notes="" [Object5] _Version=65536 _ExtentX=2646 _ExtentY=1323 _StockProps=0 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 Logging("OnsetDelay").Log=0 Logging("OnsetTime").Log=0 Logging("DurationError").Log=0 Logging("PreRelease").Log=0 Logging("Duration").Log=0 Logging("StartTime").Log=0 Logging("OffsetTime").Log=0 Logging("FinishTime").Log=0 Logging("TimingMode").Log=0 Logging("CustomOnsetTime").Log=0 Logging("CustomOffsetTime").Log=0 Logging("ActionDelay").Log=0 Logging("ActionTime").Log=0 Logging("TargetOffsetTime").Log=0 Logging("TargetOnsetTime").Log=0 Logging("OffsetDelay").Log=0 Logging("RTTime").Log=0 Logging("ACC").Log=0 Logging("RT").Log=0 Logging("RESP").Log=0 Logging("CRESP").Log=0 Logging("Tag").Log=0 _VersionPersist=1 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 Text="\n\n\n\n\n\n\n+\n\n\n\n\n\nPress '1' for X\nPress '2' for Y" ForeColor="black" BackColor="white" BackStyle="opaque" BorderColor="black" BorderWidth="0" X="center" Y="center" Width="100%" Height="100%" XAlign="center" YAlign="center" AlignHorizontal="center" AlignVertical="center" FontName="Courier New" FontSize="18" FontBold="Yes" FontItalic="No" FontUnderline="No" FontStrikeout="No" WordWrap=1 ClearAfter="No" Duration="1000" JumpLabel="" TimingMode=0 PreRelease="0" OnsetSync=1 OffsetSync=0 Name="Fixation" TypeName="TextDisplay" Tag="" Notes="Short presentaion of a fixation cross prior to stimulus presentation." [Object6] _Version=65536 _ExtentX=2646 _ExtentY=1323 _StockProps=0 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 Logging("OnsetDelay").Log=-1 Logging("OnsetTime").Log=-1 Logging("DurationError").Log=-1 Logging("PreRelease").Log=0 Logging("Duration").Log=0 Logging("StartTime").Log=0 Logging("OffsetTime").Log=0 Logging("FinishTime").Log=0 Logging("TimingMode").Log=0 Logging("CustomOnsetTime").Log=0 Logging("CustomOffsetTime").Log=0 Logging("ActionDelay").Log=0 Logging("ActionTime").Log=0 Logging("TargetOffsetTime").Log=0 Logging("TargetOnsetTime").Log=0 Logging("OffsetDelay").Log=0 Logging("RTTime").Log=-1 Logging("ACC").Log=-1 Logging("RT").Log=-1 Logging("RESP").Log=-1 Logging("CRESP").Log=-1 Logging("Tag").Log=0 Input(0)=!Data1 _VersionPersist=1 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 Text="[Stimulus]" ForeColor="black" BackColor="white" BackStyle="opaque" BorderColor="black" BorderWidth="0" X="center" Y="center" Width="25%" Height="25%" XAlign="center" YAlign="center" AlignHorizontal="center" AlignVertical="center" FontName="Courier New" FontSize="18" FontBold="Yes" FontItalic="No" FontUnderline="No" FontStrikeout="No" WordWrap=1 ClearAfter="No" Duration="5000" JumpLabel="" TimingMode=0 PreRelease="0" OnsetSync=1 OffsetSync=0 Name="Stimulus" TypeName="TextDisplay" Tag="" Notes="The attribute Stimulus is used to present varying stimuli to the user each trial. It\r\nis presented for up to 5 seconds, during which the user can respond.\r\n\r\nThe user can respond with a 1 or a 2 keypress, and the CorrectAnswer attribute is \r\nreferenced in the property Correct to determine the accuracy of the user's response." [Data1] DeviceName="Keyboard" DeviceClass="Keyboard" AllowableInput="12" CorrectInput="[CorrectAnswer]" TimeLimit="" MaxCount="1" InputAction=1 SyncOwnerDuration=1 Enabled=1 FlushInputBuffer="Yes" TerminationInput="" UserTag="" ResponseMode="All" ProcessBackspace="Yes" [Object7] _Version=65536 _ExtentX=2646 _ExtentY=1323 _StockProps=0 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 Logging("Stimulus").Log=-1 Logging("CorrectAnswer").Log=-1 Logging("TempWinnings").Log=-1 _ItemList="TrialProc" _VersionPersist=1 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 Order=1 OrderBy=0 ResetEveryRun=0 HideLevelsWithZeroWeight=0 CycleDef=0 CycleValueSamples=0 CycleValueCondition="" ExitDef=0 ExitValueCycles=1 ExitValueSamples=1 ExitValueSeconds=0 ExitValueCondition="" LoadMethod=0 Filename="" UserAttributes=3 Attributes("Weight").DefaultValue="1" Attributes("Weight").Visible=1 Attributes("Weight").Width=75 Attributes("Weight").OrderIndex=0 Attributes("Procedure").DefaultValue="" Attributes("Procedure").Visible=1 Attributes("Procedure").Width=75 Attributes("Procedure").OrderIndex=1 Attributes("Nested").DefaultValue="" Attributes("Nested").Visible=1 Attributes("Nested").Width=75 Attributes("Nested").OrderIndex=2 Attributes(1).Name="Stimulus" Attributes(1).DefaultValue="?" Attributes(1).VarType=8 Attributes(1).VarTypeInternal=8 Attributes(1).Visible=1 Attributes(1).Width=75 Attributes(2).Name="CorrectAnswer" Attributes(2).DefaultValue="?" Attributes(2).VarType=8 Attributes(2).VarTypeInternal=8 Attributes(2).Visible=1 Attributes(2).Width=110 Attributes(3).Name="TempWinnings" Attributes(3).DefaultValue="?" Attributes(3).VarType=8 Attributes(3).VarTypeInternal=8 Attributes(3).Visible=1 Attributes(3).Width=143 Levels=2 Levels(1).ValueString="2\tTrialProc\t\tX\t1\t?\t" Levels(2).ValueString="2\tTrialProc\t\tY\t2\t?\t" Name="TrialList" TypeName="List" Tag="" Notes="This List object runs the TrialProc 4 times by manipulating the Weight attribute.\r\n\r\nThe Stimulus attribute is used to present the letter X or Y to the user. The \r\nCorrectAnswer attribute is used in conjunction with the Correct property of object\r\nStimulus, to determine if the user's response was correct or incorrect.\r\n\r\nThe final attribute, TempPoints is used in conjunction with the InLine object \r\nAwardPoints. AwardPoints uses the c.SetAttrib command to assign a value\r\nto TempPoints. This value is the user's running score." [Object8] _Version=65536 _ExtentX=2646 _ExtentY=1323 _StockProps=0 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 _ItemList="Fixation;Stimulus;CalculateReward;Feedback" _VersionPersist=1 FlowLines(0).Count=4 FlowLines(0).FlowItem(0).Name="Fixation" FlowLines(0).FlowItem(1).Name="Stimulus" FlowLines(0).FlowItem(2).Name="CalculateReward" FlowLines(0).FlowItem(3).Name="Feedback" LogData=1 Name="TrialProc" TypeName="Procedure" Tag="" Notes="" [Object9] _Version=131072 _ExtentX=2646 _ExtentY=1323 _StockProps=0 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 _VersionPersist=1 Code="'Initializes the variable Winnings as zero.\nWinnings = 0\n\n" Name="InitializeVariables" TypeName="InLine" Tag="" Notes="" [Object10] _Version=131072 _ExtentX=2646 _ExtentY=1323 _StockProps=0 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 _VersionPersist=1 Code="'Add or subtract winnings/money based on accuracy.\nIf Stimulus.ACC = 1 Then\n\tWinnings = Winnings + 10 \nElse \n \tWinnings = Winnings - (Winnings / 3)\nEnd If\n\n\n'Set the attribute TempWinnings to Winnings for the presentation\n'of a running score in Feedback\nc.SetAttrib \"TempWinnings\", Format(Winnings, \"$###.00\")\n\n'Print debug values to the Output window to show how Format works\nDebug.Print \"Trial winnings before formatting: \" & Winnings\nDebug.Print \"Trial winnings after formatting: \" & Format(Winnings, \"$###.00\")\nDebug.Print \"\"" Name="CalculateReward" TypeName="InLine" Tag="" Notes="" [Object11] _Version=131072 _ExtentX=2646 _ExtentY=1323 _StockProps=0 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 _VersionPersist=1 Code="'Assigns the value of Winnings to the Block level attribute TotalWinnings.\nC.SetAttrib \"TotalWinnings\", Format(Winnings,\"$###.00\")\n\n'Print debug values to the Output window to show how Format works\nDebug.Print \"Total winnings before formatting: \" & Winnings\nDebug.Print \"Total winnings after formatting: \" & Format(Winnings, \"$###.00\")" Name="SetTotalPointsAttrib" TypeName="InLine" Tag="" Notes="" [Object12] _Version=65536 _ExtentX=2646 _ExtentY=1323 _StockProps=0 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 Logging("OnsetDelay").Log=0 Logging("OnsetTime").Log=0 Logging("DurationError").Log=0 Logging("PreRelease").Log=0 Logging("Duration").Log=0 Logging("StartTime").Log=0 Logging("OffsetTime").Log=0 Logging("FinishTime").Log=0 Logging("TimingMode").Log=0 Logging("CustomOnsetTime").Log=0 Logging("CustomOffsetTime").Log=0 Logging("ActionDelay").Log=0 Logging("ActionTime").Log=0 Logging("TargetOffsetTime").Log=0 Logging("TargetOnsetTime").Log=0 Logging("OffsetDelay").Log=0 Logging("RTTime").Log=0 Logging("ACC").Log=0 Logging("RT").Log=0 Logging("RESP").Log=0 Logging("CRESP").Log=0 Logging("Tag").Log=0 _VersionPersist=1 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=67 Text="Your total amount won = [TotalWinnings]" ForeColor="black" BackColor="white" BackStyle="opaque" BorderColor="black" BorderWidth="0" X="center" Y="center" Width="100%" Height="100%" XAlign="center" YAlign="center" AlignHorizontal="center" AlignVertical="center" FontName="Courier New" FontSize="18" FontBold="Yes" FontItalic="No" FontUnderline="No" FontStrikeout="No" WordWrap=1 ClearAfter="No" Duration="2000" JumpLabel="" TimingMode=0 PreRelease="0" OnsetSync=1 OffsetSync=0 Name="DisplayTotalWinnings" TypeName="TextDisplay" Tag="" Notes="Displays the user's total points using the attribute TotalPoints." [Object13] _Version=65536 _ExtentX=2646 _ExtentY=1323 _StockProps=0 VersionMajor=1 VersionMinor=2 VersionInternal=1 VersionBuild=68 Logging("OnsetDelay").Log=0 Logging("OnsetTime").Log=0 Logging("DurationError").Log=0 Logging("PreRelease").Log=0 Logging("Duration").Log=0 Logging("StartTime").Log=0 Logging("OffsetTime").Log=0 Logging("FinishTime").Log=0 Logging("TimingMode").Log=0 Logging("CustomOnsetTime").Log=0 Logging("CustomOffsetTime").Log=0 Logging("ActionDelay").Log=0 Logging("ActionTime").Log=0 Logging("TargetOffsetTime").Log=0 Logging("TargetOnsetTime").Log=0 Logging("OffsetDelay").Log=0 Logging("RTTime").Log=0 Logging("ACC").Log=0 Logging("RT").Log=0 Logging("RESP").Log=0 Logging("CRESP").Log=0 Logging("Tag").Log=0 _VersionPersist=1 States("Correct").X="center" States("Correct").Y="center" States("Correct").Width="100%" States("Correct").Height="100%" States("Correct").XAlign="center" States("Correct").YAlign="center" States("Correct").BackColor="white" States("Correct").BackStyle="opaque" States("Correct").BorderColor="black" States("Correct").BorderWidth="0" States("Correct").ClearAfter="No" States("Correct").Enabled="Yes" States("Correct").ChildCount=3 States("Correct").Objects(1).Type="Text" States("Correct").Objects(1).Text="Correct!" States("Correct").Objects(1).Width="75%" States("Correct").Objects(1).Height="10%" States("Correct").Objects(1).X="center" States("Correct").Objects(1).Y="20%" States("Correct").Objects(1).AlignHorizontal="left" States("Correct").Objects(1).AlignVertical="center" States("Correct").Objects(1).FontName="Courier New" States("Correct").Objects(1).FontSize="18" States("Correct").Objects(1).FontBold="Yes" States("Correct").Objects(1).FontUnderline="No" States("Correct").Objects(1).FontStrikeout="No" States("Correct").Objects(1).FontItalic="No" States("Correct").Objects(1).ForeColor="blue" States("Correct").Objects(1).BackColor="white" States("Correct").Objects(1).BackStyle="transparent" States("Correct").Objects(1).BorderWidth="0" States("Correct").Objects(1).BorderColor="black" States("Correct").Objects(1).XAlign="center" States("Correct").Objects(1).YAlign="center" States("Correct").Objects(1).WordWrap=1 States("Correct").Objects(1).Name="Text1" States("Correct").Objects(2).Type="Text" States("Correct").Objects(2).Text="@RT Seconds Response Time" States("Correct").Objects(2).Width="75%" States("Correct").Objects(2).Height="10%" States("Correct").Objects(2).X="center" States("Correct").Objects(2).Y="35%" States("Correct").Objects(2).AlignHorizontal="left" States("Correct").Objects(2).AlignVertical="center" States("Correct").Objects(2).FontName="Courier New" States("Correct").Objects(2).FontSize="18" States("Correct").Objects(2).FontBold="Yes" States("Correct").Objects(2).FontUnderline="No" States("Correct").Objects(2).FontStrikeout="No" States("Correct").Objects(2).FontItalic="No" States("Correct").Objects(2).ForeColor="blue" States("Correct").Objects(2).BackColor="white" States("Correct").Objects(2).BackStyle="transparent" States("Correct").Objects(2).BorderWidth="0" States("Correct").Objects(2).BorderColor="black" States("Correct").Objects(2).XAlign="center" States("Correct").Objects(2).YAlign="center" States("Correct").Objects(2).WordWrap=1 States("Correct").Objects(2).Name="Text2" States("Correct").Objects(3).Type="Text" States("Correct").Objects(3).Text="You have won [TempWinnings] so far." States("Correct").Objects(3).Width="75%" States("Correct").Objects(3).Height="10%" States("Correct").Objects(3).X="center" States("Correct").Objects(3).Y="55%" States("Correct").Objects(3).AlignHorizontal="left" States("Correct").Objects(3).AlignVertical="center" States("Correct").Objects(3).FontName="Courier New" States("Correct").Objects(3).FontSize="18" States("Correct").Objects(3).FontBold="Yes" States("Correct").Objects(3).FontUnderline="No" States("Correct").Objects(3).FontStrikeout="No" States("Correct").Objects(3).FontItalic="No" States("Correct").Objects(3).ForeColor="black" States("Correct").Objects(3).BackColor="white" States("Correct").Objects(3).BackStyle="opaque" States("Correct").Objects(3).BorderWidth="0" States("Correct").Objects(3).BorderColor="black" States("Correct").Objects(3).XAlign="center" States("Correct").Objects(3).YAlign="center" States("Correct").Objects(3).WordWrap=1 States("Correct").Objects(3).Name="Text3" States("Incorrect").X="center" States("Incorrect").Y="center" States("Incorrect").Width="100%" States("Incorrect").Height="100%" States("Incorrect").XAlign="center" States("Incorrect").YAlign="center" States("Incorrect").BackColor="white" States("Incorrect").BackStyle="opaque" States("Incorrect").BorderColor="black" States("Incorrect").BorderWidth="0" States("Incorrect").ClearAfter="No" States("Incorrect").Enabled="Yes" States("Incorrect").ChildCount=3 States("Incorrect").Objects(1).Type="Text" States("Incorrect").Objects(1).Text="Incorrect" States("Incorrect").Objects(1).Width="75%" States("Incorrect").Objects(1).Height="10%" States("Incorrect").Objects(1).X="center" States("Incorrect").Objects(1).Y="21%" States("Incorrect").Objects(1).AlignHorizontal="left" States("Incorrect").Objects(1).AlignVertical="center" States("Incorrect").Objects(1).FontName="Courier New" States("Incorrect").Objects(1).FontSize="18" States("Incorrect").Objects(1).FontBold="Yes" States("Incorrect").Objects(1).FontUnderline="No" States("Incorrect").Objects(1).FontStrikeout="No" States("Incorrect").Objects(1).FontItalic="No" States("Incorrect").Objects(1).ForeColor="red" States("Incorrect").Objects(1).BackColor="white" States("Incorrect").Objects(1).BackStyle="transparent" States("Incorrect").Objects(1).BorderWidth="0" States("Incorrect").Objects(1).BorderColor="black" States("Incorrect").Objects(1).XAlign="center" States("Incorrect").Objects(1).YAlign="center" States("Incorrect").Objects(1).WordWrap=1 States("Incorrect").Objects(1).Name="Text1" States("Incorrect").Objects(2).Type="Text" States("Incorrect").Objects(2).Text="@RT Seconds Response Time" States("Incorrect").Objects(2).Width="75%" States("Incorrect").Objects(2).Height="10%" States("Incorrect").Objects(2).X="center" States("Incorrect").Objects(2).Y="35%" States("Incorrect").Objects(2).AlignHorizontal="left" States("Incorrect").Objects(2).AlignVertical="center" States("Incorrect").Objects(2).FontName="Courier New" States("Incorrect").Objects(2).FontSize="18" States("Incorrect").Objects(2).FontBold="Yes" States("Incorrect").Objects(2).FontUnderline="No" States("Incorrect").Objects(2).FontStrikeout="No" States("Incorrect").Objects(2).FontItalic="No" States("Incorrect").Objects(2).ForeColor="red" States("Incorrect").Objects(2).BackColor="white" States("Incorrect").Objects(2).BackStyle="transparent" States("Incorrect").Objects(2).BorderWidth="0" States("Incorrect").Objects(2).BorderColor="black" States("Incorrect").Objects(2).XAlign="center" States("Incorrect").Objects(2).YAlign="center" States("Incorrect").Objects(2).WordWrap=1 States("Incorrect").Objects(2).Name="Text2" States("Incorrect").Objects(3).Type="Text" States("Incorrect").Objects(3).Text="You have won [TempWinnings] so far." States("Incorrect").Objects(3).Width="75%" States("Incorrect").Objects(3).Height="10%" States("Incorrect").Objects(3).X="center" States("Incorrect").Objects(3).Y="55%" States("Incorrect").Objects(3).AlignHorizontal="left" States("Incorrect").Objects(3).AlignVertical="center" States("Incorrect").Objects(3).FontName="Courier New" States("Incorrect").Objects(3).FontSize="18" States("Incorrect").Objects(3).FontBold="Yes" States("Incorrect").Objects(3).FontUnderline="No" States("Incorrect").Objects(3).FontStrikeout="No" States("Incorrect").Objects(3).FontItalic="No" States("Incorrect").Objects(3).ForeColor="black" States("Incorrect").Objects(3).BackColor="white" States("Incorrect").Objects(3).BackStyle="opaque" States("Incorrect").Objects(3).BorderWidth="0" States("Incorrect").Objects(3).BorderColor="black" States("Incorrect").Objects(3).XAlign="center" States("Incorrect").Objects(3).YAlign="center" States("Incorrect").Objects(3).WordWrap=1 States("Incorrect").Objects(3).Name="Text3" States("NoResponse").X="center" States("NoResponse").Y="center" States("NoResponse").Width="100%" States("NoResponse").Height="100%" States("NoResponse").XAlign="center" States("NoResponse").YAlign="center" States("NoResponse").BackColor="white" States("NoResponse").BackStyle="opaque" States("NoResponse").BorderColor="black" States("NoResponse").BorderWidth="0" States("NoResponse").ClearAfter="No" States("NoResponse").Enabled="Yes" States("NoResponse").ChildCount=1 States("NoResponse").Objects(1).Type="Text" States("NoResponse").Objects(1).Text="No response detected." States("NoResponse").Objects(1).Width="75%" States("NoResponse").Objects(1).Height="10%" States("NoResponse").Objects(1).X="center" States("NoResponse").Objects(1).Y="20%" States("NoResponse").Objects(1).AlignHorizontal="left" States("NoResponse").Objects(1).AlignVertical="center" States("NoResponse").Objects(1).FontName="Courier New" States("NoResponse").Objects(1).FontSize="18" States("NoResponse").Objects(1).FontBold="Yes" States("NoResponse").Objects(1).FontUnderline="No" States("NoResponse").Objects(1).FontStrikeout="No" States("NoResponse").Objects(1).FontItalic="No" States("NoResponse").Objects(1).ForeColor="red" States("NoResponse").Objects(1).BackColor="white" States("NoResponse").Objects(1).BackStyle="transparent" States("NoResponse").Objects(1).BorderWidth="0" States("NoResponse").Objects(1).BorderColor="black" States("NoResponse").Objects(1).XAlign="center" States("NoResponse").Objects(1).YAlign="center" States("NoResponse").Objects(1).WordWrap=1 States("NoResponse").Objects(1).Name="Text1" States("Pending").X="center" States("Pending").Y="center" States("Pending").Width="100%" States("Pending").Height="100%" States("Pending").XAlign="center" States("Pending").YAlign="center" States("Pending").BackColor="white" States("Pending").BackStyle="opaque" States("Pending").BorderColor="black" States("Pending").BorderWidth="0" States("Pending").ClearAfter="No" States("Pending").Enabled="Yes" States("Pending").ChildCount=0 UseScriptActivation=0 CollectACCStats=1 CollectNoRespACCStats=1 CollectCorrectRTStats=1 CollectIncorrectRTStats=1 ACCDivisor="1.0" ACCFormat="Percent" RTDivisor="1000.0" RTFormat="###0.000" CorrectRTDivisor="1000.0" CorrectRTFormat="###0.000" IncorrectRTDivisor="1000.0" IncorrectRTFormat="###0.000" Duration="2000" JumpLabel="" TimingMode=0 PreRelease="0" OnsetSync=1 OffsetSync=0 InputObjectName="Stimulus" Name="Feedback" TypeName="FeedbackDisplay" Tag="" Notes="Displays the users accuracy per trial; their reaction time; and their running score. \r\nThe user's running score is presented by referencing the attribute TempPoints." [UserScript] 'Create the Winnings variable Dim Winnings As Double