strtotime()を使おう
today = date("Y/m/d"); $target_day = "2014/06/10"; if(strtotime($today) === strtotime($target_day)){ echo "ターゲット日付は今日です"; }else if(strtotime($today) > strtotime($target_day)){ echo "ターゲット日付は過去です"; }else{ echo "ターゲット日付は未来です"; }
strtotime()を使おう
today = date("Y/m/d"); $target_day = "2014/06/10"; if(strtotime($today) === strtotime($target_day)){ echo "ターゲット日付は今日です"; }else if(strtotime($today) > strtotime($target_day)){ echo "ターゲット日付は過去です"; }else{ echo "ターゲット日付は未来です"; }
strlen()だとbyte単位になる。
・SSHでログイン
dos窓とかで。
ssh あなたのアカウント@あなたのドメイン.sakura.ne.jp
その後Password聞かれるので入力でログイン
・以下コマンドでComposerインストール
curl -sS https://getcomposer.org/installer | php
以下でComposerインストール状況確認
php composer.phar
・abraham/twitteroauthのインストール
php composer.phar require abraham/twitteroauth
Dim today As Date = DateTime.Today Console.WriteLine(today.ToOADate)
整数部が年月日、小数部が時間になる
'暗号化用のデータ Dim enc_key() As Byte _ = { &HED, &HB, &H56, &HAF, &H61, &HA2, &H71, &H39, &HE0, &H4B, &HDC, &HC9, &H23, &H69, &H8C, &HBD, &HB9, &H86, &H98, &H28, &HC8, &H3E, &H62, &HA7, &HFA, &H17, &HC1, &H33, &H64, &HBF, &H96, &H24 } Dim enc_iv() As Byte _ = { &H1F, &HDF, &H98, &H0, &H67, &H36, &H7D, &H3B, &HFF, &HC9, &H3B, &H79, &H4D, &HD4, &H81, &H72 } ' 入力文字列をAES暗号化してBase64形式で返すメソッド Function EncryptToBase64(plainText As String, key As Byte(), iv As Byte()) As String ' 入力文字列をバイト型配列に変換 Dim src() As Byte = Encoding.Unicode.GetBytes(plainText) 'WriteLine($"平文のバイト型配列の長さ={src.Length}") ' 出力例:平文のバイト型配列の長さ=60 ' Encryptor(暗号化器)を用意する Using am = New AesManaged() Using encryptor = am.CreateEncryptor(key, iv) ' ファイルを入力とするなら、ここでファイルを開く 'Using inStream = New FileStream(FilePath, ……省略…… ' 出力ストリームを用意する Using outStream = New MemoryStream() ' 暗号化して書き出す Using cs = New CryptoStream(outStream, encryptor, CryptoStreamMode.Write) cs.Write(src, 0, src.Length) ' 入力がファイルなら、inStreamから一定量ずつバイトバッファーに読み込んで ' cse.Writeで書き込む処理を繰り返す(復号のサンプルコードを参照) End Using ' 出力がファイルなら、以上で完了 ' Base64文字列に変換して返す Dim result() As Byte = outStream.ToArray() 'WriteLine($"暗号のバイト型配列の長さ={result.Length}") ' 出力例:暗号のバイト型配列の長さ=64 ' 出力サイズはBlockSize(既定値16バイト)の倍数になる Return Convert.ToBase64String(result) End Using End Using End Using End Function ' 暗号化されたBase64形式の入力文字列をAES復号して平文の文字列を返すメソッド Function DecryptFromBase64(base64Text As String, key As Byte(), iv As Byte()) As String ' Base64文字列をバイト型配列に変換 Dim src() As Byte = Convert.FromBase64String(base64Text) ' Decryptor(復号器)を用意する Using am = New AesManaged() Using decryptor = am.CreateDecryptor(key, iv) ' 入力ストリームを開く Using inStream = New MemoryStream(src, False) ' 出力ストリームを用意する Using outStream = New MemoryStream() ' 復号して一定量ずつ読み出し、それを出力ストリームに書き出す Using cs = New CryptoStream(inStream, decryptor, CryptoStreamMode.Read) Dim buffer(4095) As Byte Dim len As Integer = cs.Read(buffer, 0, 4096) While (len > 0) outStream.Write(buffer, 0, len) len = cs.Read(buffer, 0, 4096) End While End Using ' 出力がファイルなら、以上で完了 ' 文字列に変換して返す Dim result() As Byte = outStream.ToArray() Return Encoding.Unicode.GetString(result) End Using End Using End Using End Using End Function .... 'result暗号化 Dim enc_result As String = EncryptToBase64(result, enc_key, enc_iv) 'result複合化 result = DecryptFromBase64(reg_s, enc_key, enc_iv)
・DMを受け取る側のアカウントが「すべてのユーザーからダイレクトメッセージを受信する」の項目にチェックしとく(https://twitter.com/settings/security)
・https://publish.twitter.com/にアクセス
このページをスクロールすると3つの選択肢が出てくるので、その中から「Twitter Buttons」を選択
・Message Buttonを選択
・Twitterのユーザー名とuserIDを求められる
userIDはhttps://idtwi.com/でも調べられるけど、自分のtwitterページ開いてブラウザでhtmlコード表示して"user-id"で検索したほうが早い。
・ボタンのコードがもらえる
ボリンジャーバンド(Bollinger Bands)の計算式
Middle Band =n-period moving average (MA)
Upper Band = n-period MA+(n-period standard deviation of price x k)
Lower Band = n-period MA- (n-period standard deviation of price x k)
k=2.0
Bollinger Band%Bの計算式
%b = (Close − LowerBB) / (UpperBB − LowerBB)
BollingerBandWidthの計算式
BandWidth = (UpperBB − LowerBB) / MiddleBB
毎回変化するダミーのパラメータをつければよい
target_url = "http://test.com/api" & "?dummy=" & DateTime.Now
・ 重複チェックしたい範囲を選択
・リボンから>「ホーム」>「条件付き書式」>「セルの強調表示ツール」>「重複する値」