1.sce

听觉反应时测量 presentation应用

scenario = "辨别反应时";
pcl_file = "辨别反应时.pcl"; 
no_logfile = false;

active_buttons = 3;
button_codes = 1,2,3;     

begin; 

picture {} default;   

box { height = 4; width = 30; color = 255,255,255; } fix_hor;
box { height = 30; width = 4; color = 255,255,255; } fix_ver;  
box { height = 4; width = 30; color = 0,0,0; } fix_hor0;
box { height = 30; width = 4; color = 0,0,0; } fix_ver0;

picture {
   box fix_hor; x = 0; y = 0;
   box fix_ver; x = 0; y = 0;       
   
} fix1;     

picture {
   box fix_hor0; x = 0; y = 0;
   box fix_ver0; x = 0; y = 0;
 } fix2;  

picture {
   bitmap {filename= "inst2.jpg"; }; 
   x=0;y=0;
} inst;

array {
   LOOP $i 25;
   $k = '$i + 1';
   sound { wavefile { filename = "500_$k.wav"; };};
   ENDLOOP;
} tar1; 

array {
   LOOP $i 25;
   $k = '$i + 1';
   sound { wavefile { filename = "1500_$k.wav"; };};
   ENDLOOP;
} tar2; 


$head_rest=1000;                    
$message_length =800;
$sound_duration=2000;

trial {
   trial_duration = 4000;
   trial_type = first_response;
   all_responses = false;  
   
   stimulus_event {
      nothing{};
      time = '$head_rest';
   } event_s1; 

   
   stimulus_event {
      nothing{};
      time = '$head_rest+$sound_duration';
      response_active = true;
      stimulus_time_in = 300; 
      stimulus_time_out = never;
   } event_s2;      
   
   picture {
       text {
            caption = "-----低频-----";
            font_size = 60;
            font_color = 255,255,255;
            }text1; 
            x = 0; y = 0;
         } pic1; 
   time = '$head_rest';
   duration = '$message_length';
   
   picture {
       text {
            caption = "-----高频-----";
            font_size = 60;
            font_color = 255,255,255;
            }text2; 
            x = 0; y = 0;
         } pic2; 
   time = '$head_rest+$sound_duration';
   duration = '$message_length';
     
} trial_prac;   


trial {
   trial_duration = 4000;
   trial_type = first_response;      
   stimulus_event {
      nothing{};
   } event_s;                        
} trial_main;    

trial {
   trial_duration = forever;
   trial_type = correct_response;
   all_responses = true;   
    
   picture{
      text {
         caption = " ";
         font_size = 14; 
         text_align = align_left;
      }message; 
      x = 0; y = 0;
       text {
         caption = " ";
         font_size = 24;
      }message1; 
      x = 0; y = 160;};
   target_button = 3;
}trial_message;    

trial {     
      trial_duration = forever;
      trial_type = correct_response;
      all_responses = true; 
   
      stimulus_event {   
      nothing{};
      } instruction;
      
      } trial_inst; 

trial {
   trial_duration = 1500;    
   picture fix2;   
   time = 0; 
   picture fix1;   
   time = 800; 
   picture fix2;
   time = 1200;    
}trial_fix;       # 注视点播放