[proc_print_err_msg;
!! 11000	REM VIOLS SUBFELMEDDELANDERUTIN 3
  .line11000; !===  VIOLS SUBFELMEDDELANDERUTIN 3
!! 11001	IF X1>0 OR S1>0 THEN 11100 ELSE S(50)=S(50)-1
  if(i_X1>0 || i_S1>0) { jump line11100; } else {(i_S_1D-->50)=(i_S_1D-->50)-1; }
!! 11002	IF INSTR(1,A$,"HJÄLP")>0 THEN PRINT "Du kan inte få någon hjälp här." \ GOTO 11100
  if(decInstr(1,s_A,decWriteString(main_str-->0,"HJÄLP"))>0) { print "Du kan inte få någon hjälp här.^";jump line11100;}
!! 11003	IF A$="N" OR A$="V" THEN PRINT "Du kan inte gå ditåt." \ GOTO 11100
  if(decStrCmp(s_A,decWriteString(main_str-->0,"N"))==0 || decStrCmp(s_A,decWriteString(main_str-->1,"V"))==0) { print "Du kan inte gå ditåt.^";jump line11100;}
!! 11004	IF INSTR(1,"*NORR*SÖDER*VÄSTER*ÖSTER*NV*NÖ*NO*SV*SÖ*SO","*"+A$)>0 THEN 11200
  if(decInstr(1,decWriteString(main_str-->0,"*NORR*SÖDER*VÄSTER*ÖSTER*NV*NÖ*NO*SV*SÖ*SO"),decStrCat(decWriteString(main_str-->1,"*"),s_A))>0) { jump line11200;}
!! 11005	IF INSTR(1,"*NORDVÄST*NORDÖST*NORDOST*SYDVÄST*SYDÖST*SYDOST","*"+A$)>0 THEN 11200
  if(decInstr(1,decWriteString(main_str-->0,"*NORDVÄST*NORDÖST*NORDOST*SYDVÄST*SYDÖST*SYDOST"),decStrCat(decWriteString(main_str-->1,"*"),s_A))>0) { jump line11200;}
!! 11006	IF INSTR(1,"*UPPÅT*NEDÅT*NERÅT*VÄNSTER*HÖGER*FRAMÅT*BAKÅT","*"+A$)>0 THEN 11220
  if(decInstr(1,decWriteString(main_str-->0,"*UPPÅT*NEDÅT*NERÅT*VÄNSTER*HÖGER*FRAMÅT*BAKÅT"),decStrCat(decWriteString(main_str-->1,"*"),s_A))>0) { jump line11220;}
!! 11007	IF INSTR(1,A$,"SESAM")=0 AND INSTR(1,A$,"KORKSKRUV")=0 THEN 11011
  if(decInstr(1,s_A,decWriteString(main_str-->0,"SESAM"))==0 && decInstr(1,s_A,decWriteString(main_str-->1,"KORKSKRUV"))==0) { jump line11011;}
!! 11008	PRINT "Ingenting händer."
  print "Ingenting händer.^";
!! 11009	GOTO 11100
  jump line11100;
!! 11011	IF INSTR(1,A$,"STÄNG")>0 THEN PRINT "Det finns inget du kan stänga här!"\GOTO  11100
  .line11011; if(decInstr(1,s_A,decWriteString(main_str-->0,"STÄNG"))>0) { print "Det finns inget du kan stänga här!^";jump line11100;}
!! 11013	IF INSTR(1,A$,"KROSS")>0 THEN PRINT "Det finns inget du kan krossa här!"\GOTO 11100
  if(decInstr(1,s_A,decWriteString(main_str-->0,"KROSS"))>0) { print "Det finns inget du kan krossa här!^";jump line11100;}
!! 11014	IF INSTR(1,A$,"SKÄR")>0 THEN PRINT "Det finns inget du kan skära här!"\  GOTO 11100
  if(decInstr(1,s_A,decWriteString(main_str-->0,"SKÄR"))>0) { print "Det finns inget du kan skära här!^";jump line11100;}
!! 11015	IF A$="SE" OR INSTR(1,A$,"TITTA")>0 THEN RETURN
  if(decStrCmp(s_A,decWriteString(main_str-->0,"SE"))==0 || decInstr(1,s_A,decWriteString(main_str-->1,"TITTA"))>0) { return;}
!! 11017	IF FNL$(A$,5)="HOPPA" AND X=1 THEN PRINT "Du kommer ingenstans uppåt." \ GOTO 11100
  if(decStrCmp(fnc_FNL(s_A,5),decWriteString(main_str-->0,"HOPPA"))==0 && i_X==1) { print "Du kommer ingenstans uppåt.^";jump line11100;}
!! 11018	IF FNL$(A$,5)="HOPPA" THEN PRINT "Det finns inget hål att hoppa ner genom." \ GOTO 11100
  if(decStrCmp(fnc_FNL(s_A,5),decWriteString(main_str-->0,"HOPPA"))==0) { print "Det finns inget hål att hoppa ner genom.^";jump line11100;}
!! 11080	D=INT(RND*5)+1
!WARNING: random argument should be adjusted in line: 11080	D=INT(RND*5)+1
!WARNING: int function skipped in line: 11080	D=INT(RND*5)+1
  i_D=random(5);
!! 11081	IF D=1 THEN PRINT "Va ??"
  if(i_D==1) { print "Va ??^";}
!! 11082	IF D=2 THEN PRINT "Jag förstår inte."
  if(i_D==2) { print "Jag förstår inte.^";}
!! 11083	IF D=3 THEN PRINT "Det förstår jag inte alls."
  if(i_D==3) { print "Det förstår jag inte alls.^";}
!! 11084	IF D=4 THEN PRINT "Det vet jag inte vad det betyder."
  if(i_D==4) { print "Det vet jag inte vad det betyder.^";}
!! 11085	IF D=5 THEN PRINT "Uttryck Dej klarare."
  if(i_D==5) { print "Uttryck Dej klarare.^";}
!! 11099	PRINT
  new_line;
!! 11100	RETURN
  .line11100; return;
!! 11200	IF S(36)=0 THEN PRINT "Inomhus ska du ange riktningar, inte väderstreck."
  .line11200; if((i_S_1D-->36)==0) { print "Inomhus ska du ange riktningar, inte väderstreck.^";}
!! 11202	IF S(36)<>0 THEN PRINT "Du kan inte gå ditåt."
  if((i_S_1D-->36)~=0) { print "Du kan inte gå ditåt.^";}
!! 11205	GOTO 11100
  jump line11100;
!! 11220	IF S(36)=1 THEN PRINT "Utomhus ska du ange väderstreck, inte riktningar."
  .line11220; if((i_S_1D-->36)==1) { print "Utomhus ska du ange väderstreck, inte riktningar.^";}
!! 11225	IF S(36)<>1 THEN PRINT "Du kan inte gå ditåt."
  if((i_S_1D-->36)~=1) { print "Du kan inte gå ditåt.^";}
!! 11230	GOTO 11100
  jump line11100;
];