Skip to content

Instantly share code, notes, and snippets.

@kujirahand
kujirahand / idea.html
Last active September 1, 2021 14:56
3×3グリッドのアイデア発想ツール
<!DOCTYPE html><meta charset="utf-8"><html><body>
<!-- UIを作成 -->
<div id="g"></div>
<p style="clear:both"></p>
<p><a id="save" download="idea.txt" href="#">保存</a></p>
<!-- JavaScript -->
<script>
// 3×3のグリッドを作成 --- (*1)
const g = document.querySelector('#g')
const items = []
@kujirahand
kujirahand / idea2.html
Created August 16, 2021 11:45
3×3のグリッドのアイデア発想ツール 改良版
<!DOCTYPE html><meta charset="utf-8"><html><body>
<!-- UIを作成 -->
<div id="g"></div>
<p style="clear:both"></p>
<p><a id="save" download="idea.txt" href="#">保存</a></p>
<!-- JavaScript -->
<script>
// 3×3のグリッドを作成
const g = document.querySelector('#g')
const items = []
// Fizz, Buzzのノードを作る --- (*1)
CREATE (:FizzBuzzGroup { name: "Fizz" }), (:FizzBuzzGroup { name: "Buzz" });
// 1から100までの値を追加 --- (*2)
FOREACH (i IN RANGE(1,100) | CREATE (a:FizzBuzz{v:i}));
// isFizz, isBuzzの関係を追加 --- (*3)
MATCH (i:FizzBuzz),(g:FizzBuzzGroup{name:"Fizz"})
WHERE i.v % 3 = 0
CREATE (g)-[:isFizz]->(i);
MATCH (i:FizzBuzz),(g:FizzBuzzGroup{name:"Buzz"})
WHERE i.v % 5 = 0
LOOP WHILE (1) = (1)
Clipboard.GetText Text=> ClipboardText
IF ClipboardText = $'''@@今日''' THEN
DateTime.GetCurrentDateTime.Local DateTimeFormat: DateTime.DateTimeFormat.DateAndTime CurrentDateTime=> CurrentDateTime
Clipboard.SetText Text: CurrentDateTime
Workstation.PlaySound.PlaySystemSound SystemSound: System.SystemSound.Asterisk
END
WAIT 1
END
@kujirahand
kujirahand / 1to100.txt
Created March 4, 2022 12:47
1から100まで一行ごとに書かれただけのファイル
1
2
3
4
5
6
7
8
9
10
@kujirahand
kujirahand / ImageRotate.txt
Last active April 29, 2022 10:54
Power Automateで画像を横向きに回転する
Display.SelectFolder IsTopMost: False SelectedFolder=> SelectedFolder ButtonPressed=> ButtonPressed
Folder.GetFiles Folder: SelectedFolder FileFilter: $'''*.jpg''' IncludeSubfolders: False FailOnAccessDenied: True SortBy1: Folder.SortBy.NoSort SortDescending1: False SortBy2: Folder.SortBy.NoSort SortDescending2: False SortBy3: Folder.SortBy.NoSort SortDescending3: False Files=> Files
LOOP FOREACH CurrentItem IN Files
Scripting.RunPowershellScript Script: $'''[void][Reflection.Assembly]::LoadWithPartialName(\"System.Drawing\")
$im = New-Object System.Drawing.Bitmap(\"%CurrentItem%\")
$im.RotateFlip(\"Rotate270FlipNone\")
$im.Save(\"%CurrentItem%\", [System.Drawing.Imaging.ImageFormat]::Jpeg)
$im.Dispose()
''' ScriptOutput=> PowershellOutput ScriptError=> ScriptError
END
@kujirahand
kujirahand / maze.py
Last active January 31, 2024 01:09
PyGameで迷路ゲーム
import pygame
from pygame.locals import *
import sys, random
# 変数の初期化
maze_w = 31 # 迷路の列数
maze_h = 23 # 迷路の行数
maze = [] # 迷路データ
tile_w = 16
px = 1 # プレイヤーの座標
@kujirahand
kujirahand / hayamihyou.txt
Created April 29, 2022 09:46
年齢早見表を自動作成/Power Automate Desktop
DateTime.GetCurrentDateTime.Local DateTimeFormat: DateTime.DateTimeFormat.DateAndTime CurrentDateTime=> CurrentDateTime
Text.ConvertDateTimeToText.FromCustomDateTime DateTime: CurrentDateTime CustomFormat: $'''yyyy''' Result=> yyyy
Excel.LaunchExcel.LaunchUnderExistingProcess Visible: True Instance=> ExcelInstance
LOOP LoopIndex FROM 1 TO 50 STEP 1
Excel.WriteToExcel.WriteCell Instance: ExcelInstance Value: $'''%yyyy - LoopIndex + 1%年''' Column: 1 Row: LoopIndex
Excel.WriteToExcel.WriteCell Instance: ExcelInstance Value: $'''満 %LoopIndex - 1% 歳''' Column: 2 Row: LoopIndex
END
Folder.GetSpecialFolder SpecialFolder: Folder.SpecialFolder.DesktopDirectory SpecialFolderPath=> SpecialFolderPath
Excel.CloseExcel.CloseAndSaveAs Instance: ExcelInstance DocumentFormat: Excel.ExcelFormat.FromExtension DocumentPath: $'''%SpecialFolderPath%\\年齢早見表.xlsx'''
@kujirahand
kujirahand / アンケート集計.txt
Created July 8, 2022 03:30
Power Automateでアンケート集計(業務ハック20回目)
Display.SelectFolder Description: $'''アンケートの入ったフォルダを選択してください''' IsTopMost: False SelectedFolder=> SelectedFolder ButtonPressed=> ButtonPressed
Folder.GetFiles Folder: SelectedFolder FileFilter: $'''*.xlsx''' IncludeSubfolders: False FailOnAccessDenied: True SortBy1: Folder.SortBy.NoSort SortDescending1: False SortBy2: Folder.SortBy.NoSort SortDescending2: False SortBy3: Folder.SortBy.NoSort SortDescending3: False Files=> Files
Variables.CreateNewList List=> CountList
LOOP FOREACH CurrentItem IN Files
Excel.LaunchExcel.LaunchAndOpenUnderExistingProcess Path: CurrentItem Visible: True ReadOnly: True Instance=> ExcelInstance
Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: $'''B''' StartRow: 3 ReadAsText: False CellValue=> ExcelData
Variables.AddItemToList Item: ExcelData List: CountList
Excel.CloseExcel.Close Instance: ExcelInstance
END
Text.JoinText.JoinWithDelimiter List: CountList StandardDelimiter: Text.StandardDelimiter.Tab DelimiterTimes: 1 Result=> JoinedText
@kujirahand
kujirahand / memo.md
Last active August 9, 2022 10:49
セキュリティキャンプ2022 - プログラミング言語の開発 - 演習資料

演習リスト [N4,N12] プログラミング言語を自作しよう

  • 2022年8月9日(火)13:30~15:30
  • 2022年8月11日(木)13:30~15:30

演習の準備

  • Node.jsが動く環境を用意しておく
  • リポジトリがダウンロードできるよう、Gitをインストールしておく