- 2022年8月9日(火)13:30~15:30
- 2022年8月11日(木)13:30~15:30
- Node.jsが動く環境を用意しておく
- リポジトリがダウンロードできるよう、Gitをインストールしておく
<!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 = [] |
<!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 |
1 | |
2 | |
3 | |
4 | |
5 | |
6 | |
7 | |
8 | |
9 | |
10 |
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 |
import pygame | |
from pygame.locals import * | |
import sys, random | |
# 変数の初期化 | |
maze_w = 31 # 迷路の列数 | |
maze_h = 23 # 迷路の行数 | |
maze = [] # 迷路データ | |
tile_w = 16 | |
px = 1 # プレイヤーの座標 |
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''' |
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 |