created TargetData for non-character targets (environment, minions, sidekicks)
added helper to dieCode json parsing to catch non-uppercase strings
added scenario manager functions for getting current events
started scenario set-up step:targets and tokens
0 notes
Bitcoin (BTC) saw snap volatility on Sept. 13 as United States macroeconomic data showed inflation beating expectations.BTC/USD 1-hour chart. Source: TradingViewFuel, shelter boost August CPI beyond targetData from Cointelegraph Markets Pro and TradingView followed BTC price action as it threatened a fresh loss of the $26,000 mark. The Consumer Price Index (CPI) print for August came in at 3.7% year-on-year — 0.1% higher than forecast.“The index for gasoline was the largest contributor to the monthly all items increase, accounting for over half of the increase,” part of an official press release from the U.S. Bureau of Labor Statistics read.“Also contributing to the August monthly increase was continued advancement in the shelter index, which rose for the 40th consecutive month.”U.S. CPI 12-month percentage change chart. Source: U.S. Bureau of Labor StatisticsEarlier on the day, crypto market participants had warned that a “hot” CPI reading would pressure the market, as it would imply that inflation remained more stubborn than hoped. This, in turn, could have implications for how restrictive economic policy remains in the future.CPI in 1 hour. Tip: Don't open positions into news announcements and wait 30 mins after data is out to start trading.Previous: 3.2%
Est: 3.6%- 3.5% or lower: $BTC will likely hit the liquidity zone at $26800.
- 3.7% or higher: Asian pump likely to get retraced.— CrypNuevo (@CrypNuevo) September 13, 2023
“I think in next CPI we see +4% with the gasoline prices going up this fast,” popular trader CrypNuevo told subscribers on X (formerly Twitter) in part of a reaction.“Inflation is still a problem, and a big problem in this second half of the year.”CPI was already forecast to beat its July year-on-year figure, with August at 3.6% versus the previous 3.2%.Bitcoin bid liquidity sticks to $25,000 and belowPrior to the release, Keith Alan, co-founder of on-chain monitoring resource Material Indicators, was optimistic about the week’s BTC price momentum holding out.“The strength of BTC momentum has faded a bit since yesterday, but so far it’s still strong enough to hold on to most of what was reclaimed after the bounce,” part of an X post read.Alan reiterated that “lots of technical resistance” remained above the current spot price range, this coming in the form of multiple daily moving averages.With the Wall Street open still to come, volatility was in play, with BTC/USD lacking a clear trend at the time of writing.An accompanying snapshot of the BTC/USDT order book on the largest global exchange, Binance, showed only modest liquidity surrounding the spot price, with more bids parked at $25,000.BTC/USD order book data for Binance. Source: Material Indicators/XThis article does not contain investment advice or recommendations. Every investment and trading move involves risk, and readers should conduct their own research when making a decision.
Source
0 notes
B2B Data Provider
We'll Hand Pick Qualified Sales Leads for You & Your Sales Team.
Most data providers promise data quality or quantity. With Hir Infotech, you can have both. We provide access to more direct dials and email addresses than any other B2B data provider. Our database contains detailed information about your prospects, including web mentions, employment history, contact information, and direct access to their colleagues. Whether you use our One-Stop Data Service to maintain your B2B data hygiene or get in touch with more prospects, our B2B database is the resource you need.
The B2B data you need to target and reach more buyers.
Visit: https://hirinfotech.com/data-as-a-service/
0 notes
Collateral gains are the only signs of joy for short-term crypto traders on April 4 as Bitcoin and most major assets stay flat.
Bitcoin (BTC) traded in an uncertain territory on April 4 as the Wall Street open failed to unleash bullish continuation.BTC/USD 1-hour candle chart (Bitstamp). Source: TradingViewTrader gives $43,000 BTC near-term dip targetData from Cointelegraph Markets Pro and TradingView showed BTC/USD dipping above and below the $46,000 mark on April 4, continuing a low-volatility few days.The pair had managed to seal a second week near the 2022 yearly open, with analysts already hoping for a breakout to $50,000 or even beyond.At the time of writing, however, there was still no sign of such an outcome, while Bitcoin stuck to an increasingly narrow low-timeframe trading range."Bitcoin is not really clear to me; it could be because of a very slow weekend, which is disturbing a bit, [in] my view," popular trader Crypto Ed summarized in his latest YouTube update on the day.Highlighting a falling diagonal resistance trendline, Crypto Ed reasoned that a potential pullback could come as early as April 4, resulting in Bitcoin reversing to $44,800 or deeper to near $43,000 should that not hold.The diagonal, he added, was keeping $50,000 out of reach for the time being.Fellow trader and podcast host Scott Melker was tentatively hopeful, noting that Bitcoin was being rejected at the 200-day moving average."Rejected at the 200, meandering down to $45,500; we should be heading up," he said in a Twitter broadcast on April 4."Let's hope that whales do not decide to dump on us just because there is a conference."Melker was referring to the Bitcoin 2022 event in Miami from April 6-9, a major gathering of some of the Bitcoin world's best-known names.Dogecoin rebound follows Musk's $3 billion Twitter spendOn altcoins, the pack was led by Dogecoin (DOGE) on the day, which outpaced all the major cryptocurrencies, thanks to a classic publicity boost from Tesla CEO Elon Musk.Related: BTC starts 2022 all over again — 5 things to know in Bitcoin this weekAfter the billionaire revealed that he had bought a 9.3% stake in Twitter, making him the largest shareholder in the company, DOGE/USD was the clear beneficiary in crypto, climbing almost to its highest levels in two months.DOGE/USD 1-day candle chart (Binance). Source: TradingViewMusk's move was the result of a survey held on Twitter, itself, in which just over two million respondents told him that "free speech principles" were not being upheld by the firm.The consequences of this poll will be important. Please vote carefully.— Elon Musk (@elonmusk) March 25, 2022
Other Twitter activity in recent days, meanwhile, continued Musk's direct interaction with the Dogecoin community.As Cointelegraph reported, inflows to altcoins over the past week underscored the increased appetite for what on-chain analytics firm Glassnode called "riskier" altcoins.
Go to Source
0 notes
sim
Option Explicit
Option Base 1
Dim dicOrder As New Dictionary
Dim arrOrder() As String
Dim dicOpeNum As New Dictionary
Dim arrOpeNum() As Integer
Dim outputData() As Variant
Sub Main()
Dim startTime As Single: startTime = Timer
GetDefData
Matching
OutputResult
Debug.Print "Main : " & Format((Timer - startTime) * 1000, "0.000") & " ms"
End Sub
Sub GetDefData()
Dim tmpArr As Variant
Dim i As Integer, j As Integer
'' 優先度
tmpArr = ThisWorkbook.Names("def_優先度").RefersToRange
ReDim Preserve arrOrder(UBound(tmpArr), 3)
For i = 1 To UBound(tmpArr)
For j = 1 To 3
arrOrder(i, j) = tmpArr(i, j + 1)
Next j
dicOrder(tmpArr(i, 1)) = i
Next i
tmpArr = Empty
'dbg'
Dim itm As Variant
For Each itm In dicOrder
Debug.Print "dicOrder.key = " & itm & vbTab & " | ";
For i = 1 To 3
Debug.Print vbTab & arrOrder(dicOrder.Item(itm), i);
Next i
Debug.Print vbNullString
Next itm
'' 人数
tmpArr = ThisWorkbook.Names("def_人数").RefersToRange
ReDim Preserve arrOpeNum(UBound(tmpArr), 3)
For i = 1 To UBound(tmpArr)
For j = 1 To 3
arrOpeNum(i, j) = tmpArr(i, j + 1)
Next j
dicOpeNum(CStr(CDate(tmpArr(i, 1)))) = i
Next i
tmpArr = Empty
'dbg'
' dim itm as Variant
For Each itm In dicOpeNum
Debug.Print "dicOpeNum.key = " & itm & vbTab & " | ";
For i = 1 To 3
Debug.Print vbTab & arrOpeNum(dicOpeNum.Item(itm), i);
Next i
Debug.Print vbNullString
Next itm
End Sub
Sub Matching()
Dim targetData(6) As Variant
Dim outputRowData(11) As Variant
Dim arrQueue As Variant
With ThisWorkbook.Worksheets(1)
arrQueue = .Range(.Cells(START_ROW + 1, START_COL), .Cells(END_ROW, END_COL))
End With
Dim responsibleOpeNum As New Dictionary: responsibleOpeNum.RemoveAll
' initialize [0:00]
Dim procHour As String: procHour = CStr(CDate(TimeSerial(0, 0, 0)))
responsibleOpeNum("種別1") = arrOpeNum(dicOpeNum.Item(procHour), 1)
responsibleOpeNum("種別2") = arrOpeNum(dicOpeNum.Item(procHour), 2)
responsibleOpeNum("種別3") = arrOpeNum(dicOpeNum.Item(procHour), 3)
Dim callingOpeStatus As New Dictionary: callingOpeStatus.RemoveAll
callingOpeStatus("種別1") = ""
callingOpeStatus("種別2") = ""
callingOpeStatus("種別3") = ""
Dim idx As Long
Dim endIdx As Long: endIdx = UBound(arrQueue)
Dim i As Integer
Dim oIdx As Integer
Dim resultId As Long
Dim itmX As Variant, itmY As Variant
Dim tmpArr As Variant, tmpArr2() As Variant, tmpArr3 As Variant
Dim tmpStr As String, setStr As String
Dim x As Integer
Dim targetOpeType As String
' For idx = LBound(arrQueue) To endIdx
For idx = LBound(arrQueue) To 100
For i = 1 To END_COL
targetData(i) = arrQueue(idx, i)
Next i
If (Minute(CDate(procHour)) <> Minute(CDate(targetData(2)))) Then
procHour = CStr(CDate(targetData(2)))
For Each itmX In callingOpeStatus
tmpArr = Split(callingOpeStatus.Item(itmX), ":")
If (UBound(tmpArr) > 0) Then
For x = 0 To UBound(tmpArr)
ReDim tmpArr2(1)
If (tmpArr(x) <> "") Then
If (tmpArr(x) <= 1) Then
responsibleOpeNum.Item(itmX) = responsibleOpeNum.Item(itmX) + 1
Else
ReDim Preserve tmpArr2(x + 1)
tmpArr2(x + 1) = tmpArr(x) - 1
End If
callingOpeStatus.Item(itmX) = Join(tmpArr2, ":")
End If
Next x
Erase tmpArr2
End If
Next itmX
End If
If (Hour(CDate(procHour)) <> Hour(CDate(targetData(2)))) Then
Debug.Print "* procHour = " & procHour & " | targetData(2) = " & CDate(targetData(2))
procHour = CStr(CDate(targetData(2)))
responsibleOpeNum("種別1") = arrOpeNum(dicOpeNum.Item(procHour), 1)
responsibleOpeNum("種別2") = arrOpeNum(dicOpeNum.Item(procHour), 2)
responsibleOpeNum("種別3") = arrOpeNum(dicOpeNum.Item(procHour), 3)
End If
For oIdx = 1 To 3
targetOpeType = arrOrder(dicOrder(targetData(3)), oIdx)
If (targetOpeType = "なし") Then
' 溢れ or 待ち
outputRowData(9) = "溢れ/待ち"
Debug.Print "[" & targetData(1) & "] -> 溢れ/待ち"
Exit For
End If
If (responsibleOpeNum(targetOpeType) > 0) Then
' 応答
outputRowData(9) = "応答"
outputRowData(10) = CDate(targetData(2)) + TimeSerial(0, 4, 0)
outputRowData(11) = targetOpeType
responsibleOpeNum.Item(targetOpeType) = responsibleOpeNum.Item(targetOpeType) - 1
�� callingOpeStatus.Item(targetOpeType) = callingOpeStatus.Item(targetOpeType) & ":" & CStr(4)
Debug.Print "[" & targetData(1) & "] -> 応答 | targetOpeType = " & targetOpeType & " | 空き = " & responsibleOpeNum.Item(targetOpeType)
Exit For
End If
Next oIdx
If (outputRowData(9) = "") Then
' 溢れ(空きなし)
outputRowData(9) = "空きなし"
Debug.Print "[" & targetData(1) & "] -> 空きなし"
End If
resultId = resultId + 1
outputRowData(1) = resultId
outputRowData(2) = CDate(targetData(2))
outputRowData(3) = targetData(1)
outputRowData(4) = CDate(targetData(2))
outputRowData(5) = targetData(3)
outputRowData(6) = targetData(4)
outputRowData(7) = targetData(5)
outputRowData(8) = targetData(6)
ReDim Preserve outputData(resultId)
outputData(resultId) = outputRowData
Erase outputRowData
Erase targetData
targetOpeType = Empty
Next idx
End Sub
Sub OutputResult()
End Sub
0 notes