Skip to main content
Commonmark migration
Source Link

#SmileBASIC, 87 bytes INPUT N FOR Y=-N TO N FOR X=-N TO N?" /|- O"[(X==Y)+!(X+Y)2+!X3+!Y*4]; NEXT?NEXT

SmileBASIC, 87 bytes

INPUT N
FOR Y=-N TO N
FOR X=-N TO N?" \/|-     O"[(X==Y)+!(X+Y)*2+!X*3+!Y*4];
NEXT?NEXT

#SmileBASIC, 87 bytes INPUT N FOR Y=-N TO N FOR X=-N TO N?" /|- O"[(X==Y)+!(X+Y)2+!X3+!Y*4]; NEXT?NEXT

SmileBASIC, 87 bytes

INPUT N
FOR Y=-N TO N
FOR X=-N TO N?" \/|-     O"[(X==Y)+!(X+Y)*2+!X*3+!Y*4];
NEXT?NEXT
Source Link
12Me21
  • 6.7k
  • 1
  • 22
  • 40

#SmileBASIC, 87 bytes INPUT N FOR Y=-N TO N FOR X=-N TO N?" /|- O"[(X==Y)+!(X+Y)2+!X3+!Y*4]; NEXT?NEXT