commit
17da0a4528
1 changed files with 10 additions and 0 deletions
10
4/AWerbrouck.basic
Normal file
10
4/AWerbrouck.basic
Normal file
|
@ -0,0 +1,10 @@
|
||||||
|
CLS
|
||||||
|
Dim s As String
|
||||||
|
INPUT "Z voor zeus en C voor corona, en niets als je houdt van dodona";s
|
||||||
|
IF s = "Z" THEN
|
||||||
|
PRINT ":D"
|
||||||
|
ELSEIF s = "C" THEN
|
||||||
|
PRINT "D:"
|
||||||
|
ELSE
|
||||||
|
PRINT "(-_-)"
|
||||||
|
END IF
|
Loading…
Reference in a new issue