rem run http://www.nstarsolutions.com/discounts

clipboard-set -
:logs_ATS_on
pause .1
rem if existwindow logs_ATS then goto logs_ATS_on2
if not existwindow session then goto logs_ATS_on
:logs_ATS_on2
pause .2
if existwindow session then activate session
if existwindow session then pause .2
rem if existwindow logs_ATS then goto logs_ATS_ok
send ^c
let {var-t} = clipboard
rem if {var-t} = - then goto logs_ATS_on2
if {var-t} <> ekomovhxre then goto logs_ATS_on2
send {tab}
pause .1
send passOvh77~
:logs_ATS_on3
pause 1
if not existwindow logs_ATS then goto logs_ATS_on3
rem goto logs_ATS_ok2
rem :logs_ATS_ok
rem activate logs_ATS
rem pause .3
rem :logs_ATS_ok2
pause 1.5
mouse move 1300, 600
pause .2
mouse rightclick
pause .2
send {down 5}~
pause 1
if existwindow confirm then send t
pause .5
:confirm
if existwindow confirm then activate confirm
if existwindow confirm then pause .2
if existwindow confirm then send t
if existwindow confirm then pause .5
if existwindow confirm then goto confirm

mouse move 1500, 100
pause .1
mouse leftclick
pause .1

-----------------------------------------------------------------

rem This simple macro launches a web site with pre-assigned parameters.  You could also assign a global hotkey so you could easily check on the stocks you monitor throughout the day with just a couple of quick keystrokes.

rem run http://quotes.nasdaq.com/Quote.dll?mode=stock&symbol=IBM&symbol=MSFT&symbol=ORCL&symbol=WMT&symbol=QQQQ&symbol=GE&symbol=KO&quick.x=43&quick.y=8

rem msg_okcancel {var-21}

if existwindow confirm then activate confirm
if existwindow confirm then pause .2
if existwindow confirm then send t
if existwindow confirm then pause .2
clipboard-set -
activate documents
pause .3
send {f5}
rem pause 1
rem send {f2}
rem send ^c{esc}
rem let {var-t} = clipboard
rem if {var-t} = - then msg_okcancel Explorer / documents bloqué !
send ^a{home}+{down 3}
pause .3
mouse move 700, 385
pause .1
mouse rightclick
pause .2
send {down 8}~
pause .1
if existwindow logs_ATS then goto logs_ATS_ok
run C:\WINDOWS\EXPLORER.EXE, ftp://ftp.cluster017.ovh.net/www/logs_ATS/
clipboard-set -
:logs_ATS_on
pause 1
if existwindow logs_ATS then goto logs_ATS_on2
if not existwindow session then goto logs_ATS_on
:logs_ATS_on2
pause .2
if existwindow session then activate session
if existwindow session then pause .2
if existwindow logs_ATS then goto logs_ATS_ok
send ^c
let {var-t} = clipboard
rem if {var-t} = - then goto logs_ATS_on2
if {var-t} <> ekomovhxre then goto logs_ATS_on2
send {tab}passOvh77~
:logs_ATS_on3
pause 1
if not existwindow logs_ATS then goto logs_ATS_on3
goto logs_ATS_ok2
:logs_ATS_ok
activate logs_ATS
pause .1
:logs_ATS_ok2
pause .2
mouse move 1300, 600
pause .2
mouse rightclick
pause .2
send {down 5}~
pause 1
if existwindow confirm then send t
pause .5
:confirm
if existwindow confirm then activate confirm
if existwindow confirm then pause .2
if existwindow confirm then send t
if existwindow confirm then pause .5
if existwindow confirm then goto confirm

mouse move 1500, 100
pause .1
mouse leftclick
pause .1


-----------------------------------------------------------------

rem msg-okcancel Macro Mania will be made invisible.  It will not show up on the task bar, when you Alt-Tab through windows, or in the list of Applications under the Windows Task Manager.  Macros can still run either through a scheduled macro or a global hotkey.  In fact, a global hotkey "WinKey-V" has been assigned to make Macro Mania visible again.  (Comment out this msg command in the macro to eliminate this reminder.){enter 2}You can (and most often should) set up a global hotkey to make it visible again; otherwise you would not be able to edit macros or otherwise "get to" Macro Mania.  The only time you might not do this is if you are deploying Macro Mania to other users, you have set up global hotkeys or scheduled macros, and you do not want them seeing Macro Mania.  Another use for the invisible feature is to keep it out of the way until you want it shown again.{enter 3}===REMEMBER==={enter}"Winkey-V" will make Macro Mania visible again.
rem Macro Mania = INVISIBLE

let {var-0} = 0
let {var-1} = 1
let {var-2} = 2
let {var-3} = 3
let {var-5} = 5
let {var-91} = 0
macro 24
if {var-n} > 1 then goto veille
let {var-u} = (
let {var-u} = merge {var-u} + {var-d}
let {var-w} = )
let {var-u} = merge {var-u} + {var-w}
if {var-u} = () then goto var-d_ok
let {var-u} = Problème de lecture de variables !! (1)
let {var-w} = { [}
let {var-u} = merge {var-u} + {var-w}
let {var-u} = merge {var-u} + {var-d}
let {var-w} = ]
let {var-u} = merge {var-u} + {var-w}
msg_okcancel {var-u}
:var-d_ok
let {var-u} = (
let {var-u} = merge {var-u} + {var-t}
let {var-w} = )
let {var-u} = merge {var-u} + {var-w}
if {var-u} = () then goto var-t_ok
let {var-u} = Problème de lecture de variables !! (2)
let {var-w} = { [}
let {var-u} = merge {var-u} + {var-w}
let {var-u} = merge {var-u} + {var-t}
let {var-w} = ]
let {var-u} = merge {var-u} + {var-w}
msg_okcancel {var-u}
:var-t_ok
let {var-91} = 1
macro 24

:veille
rem goto trade_ok_
if existwindow Internal Server then activate Internal Server else goto server_ok
pause .3
send {f5}
pause 1
:server_ok
if existwindow nouveaux trades then goto debut
if existwindow copy then pause 2
if existwindow session then macro 21
pause 2
let {var-n} = {var-m}
let {var-t} = now
let {var-t} = right {var-t} 8
let {var-m} = mid {var-t} 4 2
if {var-n} = {var-m} then goto veille
if existwindow Heure_en_cours then activate Heure_en_cours else run C:\Users\Administrateur.WIN-UT3H45995UJ\Documents\Heure_en_cours.txt
:heure_go
if existwindow Heure_en_cours then pause .2 else pause 1
if not existwindow Heure_en_cours then goto heure_go
send ^a{f5}^s
pause .2
send %fq
pause .2
macro 22
goto veille

:debut
let {var-21} = 0
let {var-22} = 0
let {var-23} = 0
let {var-24} = 0
if existwindow nouveaux trades then activate nouveaux trades else goto veille
if existwindow nouveaux trades then pause .2 else goto veille
send ^a^c
pause .1
let {var-t} = clipboard
let {var-d} = {var-t}
let {var-k} = len {var-d}
if {var-k} < 2 then goto veille
let {var-n} = 1
let {var-q} = 0
let {var-u} = *
:check
let {var-t} = mid {var-d} {var-n} 1
if {var-t} = {var-u} then goto check_ok
let {var-n} = math {var-n} + {var-1}
if {var-n} < {var-k} then goto check
:check_ok
let {var-n} = math {var-n} + {var-5}
let {var-t} = mid {var-d} {var-n} 200
rem msg_ok {var-t}

let {var-d} = {var-t}
:check_suite
let {var-l} = len {var-d}
if {var-l} < 2 then goto check_fin
let {var-u} = *
let {var-n} = 1
:check-2
let {var-t} = mid {var-d} {var-n} 1
if {var-t} = {var-u} then goto check-2_ok
let {var-n} = math {var-n} + {var-1}
if {var-n} < {var-l} then goto check-2
:check-2_ok
let {var-n} = math {var-n} - {var-1}
let {var-t} = left {var-d} {var-n}
rem msg_ok {var-t}
let {var-n} = math {var-n} + {var-3}
let {var-d} = mid {var-d} {var-n} 200

let {var-17} = {var-21}
let {var-18} = {var-22}
let {var-19} = {var-23}
let {var-20} = {var-24}
let {var-q} = 0
let {var-e} = {var-t}
:check_suite2
let {var-l} = len {var-e}
let {var-u} = /
let {var-n} = 1
:check-3
let {var-t} = mid {var-e} {var-n} 1
if {var-t} = {var-u} then goto check-3_ok
let {var-n} = math {var-n} + {var-1}
if {var-n} =< {var-l} then goto check-3
:check-3_ok
let {var-n} = math {var-n} - {var-1}
let {var-t} = left {var-e} {var-n}
rem msg_ok {var-t}
let {var-n} = math {var-n} + {var-2}
let {var-e} = mid {var-e} {var-n} 23
if {var-q} = {var-0} then let {var-21} = {var-t}
if {var-q} = {var-1} then let {var-22} = {var-t}
if {var-q} = {var-2} then let {var-23} = {var-t}
if {var-q} = {var-3} then let {var-24} = {var-t}
let {var-q} = math {var-q} + {var-1}
if {var-q} =< {var-3} then goto check_suite2

rem :trade_ok_
rem let {var-21} = EURUSD
rem let {var-22} = Buy
if {var-17} <> {var-21} then goto trade_ok
if {var-18} <> {var-22} then goto trade_ok
if {var-19} <> {var-23} then goto trade_ok
if {var-20} <> {var-24} then goto trade_ok
goto check_suite
:trade_ok
rem msg_ok {var-21}
rem msg_ok {var-22}
rem msg_ok {var-23}
rem msg_ok {var-24}
rem msg_ok {var-30}
rem goto check_suite
let {var-l} = len {var-21}
if {var-l} > 6 then let {var-21} = right {var-21} 6
if {var-21} = BTCUSD then goto check_suite

activate blackbullmarkets
pause .2
rem goto go_trade_

if {var-21} = EURUSD then goto EURUSD_
if {var-21} = USDJPY then goto USDJPY_
if {var-21} = USDCHF then goto USDCHF_
if {var-21} = GBPUSD then goto GBPUSD_
if {var-21} = AUDNZD then goto AUDNZD_
if {var-21} = XAUUSD then goto XAUUSD_
goto erreur_

:EURUSD_
if {var-24} = H4 then let {var-29} = {var-31}
if {var-24} = H1 then let {var-29} = {var-32}
if {var-24} = M30 then let {var-29} = {var-33}
if {var-24} = M15 then let {var-29} = {var-34}
if {var-24} = M5 then let {var-29} = {var-35}
if {var-24} = H4 then let {var-28} = {var-61}
if {var-24} = H1 then let {var-28} = {var-62}
if {var-24} = M30 then let {var-28} = {var-63}
if {var-24} = M15 then let {var-28} = {var-64}
if {var-24} = M5 then let {var-28} = {var-65}
goto close_trade
:USDJPY_
if {var-24} = H4 then let {var-29} = {var-36}
if {var-24} = H1 then let {var-29} = {var-37}
if {var-24} = M30 then let {var-29} = {var-38}
if {var-24} = M15 then let {var-29} = {var-39}
if {var-24} = M5 then let {var-29} = {var-40}
if {var-24} = H4 then let {var-28} = {var-66}
if {var-24} = H1 then let {var-28} = {var-67}
if {var-24} = M30 then let {var-28} = {var-68}
if {var-24} = M15 then let {var-28} = {var-69}
if {var-24} = M5 then let {var-28} = {var-70}
goto close_trade
:USDCHF_
if {var-24} = H4 then let {var-29} = {var-41}
if {var-24} = H1 then let {var-29} = {var-42}
if {var-24} = M30 then let {var-29} = {var-43}
if {var-24} = M15 then let {var-29} = {var-44}
if {var-24} = M5 then let {var-29} = {var-45}
if {var-24} = H4 then let {var-28} = {var-71}
if {var-24} = H1 then let {var-28} = {var-72}
if {var-24} = M30 then let {var-28} = {var-73}
if {var-24} = M15 then let {var-28} = {var-74}
if {var-24} = M5 then let {var-28} = {var-75}
goto close_trade
:GBPUSD_
if {var-24} = H4 then let {var-29} = {var-46}
if {var-24} = H1 then let {var-29} = {var-47}
if {var-24} = M30 then let {var-29} = {var-48}
if {var-24} = M15 then let {var-29} = {var-49}
if {var-24} = M5 then let {var-29} = {var-50}
if {var-24} = H4 then let {var-28} = {var-76}
if {var-24} = H1 then let {var-28} = {var-77}
if {var-24} = M30 then let {var-28} = {var-78}
if {var-24} = M15 then let {var-28} = {var-79}
if {var-24} = M5 then let {var-28} = {var-80}
goto close_trade
:AUDNZD_
if {var-24} = H4 then let {var-29} = {var-51}
if {var-24} = H1 then let {var-29} = {var-52}
if {var-24} = M30 then let {var-29} = {var-53}
if {var-24} = M15 then let {var-29} = {var-54}
if {var-24} = M5 then let {var-29} = {var-55}
if {var-24} = H4 then let {var-28} = {var-81}
if {var-24} = H1 then let {var-28} = {var-82}
if {var-24} = M30 then let {var-28} = {var-83}
if {var-24} = M15 then let {var-28} = {var-84}
if {var-24} = M5 then let {var-28} = {var-85}
goto close_trade
:XAUUSD_
if {var-24} = H4 then let {var-29} = {var-56}
if {var-24} = H1 then let {var-29} = {var-57}
if {var-24} = M30 then let {var-29} = {var-58}
if {var-24} = M15 then let {var-29} = {var-59}
if {var-24} = M5 then let {var-29} = {var-60}
if {var-24} = H4 then let {var-28} = {var-86}
if {var-24} = H1 then let {var-28} = {var-87}
if {var-24} = M30 then let {var-28} = {var-88}
if {var-24} = M15 then let {var-28} = {var-89}
if {var-24} = M5 then let {var-28} = {var-90}
goto close_trade

:erreur_
let {var-u} = Erreur (0) !  (
let {var-u} = merge {var-u} + {var-21}
let {var-w} = { / }
let {var-u} = merge {var-u} + {var-w}
let {var-u} = merge {var-u} + {var-24}
let {var-w} = {)}
let {var-u} = merge {var-u} + {var-w}
msg_okcancel {var-u}
goto veille

rem ici je ferme l'ancienne position
:close_trade
if {var-29} = 0 then goto go_trade_
if not {var-29} > 0 then msg_okcancel Problème avec {var-29} = {} !
if {var-22} = Buy then goto var-22_Buy
if {var-28} = 1 then goto check_suite
if {var-28} = 2 then goto close_trade_b
let {var-u} = Problème avec {var-28} <> 2 !  (
goto var-28_msg
:var-22_Buy
if {var-28} = 2 then goto check_suite
if {var-28} = 1 then goto close_trade_b
let {var-u} = Problème avec {var-28} <> 1 !  (
:var-28_msg
let {var-u} = merge {var-u} + {var-21}
let {var-w} = { / v22 = }
let {var-u} = merge {var-u} + {var-w}
let {var-u} = merge {var-u} + {var-22}
let {var-w} = { / v28 = }
let {var-u} = merge {var-u} + {var-w}
let {var-u} = merge {var-u} + {var-28}
let {var-w} = {)}
let {var-u} = merge {var-u} + {var-w}
msg_okcancel {var-u}
goto check_suite
:close_trade_b
let {var-91} = 2
macro 24
let {var-x} = now
let {var-x} = remove {var-x} 6
let {var-u} = { }
let {var-w} = _
let {var-x} = replace {var-u} with {var-w} in {var-x}
let {var-u} = /
let {var-w} = -
let {var-x} = replace {var-u} with {var-w} in {var-x}
let {var-f} = C:\Users\Administrateur.WIN-UT3H45995UJ\Documents\log_
let {var-f} = merge {var-f} + {var-x}
let {var-x} = h.txt
let {var-f} = merge {var-f} + {var-x}
let {var-w} = now
let {var-x} = { - }
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-21}
let {var-w} = merge {var-w} + {var-x}
if {var-28} = 1 then let {var-y} = Sell
if {var-28} = 1 then goto var-28_buy_ok
if {var-28} = 2 then let {var-y} = Buy else msg_okcancel Problème {var-28}  Sell /  Buy !
:var-28_buy_ok
let {var-w} = merge {var-w} + {var-y}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-23}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-24}
let {var-w} = merge {var-w} + {var-x}
let {var-y} =  closed
let {var-w} = merge {var-w} + {var-y}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-28}
let {var-w} = merge {var-w} + {var-x}
writefile {var-f} {var-w}
pause .1

let {var-30} = math {var-30} - {var-1}
goto go_trade_

rem la partie d'ici à go_trade_ ne sert à rien
if {var-21} = EURUSD then goto EURUSD_2
if {var-21} = USDJPY then goto USDJPY_2
if {var-21} = USDCHF then goto USDCHF_2
if {var-21} = GBPUSD then goto GBPUSD_2
if {var-21} = AUDNZD then goto AUDNZD_2
if {var-21} = XAUUSD then goto XAUUSD_2

:EURUSD_2
if {var-24} = H4 then let {var-31} = math {var-31} - {var-1}
if {var-24} = H1 then let {var-32} = math {var-32} - {var-1}
if {var-24} = M30 then let {var-33} = math {var-33} - {var-1}
if {var-24} = M15 then let {var-34} = math {var-34} - {var-1}
if {var-24} = M5 then let {var-35} = math {var-35} - {var-1}
goto go_trade_
:USDJPY_2
if {var-24} = H4 then let {var-36} = math {var-36} - {var-1}
if {var-24} = H1 then let {var-37} = math {var-37} - {var-1}
if {var-24} = M30 then let {var-38} = math {var-38} - {var-1}
if {var-24} = M15 then let {var-39} = math {var-39} - {var-1}
if {var-24} = M5 then let {var-40} = math {var-40} - {var-1}
goto go_trade_
:USDCHF_2
if {var-24} = H4 then let {var-41} = math {var-41 - {var-1}
if {var-24} = H1 then let {var-42} = math {var-42 - {var-1}
if {var-24} = M30 then let {var-43} = math {var-43} - {var-1}
if {var-24} = M15 then let {var-44} = math {var-44} - {var-1}
if {var-24} = M5 then let {var-45} = math {var-45} - {var-1}
goto go_trade_
:GBPUSD_2
if {var-24} = H4 then let {var-46} = math {var-46} - {var-1}
if {var-24} = H1 then let {var-47} = math {var-47} - {var-1}
if {var-24} = M30 then let {var-48} = math {var-48} - {var-1}
if {var-24} = M15 then let {var-49} = math {var-49} - {var-1}
if {var-24} = M5 then let {var-50} = math {var-50} - {var-1}
goto go_trade_
:AUDNZD_2
if {var-24} = H4 then let {var-51} = math {var-51} - {var-1}
if {var-24} = H1 then let {var-52} = math {var-52} - {var-1}
if {var-24} = M30 then let {var-53} = math {var-53} - {var-1}
if {var-24} = M15 then let {var-54} = math {var-54} - {var-1}
if {var-24} = M5 then let {var-55} = math {var-55} - {var-1}
goto go_trade_
:XAUUSD_2
if {var-24} = H4 then let {var-56} = math {var-56} - {var-1}
if {var-24} = H1 then let {var-57} = math {var-57} - {var-1}
if {var-24} = M30 then let {var-58} = math {var-58} - {var-1}
if {var-24} = M15 then let {var-59} = math {var-59} - {var-1}
if {var-24} = M5 then let {var-60} = math {var-60} - {var-1}

:go_trade_
if {var-21} = EURUSD then goto EURUSD
if {var-21} = USDJPY then goto USDJPY
if {var-21} = USDCHF then goto USDCHF
if {var-21} = GBPUSD then goto GBPUSD
if {var-21} = AUDNZD then goto AUDNZD
if {var-21} = XAUUSD then goto XAUUSD
goto erreur

:EURUSD
if {var-24} = H4 then let {var-31} = {var-30}
if {var-24} = H1 then let {var-32} = {var-30}
if {var-24} = M30 then let {var-33} = {var-30}
if {var-24} = M15 then let {var-34} = {var-30}
if {var-24} = M5 then let {var-35} = {var-30}
if {var-22} = Buy then goto EURUSD_B else goto EURUSD_S
goto erreur
:USDJPY
if {var-24} = H4 then let {var-36} = {var-30}
if {var-24} = H1 then let {var-37} = {var-30}
if {var-24} = M30 then let {var-38} = {var-30}
if {var-24} = M15 then let {var-39} = {var-30}
if {var-24} = M5 then let {var-40} = {var-30}
if {var-22} = Buy then goto USDJPY_B else goto USDJPY_S
goto erreur
:USDCHF
if {var-24} = H4 then let {var-41} = {var-30}
if {var-24} = H1 then let {var-42} = {var-30}
if {var-24} = M30 then let {var-43} = {var-30}
if {var-24} = M15 then let {var-44} = {var-30}
if {var-24} = M5 then let {var-45} = {var-30}
if {var-22} = Buy then goto USDCHF_B else goto USDCHF_S
goto erreur
:GBPUSD
if {var-24} = H4 then let {var-46} = {var-30}
if {var-24} = H1 then let {var-47} = {var-30}
if {var-24} = M30 then let {var-48} = {var-30}
if {var-24} = M15 then let {var-49} = {var-30}
if {var-24} = M5 then let {var-50} = {var-30}
if {var-22} = Buy then goto GBPUSD_B else goto GBPUSD_S
goto erreur
:AUDNZD
if {var-24} = H4 then let {var-51} = {var-30}
if {var-24} = H1 then let {var-52} = {var-30}
if {var-24} = M30 then let {var-53} = {var-30}
if {var-24} = M15 then let {var-54} = {var-30}
if {var-24} = M5 then let {var-55} = {var-30}
if {var-22} = Buy then goto AUDNZD_B else goto AUDNZD_S
goto erreur
:XAUUSD
if {var-24} = H4 then let {var-56} = {var-30}
if {var-24} = H1 then let {var-57} = {var-30}
if {var-24} = M30 then let {var-58} = {var-30}
if {var-24} = M15 then let {var-59} = {var-30}
if {var-24} = M5 then let {var-60} = {var-30}
if {var-22} = Buy then goto XAUUSD_B else goto XAUUSD_S

:erreur
msg_okcancel Erreur (1) !
goto veille

rem Sell EURUSD
:EURUSD_S
if {var-24} = H4 then let {var-61} = 1
if {var-24} = H1 then let {var-62} = 1
if {var-24} = M30 then let {var-63} = 1
if {var-24} = M15 then let {var-64} = 1
if {var-24} = M5 then let {var-65} = 1
mouse move 247, 178
goto go_trade
rem Buy EURUSD
:EURUSD_B
if {var-24} = H4 then let {var-61} = 2
if {var-24} = H1 then let {var-62} = 2
if {var-24} = M30 then let {var-63} = 2
if {var-24} = M15 then let {var-64} = 2
if {var-24} = M5 then let {var-65} = 2
mouse move 392, 178
goto go_trade
rem Sell USDJPY
:USDJPY_S
if {var-24} = H4 then let {var-66} = 1
if {var-24} = H1 then let {var-67} = 1
if {var-24} = M30 then let {var-68} = 1
if {var-24} = M15 then let {var-69} = 1
if {var-24} = M5 then let {var-70} = 1
mouse move 247, 367
goto go_trade
rem Buy USDJPY
:USDJPY_B
if {var-24} = H4 then let {var-66} = 2
if {var-24} = H1 then let {var-67} = 2
if {var-24} = M30 then let {var-68} = 2
if {var-24} = M15 then let {var-69} = 2
if {var-24} = M5 then let {var-70} = 2
mouse move 392, 367
goto go_trade
rem Sell USDCHF
:USDCHF_S
if {var-24} = H4 then let {var-71} = 1
if {var-24} = H1 then let {var-72} = 1
if {var-24} = M30 then let {var-73} = 1
if {var-24} = M15 then let {var-74} = 1
if {var-24} = M5 then let {var-75} = 1
mouse move 693, 178
goto go_trade
rem Buy USDCHF
:USDCHF_B
if {var-24} = H4 then let {var-71} = 2
if {var-24} = H1 then let {var-72} = 2
if {var-24} = M30 then let {var-73} = 2
if {var-24} = M15 then let {var-74} = 2
if {var-24} = M5 then let {var-75} = 2
mouse move 840, 178
goto go_trade
rem Sell GBPUSD
:GBPUSD_S
if {var-24} = H4 then let {var-76} = 1
if {var-24} = H1 then let {var-77} = 1
if {var-24} = M30 then let {var-78} = 1
if {var-24} = M15 then let {var-79} = 1
if {var-24} = M5 then let {var-80} = 1
mouse move 693, 367
goto go_trade
rem Buy GBPUSD
:GBPUSD_B
if {var-24} = H4 then let {var-76} = 2
if {var-24} = H1 then let {var-77} = 2
if {var-24} = M30 then let {var-78} = 2
if {var-24} = M15 then let {var-79} = 2
if {var-24} = M5 then let {var-80} = 2
mouse move 840, 367
goto go_trade
rem Sell AUDNZD
:AUDNZD_S
if {var-24} = H4 then let {var-81} = 1
if {var-24} = H1 then let {var-88} = 1
if {var-24} = M30 then let {var-83} = 1
if {var-24} = M15 then let {var-84} = 1
if {var-24} = M5 then let {var-85} = 1
mouse move 1141, 178
goto go_trade
rem Buy AUDNZD
:AUDNZD_B
if {var-24} = H4 then let {var-81} = 2
if {var-24} = H1 then let {var-88} = 2
if {var-24} = M30 then let {var-83} = 2
if {var-24} = M15 then let {var-84} = 2
if {var-24} = M5 then let {var-85} = 2
mouse move 1286, 178
goto go_trade
rem Sell XAUUSD
:XAUUSD_S
if {var-24} = H4 then let {var-86} = 1
if {var-24} = H1 then let {var-87} = 1
if {var-24} = M30 then let {var-88} = 1
if {var-24} = M15 then let {var-89} = 1
if {var-24} = M5 then let {var-90} = 1
mouse move 1141, 367
goto go_trade
rem Buy XAUUSD
:XAUUSD_B
if {var-24} = H4 then let {var-86} = 2
if {var-24} = H1 then let {var-87} = 2
if {var-24} = M30 then let {var-88} = 2
if {var-24} = M15 then let {var-89} = 2
if {var-24} = M5 then let {var-90} = 2
mouse move 1286, 367
rem goto go_trade

rem Sell BTCUSD
rem mouse move 1138, 556
rem Buy BTCUSD
rem mouse move 1288, 556

:go_trade
pause .1
mouse leftclick
pause .2

let {var-30} = math {var-30} + {var-1}
rem goto record

rem ici faire le contrôle après trade de ce qui est passé !
let {var-91} = 3
let {var-29} = {var-30}
:macro_24-3
macro 24

rem barre de graphique
rem mouse move 395, 132
rem Nouvel ordre
rem mouse move 308, 70
rem barre de Nouvel ordre
rem mouse move 740, 225

:cours_stop_
rem flèche vers le haut
mouse move 915, 310
pause .1
mouse leftclick
pause .2

let {var-q} = 0
clipboard-set -
:cours_stop
rem position cours du stop
mouse move 884, 314
pause .1
mouse rightclick
pause .2
send {down 2}~
pause .1
let {var-t} = clipboard
if {var-t} <> - then goto cours_stop_ok
mouse leftclick
pause .2
mouse leftclick
pause .1
let {var-q} = math {var-q} + {var-1}
if {var-q} = {var-3} then goto macro_24-3
goto cours_stop
:cours_stop_ok
if not {var-t} > 0 then goto cours_stop_
send {esc}{esc}
pause .1

rem ici vérifier le cours du stop / cours du trade en cours (< 0,2 %)
let {var-u} = .
let {var-v} = ,
let {var-t} = replace {var-u} with {var-v} in {var-t}
let {var-23} = replace {var-u} with {var-v} in {var-23}
let {var-v} = {var-t}
let {var-t} = math {var-t} - {var-23}
if {var-t} < 0 then let {var-t} = math {var-0} - {var-t}
let {var-t} = math {var-t} / {var-23}
let {var-u} = 1000
let {var-t} = math {var-t} * {var-u}
let {var-t} = format {var-t} Fixed
let {var-u} = Problème de cours d'exécution !!  (
let {var-u} = merge {var-u} + {var-23}
let {var-w} = { / }
let {var-u} = merge {var-u} + {var-w}
let {var-u} = merge {var-u} + {var-v}
let {var-u} = merge {var-u} + {var-w}
let {var-u} = merge {var-u} + {var-t}
let {var-w} = { / v29= }
let {var-u} = merge {var-u} + {var-w}
let {var-u} = merge {var-u} + {var-29}
let {var-w} = { / v30= }
let {var-u} = merge {var-u} + {var-w}
let {var-u} = merge {var-u} + {var-30}
let {var-w} = {)}
let {var-u} = merge {var-u} + {var-w}
if {var-t} > 2 then msg_okcancel {var-u}
rem if {var-21} = XAUUSD then msg_okcancel {var-23}
rem if {var-21} = XAUUSD then msg_okcancel {var-v}
rem if {var-21} = XAUUSD then msg_okcancel {var-t}

:record
let {var-x} = now
let {var-x} = remove {var-x} 6
let {var-u} = { }
let {var-w} = _
let {var-x} = replace {var-u} with {var-w} in {var-x}
let {var-u} = /
let {var-w} = -
let {var-x} = replace {var-u} with {var-w} in {var-x}
let {var-f} = C:\Users\Administrateur.WIN-UT3H45995UJ\Documents\log_
let {var-f} = merge {var-f} + {var-x}
let {var-x} = h.txt
let {var-f} = merge {var-f} + {var-x}
let {var-w} = now
let {var-x} = { - }
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-21}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-22}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-23}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-v}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-24}
let {var-w} = merge {var-w} + {var-x}
rem msg_okcancel {var-f}
rem msg_okcancel {var-w}
writefile {var-f} {var-w}
pause .1
rem macro 22

let {var-f} = C:\Users\Administrateur.WIN-UT3H45995UJ\Documents\vars_macro_23.txt
let {var-g} = C:\Users\Administrateur.WIN-UT3H45995UJ\Documents\vars_macro_23_bck.txt
if existfile {var-f} then copy /silent /y {var-f} to {var-g}
pause .1
rem macro 22
let {var-91} = 4
macro 24
macro 22
rem msg_okcancel Vérifier les variables courantes / back !
goto check_suite

:check_fin
goto veille



-----------------------------------------------------------------

rem This command is used with a global hotkey so that we can make Macro Mania visible again (otherwise there would be no way to do so).  The button itself has been made an "Invisible Button", as it has no purpose to be seen anyway.
rem Macro Mania = VISIBLE

rem let {var-91} = 0
if {var-91} > 0 then goto var-91_1
let {var-f} = C:\Users\Administrateur.WIN-UT3H45995UJ\Documents\vars_macro_23.txt
if existfile {var-f} then let {var-t} = file {var-f} else exit
rem msg_okcancel {var-f}
let {var-q} = 0
let {var-d} = {var-f}
let {var-l} = len {var-d}
let {var-u} = -
let {var-n} = 1
:check
let {var-t} = mid {var-d} {var-n} 1
if {var-t} = {var-u} then goto check_ok
let {var-n} = math {var-n} + {var-1}
if {var-n} =< {var-l} then goto check
:check_ok
let {var-n} = math {var-n} - {var-1}
let {var-t} = left {var-d} {var-n}
rem msg_okcancel {var-t}
let {var-l} = math {var-l} - {var-n}
let {var-n} = math {var-n} + {var-2}
let {var-d} = mid {var-d} {var-n} {var-l}
if {var-l} = 0 then exit
rem if {var-t} = {} then exit
if {var-t} => 0 then goto var-t_ok
let {var-u} = Problème de lecture de variable !!  (
let {var-u} = merge {var-u} + {var-q}
let {var-w} = { / }
let {var-u} = merge {var-u} + {var-w}
let {var-u} = merge {var-u} + {var-t}
let {var-w} = {)}
let {var-u} = merge {var-u} + {var-w}
msg_okcancel {var-u}
:var-t_ok
if {var-q} = 0 then let {var-30} = {var-t}
if {var-q} = 1 then let {var-31} = {var-t}
if {var-q} = 2 then let {var-32} = {var-t}
if {var-q} = 3 then let {var-33} = {var-t}
if {var-q} = 4 then let {var-34} = {var-t}
if {var-q} = 5 then let {var-35} = {var-t}
if {var-q} = 6 then let {var-36} = {var-t}
if {var-q} = 7 then let {var-37} = {var-t}
if {var-q} = 8 then let {var-38} = {var-t}
if {var-q} = 9 then let {var-39} = {var-t}
if {var-q} = 10 then let {var-40} = {var-t}
if {var-q} = 11 then let {var-41} = {var-t}
if {var-q} = 12 then let {var-42} = {var-t}
if {var-q} = 13 then let {var-43} = {var-t}
if {var-q} = 14 then let {var-44} = {var-t}
if {var-q} = 15 then let {var-45} = {var-t}
if {var-q} = 16 then let {var-46} = {var-t}
if {var-q} = 17 then let {var-47} = {var-t}
if {var-q} = 18 then let {var-48} = {var-t}
if {var-q} = 19 then let {var-49} = {var-t}
if {var-q} = 20 then let {var-50} = {var-t}
if {var-q} = 21 then let {var-51} = {var-t}
if {var-q} = 22 then let {var-52} = {var-t}
if {var-q} = 23 then let {var-53} = {var-t}
if {var-q} = 24 then let {var-54} = {var-t}
if {var-q} = 25 then let {var-55} = {var-t}
if {var-q} = 26 then let {var-56} = {var-t}
if {var-q} = 27 then let {var-57} = {var-t}
if {var-q} = 28 then let {var-58} = {var-t}
if {var-q} = 29 then let {var-59} = {var-t}
if {var-q} = 30 then let {var-60} = {var-t}
if {var-q} = 31 then let {var-61} = {var-t}
if {var-q} = 32 then let {var-62} = {var-t}
if {var-q} = 33 then let {var-63} = {var-t}
if {var-q} = 34 then let {var-64} = {var-t}
if {var-q} = 35 then let {var-65} = {var-t}
if {var-q} = 36 then let {var-66} = {var-t}
if {var-q} = 37 then let {var-67} = {var-t}
if {var-q} = 38 then let {var-68} = {var-t}
if {var-q} = 39 then let {var-69} = {var-t}
if {var-q} = 40 then let {var-70} = {var-t}
if {var-q} = 41 then let {var-71} = {var-t}
if {var-q} = 42 then let {var-72} = {var-t}
if {var-q} = 43 then let {var-73} = {var-t}
if {var-q} = 44 then let {var-74} = {var-t}
if {var-q} = 45 then let {var-75} = {var-t}
if {var-q} = 46 then let {var-76} = {var-t}
if {var-q} = 47 then let {var-77} = {var-t}
if {var-q} = 48 then let {var-78} = {var-t}
if {var-q} = 49 then let {var-79} = {var-t}
if {var-q} = 50 then let {var-80} = {var-t}
if {var-q} = 51 then let {var-81} = {var-t}
if {var-q} = 52 then let {var-82} = {var-t}
if {var-q} = 53 then let {var-83} = {var-t}
if {var-q} = 54 then let {var-84} = {var-t}
if {var-q} = 55 then let {var-85} = {var-t}
if {var-q} = 56 then let {var-86} = {var-t}
if {var-q} = 57 then let {var-87} = {var-t}
if {var-q} = 58 then let {var-88} = {var-t}
if {var-q} = 59 then let {var-89} = {var-t}
if {var-q} = 60 then let {var-90} = {var-t}
let {var-q} = math {var-q} + {var-1}
let {var-n} = 1
rem msg_ok {var-t}
if {var-q} < 61 then goto check
let {var-n} = 2
rem macro 20
exit

:var-91_1
if {var-91} > 1 then goto var-91_2
let {var-30} = 0
let {var-31} = 0
let {var-32} = 0
let {var-33} = 0
let {var-34} = 0
let {var-35} = 0
let {var-36} = 0
let {var-37} = 0
let {var-38} = 0
let {var-39} = 0
let {var-40} = 0
let {var-41} = 0
let {var-42} = 0
let {var-43} = 0
let {var-44} = 0
let {var-45} = 0
let {var-46} = 0
let {var-47} = 0
let {var-48} = 0
let {var-49} = 0
let {var-50} = 0
let {var-51} = 0
let {var-52} = 0
let {var-53} = 0
let {var-54} = 0
let {var-55} = 0
let {var-56} = 0
let {var-57} = 0
let {var-58} = 0
let {var-59} = 0
let {var-60} = 0
let {var-61} = 0
let {var-62} = 0
let {var-63} = 0
let {var-64} = 0
let {var-65} = 0
let {var-66} = 0
let {var-67} = 0
let {var-68} = 0
let {var-69} = 0
let {var-70} = 0
let {var-71} = 0
let {var-72} = 0
let {var-73} = 0
let {var-74} = 0
let {var-75} = 0
let {var-76} = 0
let {var-77} = 0
let {var-78} = 0
let {var-79} = 0
let {var-80} = 0
let {var-81} = 0
let {var-88} = 0
let {var-83} = 0
let {var-84} = 0
let {var-85} = 0
let {var-86} = 0
let {var-87} = 0
let {var-88} = 0
let {var-89} = 0
let {var-90} = 0
exit

:var-91_2
if {var-91} > 2 then goto var-91_3
if {var-29} < 16 then goto var-29-16_ok_
mouse move 1537, 545
pause .1
mouse leftclick
pause .1
:var-29-16_ok_
let {var-u} = {Position var-29,  }
let {var-u} = merge {var-u} + {var-29}
let {var-w} = { / }
let {var-u} = merge {var-u} + {var-w}
let {var-u} = merge {var-u} + {var-21}
let {var-w} = { - }
let {var-u} = merge {var-u} + {var-w}
let {var-u} = merge {var-u} + {var-22}
let {var-u} = merge {var-u} + {var-w}
let {var-u} = merge {var-u} + {var-24}
let {var-w} = { / v28= }
let {var-u} = merge {var-u} + {var-w}
let {var-u} = merge {var-u} + {var-28}
if {var-29} > 15 then msg_okcancel {var-u}
rem else exit
if {var-29} = 1 then mouse move 1535, 555
if {var-29} = 2 then mouse move 1535, 575
if {var-29} = 3 then mouse move 1535, 595
if {var-29} = 4 then mouse move 1535, 615
if {var-29} = 5 then mouse move 1535, 635
if {var-29} = 6 then mouse move 1535, 655
if {var-29} = 7 then mouse move 1535, 675
if {var-29} = 8 then mouse move 1535, 695
if {var-29} = 9 then mouse move 1535, 715
if {var-29} = 10 then mouse move 1535, 735
if {var-29} = 11 then mouse move 1535, 755
if {var-29} = 12 then mouse move 1535, 775
if {var-29} = 13 then mouse move 1535, 795
if {var-29} = 14 then mouse move 1535, 815
if {var-29} = 15 then mouse move 1535, 835
if {var-29} < 16 then goto var-29-16_ok
mouse move 1537, 842
pause .1
mouse leftclick
pause .1
let {var-t} = 15
let {var-t} = math {var-30} - {var-t}
let {var-27} = math {var-29} - {var-t}
if {var-27} = 1 then mouse move 1518, 555
if {var-27} = 2 then mouse move 1518, 575
if {var-27} = 3 then mouse move 1518, 595
if {var-27} = 4 then mouse move 1518, 615
if {var-27} = 5 then mouse move 1518, 635
if {var-27} = 6 then mouse move 1518, 655
if {var-27} = 7 then mouse move 1518, 675
if {var-27} = 8 then mouse move 1518, 695
if {var-27} = 9 then mouse move 1518, 715
if {var-27} = 10 then mouse move 1518, 735
if {var-27} = 11 then mouse move 1518, 755
if {var-27} = 12 then mouse move 1518, 775
if {var-27} = 13 then mouse move 1518, 795
if {var-27} = 14 then mouse move 1518, 815
if {var-27} = 15 then mouse move 1518, 835
:var-29-16_ok
pause .1
mouse leftclick
pause .2
rem if {var-29} < 16 then 
goto var-29-16_ok2
mouse move 1537, 545
pause .1
mouse leftclick
pause .1
:var-29-16_ok2

if {var-31} > {var-29} then let {var-31} = math {var-31} - {var-1}
if {var-32} > {var-29} then let {var-32} = math {var-32} - {var-1}
if {var-33} > {var-29} then let {var-33} = math {var-33} - {var-1}
if {var-34} > {var-29} then let {var-34} = math {var-34} - {var-1}
if {var-35} > {var-29} then let {var-35} = math {var-35} - {var-1}
if {var-36} > {var-29} then let {var-36} = math {var-36} - {var-1}
if {var-37} > {var-29} then let {var-37} = math {var-37} - {var-1}
if {var-38} > {var-29} then let {var-38} = math {var-38} - {var-1}
if {var-39} > {var-29} then let {var-39} = math {var-39} - {var-1}
if {var-40} > {var-29} then let {var-40} = math {var-40} - {var-1}
if {var-41} > {var-29} then let {var-41} = math {var-41} - {var-1}
if {var-42} > {var-29} then let {var-42} = math {var-42} - {var-1}
if {var-43} > {var-29} then let {var-43} = math {var-43} - {var-1}
if {var-44} > {var-29} then let {var-44} = math {var-44} - {var-1}
if {var-45} > {var-29} then let {var-45} = math {var-45} - {var-1}
if {var-46} > {var-29} then let {var-46} = math {var-46} - {var-1}
if {var-47} > {var-29} then let {var-47} = math {var-47} - {var-1}
if {var-48} > {var-29} then let {var-48} = math {var-48} - {var-1}
if {var-49} > {var-29} then let {var-49} = math {var-49} - {var-1}
if {var-50} > {var-29} then let {var-50} = math {var-50} - {var-1}
if {var-51} > {var-29} then let {var-51} = math {var-51} - {var-1}
if {var-52} > {var-29} then let {var-52} = math {var-52} - {var-1}
if {var-53} > {var-29} then let {var-53} = math {var-53} - {var-1}
if {var-54} > {var-29} then let {var-54} = math {var-54} - {var-1}
if {var-55} > {var-29} then let {var-55} = math {var-55} - {var-1}
if {var-56} > {var-29} then let {var-56} = math {var-56} - {var-1}
if {var-57} > {var-29} then let {var-57} = math {var-57} - {var-1}
if {var-58} > {var-29} then let {var-58} = math {var-58} - {var-1}
if {var-59} > {var-29} then let {var-59} = math {var-59} - {var-1}
if {var-60} > {var-29} then let {var-60} = math {var-60} - {var-1}
exit

:var-91_3
if {var-91} > 3 then goto var-91_4
let {var-27} = {var-30}
let {var-p} = 0
:var-91_3b
if {var-27} < 16 then goto var-27-16_ok
mouse move 1537, 545
pause .1
mouse leftclick
pause .1
:var-27-16_ok
if {var-27} = 1 then mouse move 1435, 555
if {var-27} = 2 then mouse move 1435, 575
if {var-27} = 3 then mouse move 1435, 595
if {var-27} = 4 then mouse move 1435, 615
if {var-27} = 5 then mouse move 1435, 635
if {var-27} = 6 then mouse move 1435, 655
if {var-27} = 7 then mouse move 1435, 675
if {var-27} = 8 then mouse move 1435, 695
if {var-27} = 9 then mouse move 1435, 715
if {var-27} = 10 then mouse move 1435, 735
if {var-27} = 11 then mouse move 1435, 755
if {var-27} = 12 then mouse move 1435, 775
if {var-27} = 13 then mouse move 1435, 795
if {var-27} = 14 then mouse move 1435, 815
if {var-27} = 15 then mouse move 1435, 835
if {var-27} < 16 then goto var-29-16b_ok
mouse move 1537, 842
pause .1
mouse leftclick
pause .1
let {var-t} = 15
let {var-t} = math {var-30} - {var-t}
let {var-27} = math {var-27} - {var-t}
let {var-p} = 1
goto var-91_3b
:var-29-16b_ok
pause .1
mouse leftclick
pause .3
mouse leftclick
pause .2
rem if {var-p} = 0 then 
exit
mouse move 1537, 545
pause .1
mouse leftclick
pause .1
exit

:var-91_4
rem if {var-91} > 4 then goto var-91_5
let {var-f} = C:\Users\Administrateur.WIN-UT3H45995UJ\Documents\vars_macro_23.txt
if existfile {var-f} then delete /NoRecycle {var-f}
let {var-x} = -
let {var-w} = {var-30}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-31}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-32}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-33}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-34}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-35}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-36}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-37}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-38}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-39}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-40}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-41}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-42}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-43}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-44}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-45}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-46}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-47}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-48}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-49}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-50}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-51}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-52}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-53}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-54}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-55}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-56}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-57}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-58}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-59}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-60}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-61}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-62}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-63}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-64}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-65}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-66}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-67}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-68}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-69}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-70}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-71}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-72}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-73}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-74}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-75}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-76}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-77}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-78}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-79}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-80}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-81}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-88}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-83}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-84}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-85}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-86}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-87}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-88}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-89}
let {var-w} = merge {var-w} + {var-x}
let {var-w} = merge {var-w} + {var-90}
let {var-w} = merge {var-w} + {var-x}
writefile {var-f} {var-w}
pause .2



-----------------------------------------------------------------