离开学还有一周，这学期的《E-Prime实验设计》课已经备好。这次我们采用只有100页的《Getting Started Guide》作为教材。目的就是轻装上阵，想强调动手能力培养，放低理论学习的分量。尝试采用“经典”实验来进行实验心理学的教学。这门课的教学大纲点击这里，我开的课都写在这里了。

http://s12/middle/60a75162xc8229a7cd04b&690
图1. 选择教材有点暗合本博的主题：磁共振、脑电+行为(图中秒表)

    具体来说，我开的这门课将围绕9个实验展开。实验都是经典范式，都来自经典文献。因此，每次课的开始是经典文献的回顾，比如Ridley Stroop于1937年写在《Journal of Experimental Psychology》的那篇关于Stroop范式的文章，以及Jane E. Raymond于1992年关于注意瞬脱的文章。同学们将在字里行间找到关于实验的设计。挖掘控制变量，以及作者想要回避的干扰因素。从而抽离出核心实验过程，最后化作E-Prime的各个控件。而关于这些控件的功能，编程用到的语句，就在这个过程中得到讲解。主要实验项目为：

实验项目设置与内容

序号	实验名称	内  容  提  要	课时
1	刻板印象实验	性别刻板印象的实验原理，通过实际操作掌握各组件的使用方法，学会如何添加文字、声音、视频等刺激材料，初步学会用inline进行对象控制	6
2	Stroop效应实验	Stroop效应的实验原理，本实验演示认知神经科学研究过程中所运用到的推理策略，掌握图片刺激中亮度，视角等基本概念和测量方法，能使用绘图板或firework进行刺激图片的简单编辑，能熟练应用List权重设置进行试次搭配。	3
3	脑机接口实验	运动想象(或P300拼字器)掌握如何从研究论文中阅读到实验相关信息，以及通过模块化分解进行试次核心过程设计的能力。通过自变量、因变量分解，进行完整的实验实现。	3
4	空间注意范式	掌握空间注意范式的实现原理，学会两种在实验过程中让被试休息的方法。	3
5	Go/Nogo实验	掌握Go/Nogo实验范式，能编制简单的判断语句与路标设定。	3
6	视觉搜索实验	掌握视觉搜索实验原理，学会数据合并，滤除和统计等基本操作。	3
7	注意瞬脱实验	掌握注意瞬脱实验范式，编程实现快速序列视觉呈现刺激，掌握嵌套List的使用，List中属性的调用	3
8	n-back实验	掌握空间n-back实验，并了解数字n-back实验的实现，学习E-Prime编程的一些高级功能	4
9	脑电、磁共振实验	掌握在脑电中加Mark，接收磁共振扫描信号等基本设置，了解脑电实验、磁共振实验的基本概念，及开展相应实验的注意事项	6

 

    力图做到举一反三，不进行系统的E-Prime编程学习。例如，对于编程这一块，我们将一些常用命令融入到各实验中。

“刻板印象实验”实验中

变量定义

Dim x As Integer    '定义整数

Dim x As Double    '浮点数

Dim x As String    '字符串

Public x As integer    '全局变量

常用函数

Random(1,12)    '产生1到12间的一个随机整数

Rnd    '0到1间的浮点数，上句可用int(12*Rnd)+1实现，即公式为“(上限-下限+1)*rnd+下限”

Debug.Print    '调试框打印字符串，常用于调试

控件属性调用

控件名.X    '呈现X坐标

控件名.Y    '呈现Y坐标

控件名.text    '呈现字符

控件名.Duration    '呈现时长

控件名.OnsetTime    '呈现时间

Display.XRes    '显示设备的X分辨率

Display.YRes    '显示设备的X分辨率

 

“Stroop效应”实验中

c.SetAttrib "属性名",取值    '属性的设置

c.GetAttrib "属性名"    '获得属性的取值

 

 

“注意瞬脱”实验中

数据类型转换函数

CColor("red")    '获得红色对象

CStr(1)    '活动字符串"1"

选择语句

select case a

       case 取值

end select

判断语句

if 判断表达式 then

 

“n-back”实验中

变量定义知识点：

Dim a(1 to 9)    '定义数列

randomizearray    '随机打乱数列函数

控件属性调用

组间名.ForeColor    '字体颜色设置

循环语句

for i=1 to 100

    其他操作

next

多选择语句

if 表达式 then

else

end if

 

“脑电，功能磁共振”实验中

三步实现EEG中加标记

首先需要在设备中选取Port端口，各属性设置如下Address: &h378 size: 16; Invert: No; Mask: -1

其次是在Script中为控件开端口，这样控件才能把mark打到EEG的记录端口中，即下面的命令

控件名.OnsetSignalEnabled = True

控件名.OnsetSignalPort = &h378

控件名.OffsetSignalEnabled = True

控件名.OffsetSignalPort = &h378

第三步，在需要打标记的地方加入

writePort &h378,9

就会把9这个标记发给脑电记录仪了。当然，也可以调用  控件名.OnsetSignalData = c.getattrib("属性值")来把List中某个属性的值打到EEG记录仪中。

 

同学们有什么好的建议，可以在评论中写下来。