basictomonokai

## a-htmlpnl1.bas.txt
fn.def ynbox1$(titl$,odai$,honbun$)

outhtmlk$="\n"
outhtml$="?<html>"+outhtmlk$
outhtml$=outhtml$+""+outhtmlk$
outhtml$=outhtml$+"<head >"+outhtmlk$
outhtml$=outhtml$+""+outhtmlk$
outhtml$=outhtml$+"  <meta http-equiv=\"content-type\" content=\"text/html;charset=UTF-8\"/>"+outhtmlk$
outhtml$=outhtml$+""+outhtmlk$
outhtml$=outhtml$+"<style type=\"text/css\">"+outhtmlk$

## itiran.html
<html>

<head >

  <meta http-equiv="content-type" content="text/html;charset=UTF-8"/>

<link href="http://netdna.bootstrapcdn.com/font-awesome/4.0.3/css/font-awesome.css" rel="stylesheet">


<meta name="viewport" content="width=device-width, user-scalable=no, initial-scale=1, maximum-scale=1">

## advindex.html
<!DOCTYPE html>
<html >
<head>
  <meta charset="UTF-8">

<link href="https://fonts.googleapis.com/earlyaccess/roundedmplus1c.css" rel="stylesheet" />

<style>
.wf-roundedmplus1c { font-family: "Rounded Mplus 1c"; }
</style>

## t-kanko1.bas.txt
REM Start of BASIC! Program

johourl1$="https://www.chiikinogennki.soumu.go.jp/k-cloud-api/v001/kanko/"
johourl2$="/xml?place="
johourl3$="&limit=20"

genre$="植物;庭園"
pref$="京都府"

egenre$=encode$("URL",,genre$)

## snippet-system.txt
system.open
ansf$=replace$(ansz$,"../../","/sdcard/")
aaa$="/system/bin/am start -a android.intent.action.VIEW -t \"text/*\" "
bbb$="-c \"android.intent.category.DEFAULT\""
ddd$=" -d file:"+ansf$
ccc$=aaa$+bbb$+ddd$+" --user 0"
system.write ccc$
pause 5000
system.close

## snippet-dialogselect.txt
dim selsyo$[3]

nxtsyo:
console.title "画像サイズ拡張子変換"

selsyo$[1]="jpg,png両方とも保存する"
selsyo$[2]="jpgのみ保存する"
selsyo$[3]="pngのみ保存する"

sailog:

## snippet-fndef.txt
fn.def lupget1$(urlx$)


fn.rtn outdata$

fn.end

## snippet-time.txt
time y$, m$, d$, h$, n$, s$
today$=y$+m$+d$+h$+n$+s$

## snippet-appstart.txt
bundle.create bptr
bundle.put bptr,"Intent.EXTRA_STREAM","file://" + root$ + "/" + filename$

app.start "android.intent.action.SEND","file://" + root$ + "/" + filename$,,,"text/*",,bptr

## snippet-wifi.txt
socket.myip ip$
if ip$="" then
   popup "wi-fi未接続 終了します",0,0,1
   exit
else
   popup "wi-fi接続済",0,0,1
   pause 4000
endif
	fn.def ynbox1$(titl$,odai$,honbun$)

	outhtmlk$="\n"
	outhtml$="?<html>"+outhtmlk$
	outhtml$=outhtml$+""+outhtmlk$
	outhtml$=outhtml$+"<head >"+outhtmlk$
	outhtml$=outhtml$+""+outhtmlk$
	outhtml$=outhtml$+" <meta http-equiv=\"content-type\" content=\"text/html;charset=UTF-8\"/>"+outhtmlk$
	outhtml$=outhtml$+""+outhtmlk$
	outhtml$=outhtml$+"<style type=\"text/css\">"+outhtmlk$
	<html>

	<head >

	<meta http-equiv="content-type" content="text/html;charset=UTF-8"/>

	<link href="http://netdna.bootstrapcdn.com/font-awesome/4.0.3/css/font-awesome.css" rel="stylesheet">


	<meta name="viewport" content="width=device-width, user-scalable=no, initial-scale=1, maximum-scale=1">
	<!DOCTYPE html>
	<html >
	<head>
	<meta charset="UTF-8">

	<link href="https://fonts.googleapis.com/earlyaccess/roundedmplus1c.css" rel="stylesheet" />

	<style>
	.wf-roundedmplus1c { font-family: "Rounded Mplus 1c"; }
	</style>
	REM Start of BASIC! Program

	johourl1$="https://www.chiikinogennki.soumu.go.jp/k-cloud-api/v001/kanko/"
	johourl2$="/xml?place="
	johourl3$="&limit=20"

	genre$="植物;庭園"
	pref$="京都府"

	egenre$=encode$("URL",,genre$)
	system.open
	ansf$=replace$(ansz$,"../../","/sdcard/")
	aaa$="/system/bin/am start -a android.intent.action.VIEW -t \"text/*\" "
	bbb$="-c \"android.intent.category.DEFAULT\""
	ddd$=" -d file:"+ansf$
	ccc$=aaa$+bbb$+ddd$+" --user 0"
	system.write ccc$
	pause 5000
	system.close
	dim selsyo$[3]

	nxtsyo:
	console.title "画像サイズ拡張子変換"

	selsyo$[1]="jpg,png両方とも保存する"
	selsyo$[2]="jpgのみ保存する"
	selsyo$[3]="pngのみ保存する"

	sailog:
	bundle.create bptr
	bundle.put bptr,"Intent.EXTRA_STREAM","file://" + root$ + "/" + filename$

	app.start "android.intent.action.SEND","file://" + root$ + "/" + filename$,,,"text/*",,bptr
	socket.myip ip$
	if ip$="" then
	popup "wi-fi未接続終了します",0,0,1
	exit
	else
	popup "wi-fi接続済",0,0,1
	pause 4000
	endif