HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2007
0801
ウーパールーパーはみでる…24解決


ウーパールーパー

リンク

2007/8/1(Wed) 10:08:20|NO.9971

screen 0,500,500
a=250
b=250
c=0
d=5
*ii
repeat
cls
pos 100,100
mes"○"
pos a,b
mes"●"
stick key, 15 ;キー入力
if key & 1 : a=a-d ;左
if key & 2 : b=b-d ;上
if key & 4 : a=a+d ;右
if key & 8 : b=b+d ;下
if key & 128 : end ;[Esc]
if a=100 :goto *kuku
await 60
loop
*kuku
if b=100:goto *kukuku
goto *ii
*kukuku
wait 2
cls
mes"クリアー   "
stop

●が画面からはみでます
どうすれば
はみ出ませんか



この記事に返信する


f

リンク

2007/8/1(Wed) 10:16:19|NO.9973

「はみ出ないようにする」処理が無いからでね?



ウーパールーパー

リンク

2007/8/1(Wed) 10:18:43|NO.9974

>「はみ出ないようにする」処理が無いからでね?
その処理はどうやるんでね?



f

リンク

2007/8/1(Wed) 10:19:44|NO.9975

はみ出る時は座標がどういう常態か考えれば分かるんでね?



ウーパールーパー

リンク

2007/8/1(Wed) 10:20:54|NO.9976

>はみ出る時は座標がどういう常態か考えれば分かるんでね?
つまりどういう事すればいいんでね?



f

リンク

2007/8/1(Wed) 10:22:23|NO.9977

「あとは夏休みの宿題にしよう。
 みんな、登校日を忘れるなよ!



ウーパールーパー

リンク

2007/8/1(Wed) 10:24:17|NO.9978

>「あとは夏休みの宿題にしよう。
 みんな、登校日を忘れるなよ!
なんじゃそりゃ〜〜〜〜〜〜〜〜
おしえてよ〜〜〜〜〜〜〜〜〜〜
たのむよ〜〜〜〜〜〜〜〜〜〜〜



ウーパールーパー

リンク

2007/8/1(Wed) 10:24:45|NO.9979

>登校日を忘れるなよ!
いつだよ〜〜〜〜〜〜〜〜



f

リンク

2007/8/1(Wed) 10:29:32|NO.9980

では8月6日まで。
それまでに宿題の出来ない子は漢字の書き取り10ページ。



ウーパールーパー

リンク

2007/8/1(Wed) 10:32:22|NO.9981

>では8月6日まで。
 それまでに宿題の出来ない子は漢字の書き取り10ページ。
なんでそーなんの



ウーパールーパー

リンク

2007/8/1(Wed) 10:42:00|NO.9984

screen 0,500,500
a=250
b=250
c=0
d=5
*ii
repeat
cls 1
color 219,219,255
boxf 10,10,490,490
color 0,0,0
pos 100,100
mes"○"
pos a,b
mes"●"
stick key, 15 ;キー入力
if key & 1 : a=a-d ;左
if key & 2 : b=b-d ;上
if key & 4 : a=a+d ;右
if key & 8 : b=b+d ;下
if key & 128 : end ;[Esc]
if a=100 :goto *kuku
await 60
loop
*kuku
if b=100:goto *kukuku
goto *ii
*kukuku
wait 2
cls
mes"クリアー   "
stop

拝啓シベリア気候が弱まる頃
背景を変えました(笑った人はすごい)



ウーパールーパー

リンク

2007/8/1(Wed) 10:54:03|NO.9986

screen 0,500,500
a=250
b=250
c=0
d=5
*ii
repeat
cls 1
color 219,219,255
boxf 10,10,490,490
color 0,0,0
pos 100,100
mes"○"
pos a,b
mes"●"
stick key, 15 ;キー入力
if key & 1 : a=a-d ;左
if key & 2 : b=b-d ;上
if key & 4 : a=a+d ;右
if key & 8 : b=b+d ;下
if key & 128 : end ;[Esc]
if a=100 :goto *kuku
if a <= 10 : a=10
if a >= 480 : a=480
if b <= 10 : b=10
if b >= 480 : b=480
await 60
loop
*kuku
if b=100:goto *kukuku
goto *ii
*kukuku
wait 2
cls
mes"クリアー   "
stop

できた〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
漢字の書取な〜し(いぇい)



f

リンク

2007/8/1(Wed) 10:54:30|NO.9987

「コラ!KENTA君!
 宿題の答えを見せてあげるとは何事ですか!
 罰として校庭10周です!



KENTA

リンク

2007/8/1(Wed) 10:55:24|NO.9988

ソースは< pre >〜< /pre >で囲んでください。
そっちのほうが見やすいです!!



KENTA

リンク

2007/8/1(Wed) 10:56:27|NO.9989

でも、僕のソースは参考にしてませんね〜〜。
limit使ってないし、redrawなども使ってないし。



f

リンク

2007/8/1(Wed) 10:58:35|NO.9990

「先生は結果を怒っているのではありません!
 不正行為を怒っているのです!(ヲイ



KENTA

リンク

2007/8/1(Wed) 10:59:13|NO.9991

分かりました。
すいません。今度から気を付けます。



f

リンク

2007/8/1(Wed) 10:59:20|NO.9992

というか、思いの外遊べたので良しとする(ヲ



ウーパールーパー

リンク

2007/8/1(Wed) 11:00:20|NO.9993

screen 0,500,500
a=250
b=250
c=0
d=5
cls 1
*ii
repeat
redraw 1
color 219,219,255
boxf 10,10,490,490
color 0,0,0
pos 100,100
mes"○"
pos a,b
mes"●"
stick key, 15 ;キー入力
if key & 1 : a=a-d ;左
if key & 2 : b=b-d ;上
if key & 4 : a=a+d ;右
if key & 8 : b=b+d ;下
if key & 128 : end ;[Esc]
if a=100 :goto *kuku
*kukukuku
if a <= 10 : a=10
if a >= 475 : a=475
if b <= 10 : b=10
if b >= 475 : b=475
await 60
loop
*kuku
if b=100:goto *kukuku
goto *kukukuku
*kukuku
wait 2
cls
mes"クリアー   "
stop

今度こそでけた〜



ウーパールーパー

リンク

2007/8/1(Wed) 11:02:27|NO.9994


screen 0,500,500 a=250 b=250 c=0 d=5 cls 1 *ii repeat redraw 1 color 219,219,255 boxf 10,10,490,490 color 0,0,0 pos 100,100 mes"○" pos a,b mes"●" stick key, 15 ;キー入力 if key & 1 : a=a-d ;左 if key & 2 : b=b-d ;上 if key & 4 : a=a+d ;右 if key & 8 : b=b+d ;下 if key & 128 : end ;[Esc] if a=100 :goto *kuku *kukukuku if a <= 10 : a=10 if a >= 475 : a=475 if b <= 10 : b=10 if b >= 475 : b=475 await 60 loop *kuku if b=100:goto *kukuku goto *kukukuku *kukuku wait 2 cls mes"クリアー   " stop
最終版



ウーパールーパー

リンク

2007/8/1(Wed) 11:04:19|NO.9995

f先生ありがとう(ここは学校?スレ?ネット学校?)



ウーパールーパー

リンク

2007/8/1(Wed) 11:16:32|NO.9996

GENKI
君は今回やくにたたんかった



ウーパールーパー

リンク

2007/8/1(Wed) 11:17:44|NO.9997

>GENKI
君は今回やくにたたんかった
KENTAだったGENKIさんすうません



KENTA

リンク

2007/8/1(Wed) 11:25:42|NO.9999

>GENKI
>君は今回やくにたたんかった

なんでGENKIさんが出てくるのかが分からない。
普通間違えるかな〜〜。



ウーパールーパー

リンク

2007/8/1(Wed) 11:29:36|NO.10000

>KENTA
そりゃ間違えるは



ONION software Copyright 1997-2023(c) All rights reserved.