Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- bee <- add.rule(
- strategy = bee,
- name='ruleSignal',
- arguments = list(sigcol="fast.gt.up",
- sigval=TRUE,
- orderqty=100,
- ordertype='market',
- orderside='long',
- osFUN='osMaxPos'),
- type='enter')
- bee <- add.rule(
- strategy = bee,
- name='ruleSignal',
- arguments = list(sigcol="fast.lt.dn",
- sigval=TRUE,
- orderqty='all',
- ordertype='market',
- orderside='long'),
- type='exit')
- bee <- add.rule(
- strategy = bee,
- name='ruleSignal',
- arguments = list(sigcol="fast.lt.dn",
- sigval=TRUE,
- orderqty=-100,
- ordertype='market',
- orderside='short',
- osFUN='osMaxPos'),
- type='enter')
- bee <- add.rule(
- strategy = bee,
- name='ruleSignal',
- arguments = list(sigcol="fast.gt.up",
- sigval=TRUE,
- orderqty='all',
- ordertype='market',
- orderside='short'),
- type='exit')
Add Comment
Please, Sign In to add comment