プレイ日記
Ep17 EmPx17
How do make text fade? Like it prints a sentence and fades away and print another sentence.
0そうだね
プレイ済み
返信[1]
親投稿
Hanzo rzsense
C=0:FADE #BLACK WHILE TRUE:VSYNC 1 IF C==0 THEN CLS:READ ST$ IF ST$=="EOL" THEN FADE 0:END LOCATE 0,0:?ST$ FADE 0,120 ENDIF IF C==240 THEN FADE #BLACK,120 C=(C+1)MOD 360 WEND DATA"COULD YOU REFER TO" DATA"THIS CODE?" DATA"EOL"
0そうだね
未プレイ
返信[2]
親投稿
Ep17 EmPx17
Ok, whats eol?
0そうだね
プレイ済み
返信[3]
親投稿
Hanzo rzsense
"EOL" stands for "End Of Lines" i.e. the end of sentence data. If "EOL" is found by IF statement in line 5 of this code, SmileBASIC will stop executing. If you remove "EOL", an error will occur. You can add sentence data as many as you like above DATA "EOL".
1そうだね
未プレイ
返信[4]
親投稿
Ep17 EmPx17
Ok.
0そうだね
プレイ済み
返信[5]
親投稿
Stewart segludian
Attached is my attempt at a fading text example.
1そうだね
プレイ済み
返信[6]
親投稿
Josiah Spike4
Or, you could use GPUTCHR like C1=400:C2=400:C3=400 REPEAT DEC C1,2:DEC C2,2: DEC C3,2 GPUTCHR 90,90,"HI",1,1,RGB(C1,C2,C3) UNTIL C1<-10
1そうだね
プレイ済み
返信[7]
親投稿
Ep17 EmPx17
Ok, thanks guys!
0そうだね
プレイ済み