It's been a while since I coded anything, let me take a whack
Load "*",8,1
5 Let a = 0
6 a=a+1
10 Print HELLO
20 Print How much are Bitcoins?
Rem 30 Input 8-8
40 Print Bitcoins are a$ 4,4
50 Goto 6
It may need a few tweaks.
It's hard to answer your question though (as what would happen) because I'm not even sure -how- that would happen, which would alter things, on top of getting enough clients to switch over to the fiat-pinned version.