1 CALLCHAR96. "183C7E7F7F3F1B030303030307070301183C7EFEFEFCDBC0C0C0C0C0E0E0C080".56.RPT$("F0".32)):CALL SPRITE(#1.96.7.1.1#2.56.12.191.98)
2 CALL CLEAR::CALL MAGNIFY(4)::CALL MOTION(#1.65.92)::CALL JOYST(1,X,Y)::CALL MOTION(#2.0.X)::CALL COIC(#1.#2.30.V)::IF V-1 THEN PRINT "Zezette n'est plus vierne" ELSE 2