Keisuke Sehara
/
STM32_Whisking
fast-feedback virtual target task code on STM Nucleo
task.cpp@8:973dcd190672, 2018-05-31 (annotated)
- Committer:
- gwappa
- Date:
- Thu May 31 15:25:37 2018 +0000
- Revision:
- 8:973dcd190672
- Parent:
- 6:13d180af7501
- Child:
- 9:e136394bdb39
current working
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
gwappa | 1:871d3066c2ab | 1 | #include "task.h" |
gwappa | 1:871d3066c2ab | 2 | #include "utils.h" |
gwappa | 8:973dcd190672 | 3 | #include "states.h" |
gwappa | 4:fcf597f82632 | 4 | #include "automaton.h" |
gwappa | 1:871d3066c2ab | 5 | |
gwappa | 1:871d3066c2ab | 6 | Task::Task(const Mode& mode): |
gwappa | 1:871d3066c2ab | 7 | mode(mode), |
gwappa | 5:849446d19406 | 8 | delay_min_ms(CHR_DELAY_MIN, 3000), |
gwappa | 5:849446d19406 | 9 | delay_var_ms(CHR_DELAY_VAR, 3000), |
gwappa | 5:849446d19406 | 10 | prep_dur_ms (CHR_PREP_DUR, 3000), |
gwappa | 5:849446d19406 | 11 | cue_dur_ms (CHR_CUE_DUR, 3000), |
gwappa | 5:849446d19406 | 12 | post_dur_ms (CHR_POST_DUR, 4000), |
gwappa | 5:849446d19406 | 13 | reward_ms (CHR_REWARD_DUR,10), |
gwappa | 5:849446d19406 | 14 | test_reward (CMD_TEST_REWARD, callback(this, &Task::testReward)), |
gwappa | 5:849446d19406 | 15 | run (CMD_EXECUTE, callback(this, &Task::runTrial)) |
gwappa | 1:871d3066c2ab | 16 | { } |
gwappa | 5:849446d19406 | 17 | |
gwappa | 5:849446d19406 | 18 | ModeSelection::ModeSelection(const Mode& defaultValue): |
gwappa | 5:849446d19406 | 19 | value(defaultValue) { |
gwappa | 5:849446d19406 | 20 | config::addCommand(CMD_ID_MODE, this); |
gwappa | 5:849446d19406 | 21 | } |
gwappa | 5:849446d19406 | 22 | |
gwappa | 5:849446d19406 | 23 | ModeSelection::~ModeSelection() { |
gwappa | 5:849446d19406 | 24 | config::removeCommand(CMD_ID_MODE); |
gwappa | 5:849446d19406 | 25 | } |
gwappa | 1:871d3066c2ab | 26 | |
gwappa | 5:849446d19406 | 27 | bool ModeSelection::parse(const char& c) { |
gwappa | 5:849446d19406 | 28 | switch(c) { |
gwappa | 5:849446d19406 | 29 | case CMD_MODE_PAIR: value = Pair; return true; |
gwappa | 5:849446d19406 | 30 | case CMD_MODE_REPORT: value = Report; return true; |
gwappa | 5:849446d19406 | 31 | case CMD_MODE_APPEAR: value = Appear; return true; |
gwappa | 5:849446d19406 | 32 | default: |
gwappa | 5:849446d19406 | 33 | return false; |
gwappa | 5:849446d19406 | 34 | } |
gwappa | 5:849446d19406 | 35 | } |
gwappa | 5:849446d19406 | 36 | |
gwappa | 5:849446d19406 | 37 | bool ModeSelection::writeSettings() { |
gwappa | 5:849446d19406 | 38 | #define WRITE(CHR, VAL) if (value == (VAL)) { IO::write("[%c]",CHR); } else { IO::write("%c",CHR); } |
gwappa | 1:871d3066c2ab | 39 | WRITE(CMD_MODE_PAIR, Pair) |
gwappa | 5:849446d19406 | 40 | WRITE(CMD_MODE_REPORT, Report) |
gwappa | 1:871d3066c2ab | 41 | WRITE(CMD_MODE_APPEAR, Appear) |
gwappa | 1:871d3066c2ab | 42 | #undef WRITE |
gwappa | 5:849446d19406 | 43 | return true; |
gwappa | 1:871d3066c2ab | 44 | } |
gwappa | 5:849446d19406 | 45 | |
gwappa | 5:849446d19406 | 46 | void ModeSelection::echoback() { |
gwappa | 5:849446d19406 | 47 | IO::write(IO::CONFIG_HEADER); |
gwappa | 5:849446d19406 | 48 | writeSettings(); |
gwappa | 6:13d180af7501 | 49 | IO::write("\r\n"); |
gwappa | 1:871d3066c2ab | 50 | } |
gwappa | 1:871d3066c2ab | 51 | |
gwappa | 5:849446d19406 | 52 | |
gwappa | 5:849446d19406 | 53 | void Task::testReward() { |
gwappa | 8:973dcd190672 | 54 | automaton::init<TestReward>(); |
gwappa | 8:973dcd190672 | 55 | automaton::run(); |
gwappa | 8:973dcd190672 | 56 | IO::result("reward"); |
gwappa | 5:849446d19406 | 57 | } |
gwappa | 5:849446d19406 | 58 | |
gwappa | 5:849446d19406 | 59 | void Task::runTrial() { |
gwappa | 8:973dcd190672 | 60 | automaton::init<Delay>(); |
gwappa | 5:849446d19406 | 61 | automaton::run(); |
gwappa | 5:849446d19406 | 62 | } |
gwappa | 5:849446d19406 | 63 | |
gwappa | 5:849446d19406 | 64 | void Task::parseFromSerial() { |
gwappa | 5:849446d19406 | 65 | config::handleSerial(); |
gwappa | 5:849446d19406 | 66 | } |
gwappa | 5:849446d19406 | 67 | |
gwappa | 5:849446d19406 | 68 | void Task::writeSettingsToSerial() { |
gwappa | 5:849446d19406 | 69 | config::writeSettingsToSerial(); |
gwappa | 5:849446d19406 | 70 | } |