2010252<_VersionPersist dt:dt="int">200{0B0BE33D-20B1-4AD8-AF1C-2668325CB24E}SessionProcPSTv1.0.0.2{10343DBD-55BE-45C7-AA62-A5239F6918AB}01100112019-06-03T17:11:25.000536870912KeyboardKeyboard<_VersionPersist dt:dt="int">1-11000MouseMouse<_VersionPersist dt:dt="int">1-11000DisplayDisplay<_VersionPersist dt:dt="int">1-1064048016white1039201NoYes00%SoundSound<_VersionPersist dt:dt="int">100DirectSoundSerialSerial<_VersionPersist dt:dt="int">1-11019600800-1-10-1BlockTrialSubTrialLogLevel5LogLevel6LogLevel7LogLevel8LogLevel9LogLevel10101SubjectPlease enter the Subject Number (0-32767):0-1-11032767SessionPlease enter the Session Number (0-32767):0-1-11032767GroupPlease enter Subject's Group (0-32767):0001032767NamePlease enter Subject's Name:100255AgePlease enter Subject's Age (0-150):00000150SexPlease enter Subject's Sex:200malemalefemaleHandednessEnter Subject's Handedness:200leftleftrightResearcherIDPlease enter Researcher's ID:0001032767FeedbackFeedbackDisplay{78114CEE-58A2-4B4A-B4F9-E5CD5B000521}2010273<_VersionPersist dt:dt="int">110OnsetDelay0OnsetTime0DurationError0PreRelease0Duration0StartTime0OffsetTime0FinishTime0TimingMode0CustomOnsetTime0CustomOffsetTime0ActionDelay0ActionTime0TargetOffsetTime0TargetOnsetTime0PendingInputMasks0OffsetDelay0RTTime0ACC0RT0RESP0CRESP0Tag0OnsetToOnsetTime0Correctwhiteopaqueblack0centercenter100%100%centercenterNoYesSlideTextText1bluewhitetransparent0blackcenter20%75%10%centercenterleftcenterCourier New18YesNoNoNoCorrect!-1SlideTextText2bluewhitetransparent0blackcenter35%75%10%centercenterleftcenterCourier New18YesNoNoNo@RT Seconds Response Time-1SlideTextText3bluewhitetransparent0blackcenter45%75%10%centercenterleftcenterCourier New18YesNoNoNo@ACC.MEAN Average Percent Correct-1Incorrectwhiteopaqueblack0centercenter100%100%centercenterNoYesSlideTextText1redwhitetransparent0blackcenter20%75%10%centercenterleftcenterCourier New18YesNoNoNoIncorrect-1SlideTextText2redwhitetransparent0blackcenter35%75%10%centercenterleftcenterCourier New18YesNoNoNo@RT Seconds Response Time-1SlideTextText3redwhitetransparent0blackcenter45%75%10%centercenterleftcenterCourier New18YesNoNoNo@ACC.MEAN Average Percent Correct-1NoResponsewhiteopaqueblack0centercenter100%100%centercenterNoYesSlideTextText1redwhitetransparent0blackcenter20%75%10%centercenterleftcenterCourier New18YesNoNoNoNo response detected.-1Pendingwhiteopaqueblack0centercenter100%100%centercenterNoYes15001000100011111.0Percent1000.0###0.0001000.0###0.0001000.0###0.000Stimulus00BlockListList{12DDD60A-6673-47F3-83F0-A65817B24C37}2010258<_VersionPersist dt:dt="int">5PracticeMode1BlockProc000000001102Weight17510Procedure17511Nested17512PracticeMode0?861881 BlockProc NoTrialListList{DBADBFBF-2FBB-4B89-8F04-A4B9245550CC}2010258<_VersionPersist dt:dt="int">5Stimulus1CorrectAnswer1TrialProc102000001102Weight17510Procedure17511Nested17512Stimulus0?75188CorrectAnswer0?1261882 TrialProc X 12 TrialProc Y 2SessionProcProcedure{73D2CF78-974F-43C0-92EC-39AD3928F033}2010254<_VersionPersist dt:dt="int">201InstructionsBlockListGoodbye101222InstructionsTextDisplayBlockListListGoodbyeTextDisplayBlockProcProcedure{14DDB1A5-EBAC-40EF-A774-1F3431EECF6F}2010254<_VersionPersist dt:dt="int">201WaitDisplayWaitForSerialInputTrialList101222WaitDisplayTextDisplayWaitForSerialInputInLineTrialListListTrialProcProcedure{A214DA24-FE65-42BE-B949-7A36D08E0870}2010254<_VersionPersist dt:dt="int">201FixationStimulusFeedbackWriteSerial101222FixationTextDisplayStimulusTextDisplayFeedbackFeedbackDisplayWriteSerialInLineWaitForSerialInputInLine{7B757EBE-348B-486D-911C-741506CC4A93}2010262<_VersionPersist dt:dt="int">1' Just hold the experiment here until some bytes ' arrive over the serial port. Dim str As String Dim n As Long Debug.TimeStampsEnabled = True Do While Serial.InputCount = 0 Loop ' Read the data that came in n = Serial.ReadString(str) ' Echo the data to the E-Studio output window Debug.Print "Received: " & str WriteSerialInLine{5C24DE91-30ED-4C64-8258-1A90591E3D5E}2010262<_VersionPersist dt:dt="int">1' Send the subject's response key to the remote terminal. Serial.WriteString Stimulus.RESP ' Echo the key sent to the E-Studio output window. Debug.Print "Sent: " & Stimulus.RESP InstructionsTextDisplay{C75F8958-F129-4E46-AB29-5F7929C39FD8}2010263<_VersionPersist dt:dt="int">100OnsetDelay0OnsetTime0DurationError0PreRelease0Duration0StartTime0OffsetTime0FinishTime0TimingMode0CustomOnsetTime0CustomOffsetTime0ActionDelay0ActionTime0TargetOffsetTime0TargetOnsetTime0PendingInputMasks0OffsetDelay0RTTime0ACC0RT0RESP0CRESP0Tag0OnsetToOnsetTime0KeyboardKeyboardKeyboard{ANY}1111YesAllYes100000010blackwhiteopaqueblack0centercenter100%100%centercentercentercenterNoCourier New18YesNoNoNoWelcome to the experiment You will see a fixation followed by either an 'X' or a 'Y'. Press '1' for an 'X' or '2' for a 'Y'. Press any key to continue-1000GoodbyeTextDisplay{F192133B-F365-48D4-B66F-554C6174F263}2010263<_VersionPersist dt:dt="int">100OnsetDelay0OnsetTime0DurationError0PreRelease0Duration0StartTime0OffsetTime0FinishTime0TimingMode0CustomOnsetTime0CustomOffsetTime0ActionDelay0ActionTime0TargetOffsetTime0TargetOnsetTime0PendingInputMasks0OffsetDelay0RTTime0ACC0RT0RESP0CRESP0Tag0OnsetToOnsetTime020000010blackwhiteopaqueblack0centercenter100%100%centercentercentercenterNoCourier New18YesNoNoNoThank you for participating. Goodbye!-1000FixationTextDisplay{81901EC8-D090-4B48-9FC7-C15DA3CBB2C8}2010263<_VersionPersist dt:dt="int">100OnsetDelay0OnsetTime0DurationError0PreRelease0Duration0StartTime0OffsetTime0FinishTime0TimingMode0CustomOnsetTime0CustomOffsetTime0ActionDelay0ActionTime0TargetOffsetTime0TargetOnsetTime0PendingInputMasks0OffsetDelay0RTTime0ACC0RT0RESP0CRESP0Tag0OnsetToOnsetTime010000010blackwhiteopaqueblack0centercenter100%100%centercentercentercenterNoCourier New18YesNoNoNo + Press '1' for X Press '2' for Y-1000StimulusTextDisplay{663CE7FB-636C-4698-A5BC-34739D231156}2010263<_VersionPersist dt:dt="int">100OnsetDelay1OnsetTime1DurationError1PreRelease0Duration0StartTime0OffsetTime0FinishTime0TimingMode0CustomOnsetTime0CustomOffsetTime0ActionDelay0ActionTime0TargetOffsetTime0TargetOnsetTime0PendingInputMasks0OffsetDelay0RTTime1ACC1RT1RESP1CRESP1Tag0OnsetToOnsetTime1KeyboardKeyboardKeyboard12[CorrectAnswer]1111YesAllYes100000010blackwhiteopaqueblack0centercenter25%25%centercentercentercenterNoCourier New18YesNoNoNo[Stimulus]-1000WaitDisplayTextDisplay{5746C7E6-71D6-424C-A6B5-CE6E767E99E2}2010263<_VersionPersist dt:dt="int">100OnsetDelay0OnsetTime0DurationError0PreRelease0Duration0StartTime0OffsetTime0FinishTime0TimingMode0CustomOnsetTime0CustomOffsetTime0ActionDelay0ActionTime0TargetOffsetTime0TargetOnsetTime0PendingInputMasks0OffsetDelay0RTTime0ACC0RT0RESP0CRESP0Tag0OnsetToOnsetTime000010blackwhiteopaqueblack0centercenter100%100%centercentercentercenterNoCourier New18YesNoNoNoWaiting for Serial Input-1000