fork download
copy 
  1. : hi 1 ;
  2. : GREET-SYSTEM 1 = IF ." Hi, I'm an AI assistant. how can i help you with? " CR THEN ;
  3. hi GREET-SYSTEM
  4. : ackuser 2 ;
  5. : ACKNOWLEDGING-USER 2 = IF TRUE GREET-SYSTEM THEN ." I can help you with anything from daily tasks to coding. tell me what'd you need." CR ;
  6. ackuser ACKNOWLEDGING-USER
Success #stdin #stdout 0.01s 5300KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Hi, I'm an AI assistant. how can i help you with? 
I can help you with anything from daily tasks to coding. tell me what'd you need.
https://ideone.com/72w0rs
language:
Forth (gforth 0.7.3)
created:
1 day ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!