@yosgspecさんが投稿したコード一覧 | ページ 3 | Codetter（こーどったー）

;CommonLisp
(format t "~{~A~%~}" 
	(loop for i from 1 to 100 collect
		(let(
				(fizz (= 0 (mod i 3)))

#runtime "hsp3cl"
s="sdfはghききgh"
#module
#defcfunc getBytes str _txt
	txt=_txt

##バックアップ
#sudo apt install deja-dup

#sudo chmod +x ./XubuntuCus.sh
#sudo ./XubuntuCus.sh

"use strict";

const {Worker,isMainThread,workerData,parentPort,threadId}=require("worker_threads");

const cores=4;

(format t "[[[~%~A~%]]]~%"
	(with-output-to-string(out)
		(run-program "cmd" '("/c" "dir" "/b") :output out)))
(quit)

(require :asdf)
(asdf:load-system :uiop)

(format t "[[[~%~A~%]]]~%"
	(uiop:run-program

#runtime "hsp3cl"
#cmpopt varinit 1

#module @dir
	#const fileOnly 1

<Window x:Class="IntervalTest.MainWindow"
		xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
		xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
		xmlns:d="http://schemas.microsoft.com/expression/blend/2008"
		xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006"

#module @cc2rgb
	#deffunc local cc2rgb array RGB,str _cc
		cc=_cc
		ccLen=strlen(cc)
		cci=int("$"+strmid(cc,1,ccLen-1))

# ブロック崩しの素
# https://news.mynavi.jp/article/zeropython-10/
# 上記URLの最初のサンプルをオブジェクトに置換したやつ

# ブロック崩し