Red (coarser spacing, this is the one displayed):
cs setpencolour 2 repeat 90 [fd 100 bk 100 rt 3 fd 100 bk 100 rt 1] ht

Abbreviations:
cs = clear screen
fd = forward
bk = back
rt = right
ht = hide turtle